mirror of
https://github.com/PDP-10/its.git
synced 2026-04-20 01:34:01 +00:00
Hello world sample file for Muddle.
This commit is contained in:
13
src/hello/hello.mud
Normal file
13
src/hello/hello.mud
Normal file
@@ -0,0 +1,13 @@
|
||||
;"Hello world example for Muddle. Load this file with FLOAD to make a"
|
||||
;"HELLO SAVE file which can later be loaded into Muddle with RESTORE."
|
||||
|
||||
<DEFINE HELLO ()
|
||||
<PRINC "Hello, muddled world!">
|
||||
<TERPRI>
|
||||
<QUIT>>
|
||||
|
||||
<DEFINE SAVE-IT ()
|
||||
<COND (<=? <SAVE "HELLO SAVE"> "SAVED"> <QUIT>)>
|
||||
<HELLO>>
|
||||
|
||||
<SAVE-IT>
|
||||
Reference in New Issue
Block a user