From 46439007cf417cbd9ac8049bb4122c890097a0fa Mon Sep 17 00:00:00 2001 From: "Charles.Forsyth" Date: Fri, 22 Dec 2006 20:52:35 +0000 Subject: 20060303-partial --- module/dict.m | 14 ++++++++++++++ 1 file changed, 14 insertions(+) create mode 100644 module/dict.m (limited to 'module/dict.m') diff --git a/module/dict.m b/module/dict.m new file mode 100644 index 00000000..c1262e6a --- /dev/null +++ b/module/dict.m @@ -0,0 +1,14 @@ +Dictionary: module { + PATH: con "/dis/lib/dict.dis"; + + Dict: adt { + entries: list of (string, string); + + add: fn( d: self ref Dict, e: (string, string) ); + delete: fn( d: self ref Dict, k: string ); + lookup: fn( d: self ref Dict, k: string ) :string; + keys: fn( d: self ref Dict ): list of string; + }; + + +}; \ No newline at end of file -- cgit v1.2.3