//Laatste twee levels worden niet getoond aangezien deze besteed zijn aan het oproepen van deze fout + forlus
  SET $ECODE=""
 FOR loop=1:1:$STACK(-1)-2 DO
 . WRITE !,"Context level: ",loop
 . WRITE !,?5,"- Context type: ",$STACK(loop)
 . WRITE !,?5,"- Current place: ",$STACK(loop,"PLACE")
 . WRITE !,?5,"- Current source: ",$STACK(loop,"MCODE")
 . WRITE !
 QUIT