suzanne.soy/racket
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Fixed the example call to have correct input

Browse Source 
svn: r1315
This commit is contained in:
Scott Owens 2005-11-14 22:08:02 +00:00
parent 73d12ea244
commit e893ea7c43
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
collects/parser-tools/examples/calc.ss
View File

@ -66,7 +66,7 @@
$3)]
[(FNCT OP exp CP) ($1 $3)]
[(exp + exp) (+ $1 $3)]
[(exp - exp) (+ $1 $3)]
[(exp - exp) (- $1 $3)]
[(exp * exp) (* $1 $3)]
[(exp / exp) (/ $1 $3)]
[(- exp) (prec NEG) (- $2)]
@ -85,4 +85,4 @@
(one-line)))))))
(one-line)))
(calc (open-input-string "(1 + 2 * 3 3) 3)\n(1.2 + 3.3) / 44 \n !"))
(calc (open-input-string "(1 + 2 * 3) - (1+2)*3"))