summaryrefslogtreecommitdiff
path: root/examples-3.0/tutorial/hello
diff options
context:
space:
mode:
authoraarne <aarne@cs.chalmers.se>2008-06-17 13:16:15 +0000
committeraarne <aarne@cs.chalmers.se>2008-06-17 13:16:15 +0000
commit23b8136af27b0baaa8fcb5272a613d5f2ee447fa (patch)
tree2e7cd2930b7e8b6b0d911c00ec2d279b882f4893 /examples-3.0/tutorial/hello
parent7c097669d2c3934622c57f6e2f4ddee8826953d3 (diff)
started examples-3.0 with examples that are tested to work
Diffstat (limited to 'examples-3.0/tutorial/hello')
-rw-r--r--examples-3.0/tutorial/hello/Hello.gf10
-rw-r--r--examples-3.0/tutorial/hello/HelloEng.gf10
-rw-r--r--examples-3.0/tutorial/hello/HelloFin.gf10
-rw-r--r--examples-3.0/tutorial/hello/HelloIta.gf10
-rw-r--r--examples-3.0/tutorial/hello/hello.gfs4
5 files changed, 44 insertions, 0 deletions
diff --git a/examples-3.0/tutorial/hello/Hello.gf b/examples-3.0/tutorial/hello/Hello.gf
new file mode 100644
index 000000000..769be5cbf
--- /dev/null
+++ b/examples-3.0/tutorial/hello/Hello.gf
@@ -0,0 +1,10 @@
+abstract Hello = {
+
+ cat Greeting ; Recipient ;
+
+ flags startcat = Greeting ;
+
+ fun
+ Hello : Recipient -> Greeting ;
+ World, Mum, Friends : Recipient ;
+} \ No newline at end of file
diff --git a/examples-3.0/tutorial/hello/HelloEng.gf b/examples-3.0/tutorial/hello/HelloEng.gf
new file mode 100644
index 000000000..69efba6b4
--- /dev/null
+++ b/examples-3.0/tutorial/hello/HelloEng.gf
@@ -0,0 +1,10 @@
+concrete HelloEng of Hello = {
+
+ lincat Greeting, Recipient = {s : Str} ;
+
+ lin
+ Hello rec = {s = "hello" ++ rec.s} ;
+ World = {s = "world"} ;
+ Mum = {s = "mum"} ;
+ Friends = {s = "friends"} ;
+} \ No newline at end of file
diff --git a/examples-3.0/tutorial/hello/HelloFin.gf b/examples-3.0/tutorial/hello/HelloFin.gf
new file mode 100644
index 000000000..969142a91
--- /dev/null
+++ b/examples-3.0/tutorial/hello/HelloFin.gf
@@ -0,0 +1,10 @@
+concrete HelloFin of Hello = {
+
+ lincat Greeting, Recipient = {s : Str} ;
+
+ lin
+ Hello rec = {s = "terve" ++ rec.s} ;
+ World = {s = "maailma"} ;
+ Mum = {s = "äiti"} ;
+ Friends = {s = "ystävät"} ;
+} \ No newline at end of file
diff --git a/examples-3.0/tutorial/hello/HelloIta.gf b/examples-3.0/tutorial/hello/HelloIta.gf
new file mode 100644
index 000000000..f1465a867
--- /dev/null
+++ b/examples-3.0/tutorial/hello/HelloIta.gf
@@ -0,0 +1,10 @@
+concrete HelloIta of Hello = {
+
+ lincat Greeting, Recipient = {s : Str} ;
+
+ lin
+ Hello rec = {s = "ciao" ++ rec.s} ;
+ World = {s = "mondo"} ;
+ Mum = {s = "mamma"} ;
+ Friends = {s = "amici"} ;
+} \ No newline at end of file
diff --git a/examples-3.0/tutorial/hello/hello.gfs b/examples-3.0/tutorial/hello/hello.gfs
new file mode 100644
index 000000000..3a18fee52
--- /dev/null
+++ b/examples-3.0/tutorial/hello/hello.gfs
@@ -0,0 +1,4 @@
+import HelloEng.gf
+import HelloFin.gf
+import HelloIta.gf
+linearize Hello World