diff --git a/ueforth/common/boot.fs b/ueforth/common/boot.fs index 3199451..6c72c5b 100644 --- a/ueforth/common/boot.fs +++ b/ueforth/common/boot.fs @@ -1,6 +1,5 @@ : ( 41 parse drop drop ; immediate : \ 10 parse drop drop ; immediate -: #! 10 parse drop drop ; immediate \ Copyright 2021 Bradley D. Nelson \ diff --git a/ueforth/posix/posix.fs b/ueforth/posix/posix.fs index 9430f8a..5bbe5bb 100644 --- a/ueforth/posix/posix.fs +++ b/ueforth/posix/posix.fs @@ -188,5 +188,8 @@ O_RDWR constant r/w forth +( Support shebang for running in scripts. ) +: #! 10 parse drop drop ; immediate + ( Setup entry ) internals : ok ." uEforth" raw-ok ; forth