Return to args.fs CVS log | Up to [gforth] / gforth / kernel |
version 1.27, 2007/12/31 19:02:25 | version 1.28, 2012/07/27 23:28:10 |
---|---|
Line 115 Variable argc ( -- addr ) \ gforth | Line 115 Variable argc ( -- addr ) \ gforth |
false to script? ; | false to script? ; |
: os-boot ( path n **argv argc -- ) | : os-boot ( path n **argv argc -- ) |
stdout TO outfile-id | |
stdin TO infile-id | stdin TO infile-id |
stdout TO outfile-id | |
stderr TO errfile-id | |
argc ! argv ! pathstring 2! ; | argc ! argv ! pathstring 2! ; |
' (process-args) IS process-args | ' (process-args) IS process-args |