diff options
| author | glenda <glenda@cirno> | 2022-09-10 00:24:56 +0000 |
|---|---|---|
| committer | glenda <glenda@cirno> | 2022-09-10 00:24:56 +0000 |
| commit | d07d4afcb8acff3757394f2f9822d014f31fecf0 (patch) | |
| tree | 9cf607c5cb10621c58986b44133a1eb36d13f9e3 /runtime | |
| parent | f5ea447c9c6f1b3ddadc97dcb0057674b4dd0665 (diff) | |
Add session start file
Diffstat (limited to 'runtime')
| -rw-r--r-- | runtime/start.apl | 15 |
1 files changed, 15 insertions, 0 deletions
diff --git a/runtime/start.apl b/runtime/start.apl new file mode 100644 index 0000000..46a0703 --- /dev/null +++ b/runtime/start.apl @@ -0,0 +1,15 @@ +send←⍈ ⍝ I can't type those easily so give them names +recv←⍇ +prompt←6⍴' ' +session←{ + (task data)←{1 ⍵} recv ⍬ + ⎕rawio←{¯1≡⍵:'???:' ⋄ ⍵,':'} task ⎕tasks 1 + ⎕rawio←data + ⍞rawio←prompt + ∇⍵ +} + +⎕←'Welcome to APL9' +⍞rawio←prompt + +⎕session←session&'session'⊢⍬
\ No newline at end of file |