Re: [BLACKBOX] Possible compiler bug ?

From: [at]} <Romiras>
Date: Sun, 18 Dec 2011 13:17:13 +0200

A problem disappear when using
Meter = (* POINTER TO RECORD *) RECORD maxVal : INTEGER END

or
pos := SHORT (val * LONG (100) DIV someINTEGERvar)

2011/12/18 Robert <robert.campbell_{([at]})nowhere.xy


Hi

I can't compile the code below, which seems ok to me.

I don't get an error message, I get a compiler crash.

Am I overlooking something obvious?

Regards

Robert



MODULE DemoMeter;


TYPE
 Meter = POINTER TO RECORD
             maxVal : INTEGER;
            END;


PROCEDURE Do*;
 VAR
   pos, val : INTEGER;
   meter : Meter;
 BEGIN
    pos := SHORT (val * LONG (100) DIV meter.maxVal)
 END Do;


END DemoMeter.

----
To unsubscribe, send a message with body "SIGNOFF BLACKBOX" to LISTSERV{([at]})nowhere.xy---- To unsubscribe, send a message with body "SIGNOFF BLACKBOX" to LISTSERV{([at]})nowhere.xy

Received on Sun Dec 18 2011 - 12:17:13 UTC