d6
/
modal
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Made printing routines postfix

This commit is contained in:
Devine Lu Linvega 2024-04-11 17:20:35 -07:00
parent e67d30d8f3
commit bf7b3f42f6
1 changed files with 4 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
examples/tictactoe.modal
View File

@ -5,9 +5,9 @@
-- (Print) -- (Print)
<> (put-str ?:) (?:) <> (?: put-str) (?:)
<> (put-row (?0 ?1 ?2)) (put-str ?0 put-str | put-str ?1 put-str | put-str ?2 put-str \n) <> ((?0 ?1 ?2) put-row) (?0 put-str | put-str ?1 put-str | put-str ?2 put-str \n put-str)
<> ((?a ?b ?c) display) (put-row ?a put-row ?b put-row ?c put-str \n (?a ?b ?c)) <> ((?a ?b ?c) display) (?a put-row ?b put-row ?c put-row \n put-str (?a ?b ?c))
-- (Validation) -- (Validation)
@ -36,7 +36,7 @@
<> (ready) (display READ play) <> (ready) (display READ play)
<> (?x run wait) (READ play) <> (?x run wait) (READ play)
<> (?x victory) (put-str (?x wins!\n)) <> (?x victory) ((?x wins!\n) put-str)
-- (Interface) -- (Interface)