diff options
Diffstat (limited to 'old-examples/peacekeeping/PeaceRes.gf')
| -rw-r--r-- | old-examples/peacekeeping/PeaceRes.gf | 11 |
1 files changed, 11 insertions, 0 deletions
diff --git a/old-examples/peacekeeping/PeaceRes.gf b/old-examples/peacekeeping/PeaceRes.gf new file mode 100644 index 000000000..52d77ce3b --- /dev/null +++ b/old-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 |