summaryrefslogtreecommitdiff
path: root/book/examples/chapter4/ClothesEng.gf
diff options
context:
space:
mode:
Diffstat (limited to 'book/examples/chapter4/ClothesEng.gf')
-rw-r--r--book/examples/chapter4/ClothesEng.gf10
1 files changed, 10 insertions, 0 deletions
diff --git a/book/examples/chapter4/ClothesEng.gf b/book/examples/chapter4/ClothesEng.gf
new file mode 100644
index 000000000..d45a8ce30
--- /dev/null
+++ b/book/examples/chapter4/ClothesEng.gf
@@ -0,0 +1,10 @@
+--# -path=.:present
+
+concrete ClothesEng of Clothes = CommentsEng **
+ open SyntaxEng, ParadigmsEng in {
+ lin
+ Shirt = mkCN (mkN "shirt") ;
+ Jacket = mkCN (mkN "jacket") ;
+ Comfortable = mkAP (mkA "comfortable") ;
+ Elegant = mkAP (mkA "elega") ;
+}