Re (2): [Oberon] NO: Kernel procedure not implemented
edgar at edgarschwarz.de
edgar at edgarschwarz.de
Fri Nov 21 21:52:29 CET 2003
Pieter Muller <pieter.muller at alumni.ethz.ch>
> edgar at edgarschwarz.de wrote:
> > Error = "Unsupported kernel procedure"
> > Num = 249
> > | 249: offs := link[i].link; (* Passivate(adr, ebp: LONGINT) *)
> > WHILE offs # 0FFFFH DO
> > SYSTEM.GET(codebase + offs, val); SYSTEM.PUT(codebase + offs, Kernel.ModuleData[5] - (codebase + offs + 4));
> > offs := MSW(val);
> > END
> The code appears to be using an AWAIT statement, which is not supported
> on Native Oberon. (Neither are EXCLUSIVE statements).
Bingo. A thing to look for when porting code from Aos to NO !
Perhaps the '(* Passivate(adr, ebp: LONGINT) *)' in the code could have given me
an idea :-)
OTOH, the compiler could have given an error.
Thanks Pieter !
Cheers, Edgar
--
edgar at edgarschwarz.de "http://www.edgarschwarz.de"
"http://www.edgar-schwarz.de/forum/oberon" Running Active Oberon
Make it as simple as possible, but not simpler. Albert Einstein
More information about the Oberon
mailing list