       10 // TRAP sample program
       20 //
       30 TRAP
       40   aap
       50 HANDLER
       60   SYS assert, ERRLINE=160
       70 ENDTRAP
       80 //
       90 PRINT "Ok"
      100 //
      110 PROC aap CLOSED
      120   olifant
      130 ENDPROC aap
      140 //
      150 PROC olifant
      160   PRINT 1/0
      170 ENDPROC olifant
