GitHub/gf-core
1
0
Fork 1
mirror of https://github.com/GrammaticalFramework/gf-core.git synced 2026-05-17 23:22:51 -06:00
Code Issues Packages Projects Releases Wiki Activity

started a subdir for the book

Browse Source
This commit is contained in:
aarne
2010-11-22 12:55:37 +00:00
parent 8ab5ec00c6
commit 46137ab6a6
97 changed files with 2026 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

11
book/examples/chapter8/CalculatorS.gf Normal file
View File

@@ -0,0 +1,11 @@
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") ;
}