summaryrefslogtreecommitdiff
path: root/book/examples/chapter8/CalculatorS.gf
diff options
context:
space:
mode:
Diffstat (limited to 'book/examples/chapter8/CalculatorS.gf')
-rw-r--r--book/examples/chapter8/CalculatorS.gf11
1 files changed, 0 insertions, 11 deletions
diff --git a/book/examples/chapter8/CalculatorS.gf b/book/examples/chapter8/CalculatorS.gf
deleted file mode 100644
index d8c1df456..000000000
--- a/book/examples/chapter8/CalculatorS.gf
+++ /dev/null
@@ -1,11 +0,0 @@
-concrete CalculatorS of Calculator = open Prelude in {
- lin
- EPlus = infix "plus" ;
- EMinus = infix "minus" ;
- ETimes = infix "times" ;
- EDiv = infix ["divided by"] ;
- EInt i = i ;
- oper
- infix : Str -> SS -> SS -> SS = \op,x,y ->
- ss (x.s ++ op ++ y.s ++ "PAUSE") ;
-}