Improving library layout.
This commit is contained in:
8
ueforth/posix/posix_desktop.fs
Normal file
8
ueforth/posix/posix_desktop.fs
Normal file
@ -0,0 +1,8 @@
|
||||
( Arguments )
|
||||
: 'argc ( -- a ) 'sys 8 cells + ;
|
||||
: 'argv ( -- a ) 'sys 9 cells + ;
|
||||
: argc ( -- n ) 'argc @ ;
|
||||
: argv ( n -- a n ) cells 'argv @ + @ z>s ;
|
||||
|
||||
( Load Libraries )
|
||||
: xlib s" posix/xlib_test.fs" included ;
|
||||
Reference in New Issue
Block a user