Added version info output to Hello Forth World script and
made initial pass at outputing command line arguments.
This commit is contained in:
parent
f09f508324
commit
fdbb99aeeb
1 changed files with 11 additions and 1 deletions
|
|
@ -3,5 +3,15 @@
|
|||
\ Sample Hello World! Forth script...
|
||||
\
|
||||
|
||||
.( Hello Forth World! ) cr
|
||||
: verinfo s" git describe --abbrev=7 --dirty --always --tags" system ;
|
||||
|
||||
\ Obligatory Hello World with some version info
|
||||
.( Hello Forth World! Version: ) verinfo cr
|
||||
|
||||
\ Show list of command line arguments
|
||||
: printargs
|
||||
argc @ 0 do i arg type cr loop ;
|
||||
.( Command line args: ) cr
|
||||
printargs
|
||||
|
||||
bye
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue