[Oberon] "built in" functions

shark at gulfnet.sd64.bc.ca shark at gulfnet.sd64.bc.ca
Fri May 19 20:56:47 CEST 2006

I want to understand the "built in" functions
(if that is the correct terminology) better.
CAP( ) for example.  Appears it is defined in 
OPB.Mod.  Ie.

			| cap:
					IF f = Char THEN
						IF z^.class = Nconst THEN
							z^.conval^.intval := ORD(CAP(CHR(z^.conval^.intval))); z^.obj := NIL
						ELSE z := NewOp(op, typ, z)
					ELSE err(111); z^.typ := OPT.chartyp

Can anyone shed a little light on this?  
With ORD(CAP(CHR(z^.conval^.intval))) 
present, how is this not a recursive definition?

Thanks,     ... Peter E.

Desktops.OpenDoc  http://carnot.pathology.ubc.ca/

More information about the Oberon mailing list