fast.spl improvements
This commit is contained in:
parent
5c8875eb55
commit
1b1855fe5a
3 changed files with 5 additions and 3 deletions
|
@ -33,8 +33,10 @@ func $ { v | env:get }
|
|||
func . { | output }
|
||||
func ex { | with s ; [ ^sh ^-c s ] command-wait; }
|
||||
func ex% { | command-wait; }
|
||||
func ex. { | with s ; [ ^sh ^-c s ] StreamTypes:cmd:create:read-to-end<1024 16 *> }
|
||||
func ex%. { | StreamTypes:cmd:create:read-to-end<1024 16 *> }
|
||||
func into { | with input file ;
|
||||
input gettype any<[ / "array" eq \ / "bytearray" eq \ ]> not if { input _str:to-bytes =input }
|
||||
input gettype any<[ { | "array" eq } { | "bytearray" eq } ]> not if { input _str:to-bytes =input }
|
||||
file 1 StreamTypes:file:create
|
||||
dup :write-exact;<input>
|
||||
:close;
|
||||
|
|
|
@ -3,7 +3,8 @@
|
|||
|
||||
func main { mega | with args ;
|
||||
"Welcome to the SPL REPL!" println
|
||||
"Enter any code after the cursor to execute it.\nfast.spl (for shell-like functions) is included.\n" println
|
||||
"Enter any code after the cursor to execute it." println
|
||||
"fast.spl (for shell-like functions) is included.\n" println
|
||||
|
||||
"REPL" =program-name
|
||||
while { 1 } {
|
||||
|
|
1
test.txt
1
test.txt
|
@ -1 +0,0 @@
|
|||
hi
|
Loading…
Add table
Reference in a new issue