diff options
| author | bjorn <bjorn@bringert.net> | 2008-08-15 20:21:12 +0000 |
|---|---|---|
| committer | bjorn <bjorn@bringert.net> | 2008-08-15 20:21:12 +0000 |
| commit | 137133b742f38c76d2354047ecc9d4af88826d42 (patch) | |
| tree | 40b29781c11c6c9effd89c08ce7d6501a1bdedd0 /examples/peacekeeping/PeaceRes.gf | |
| parent | 66c927937ad8ba4055a30c87c4455186535804dd (diff) | |
Added peacekeeping example back in. Doesn't compile yet.
Diffstat (limited to 'examples/peacekeeping/PeaceRes.gf')
| -rw-r--r-- | examples/peacekeeping/PeaceRes.gf | 11 |
1 files changed, 11 insertions, 0 deletions
diff --git a/examples/peacekeeping/PeaceRes.gf b/examples/peacekeeping/PeaceRes.gf new file mode 100644 index 000000000..52d77ce3b --- /dev/null +++ b/examples/peacekeeping/PeaceRes.gf @@ -0,0 +1,11 @@ +resource PeaceRes = { + + param Punct = FullStop | QuestMark | ExclMark ; + + oper + stop, quest, excl : Str -> { s : Str; p : Punct } ; + stop x = { s = x; p = FullStop } ; + quest x = { s = x; p = QuestMark } ; + excl x = { s = x; p = ExclMark } ; + +}
\ No newline at end of file |