Fixed the example call to have correct input

svn: r1315

original commit: e893ea7c431c691d5e9c4b39dc857633bfef3775
tokens
Scott Owens 19 years ago
parent 0869df1b8f
commit ae179c451c

@ -66,7 +66,7 @@
$3)] $3)]
[(FNCT OP exp CP) ($1 $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 * exp) (* $1 $3)]
[(exp / exp) (/ $1 $3)] [(exp / exp) (/ $1 $3)]
[(- exp) (prec NEG) (- $2)] [(- exp) (prec NEG) (- $2)]
@ -85,4 +85,4 @@
(one-line))))))) (one-line)))))))
(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"))

Loading…
Cancel
Save