File: TEST.BAS

package info (click to toggle)
pcbasic 2.0.5-1
  • links: PTS
  • area: main
  • in suites: bookworm
  • size: 33,352 kB
  • sloc: python: 27,753; sh: 64; makefile: 13
file content (9 lines) | stat: -rw-r--r-- 185 bytes parent folder | download | duplicates (5) 
1
2
3
4
5
6
7
8
9
 
5 open "output.txt" for output as 1
10 def fna(x) = x + fna(x)
15 on error goto 100
20 print#1, fna(2)
30 print#1, "end"
40 end
100 print#1, "error", err, erl
110 resume next