|
100 WHEN EXCEPTION USE IOERROR
|
|
110 EXT "del input.txt"
|
|
120 EXT "del \input.txt"
|
|
130 EXT "rmdir docs"
|
|
140 EXT "rmdir \docs"
|
|
150 END WHEN
|
|
160 HANDLER IOERROR
|
|
170 PRINT "Error in line";EXLINE
|
|
180 PRINT "*** ";EXSTRING$(EXTYPE)
|
|
190 CONTINUE
|
|
200 END HANDLER
|