10 lines
171 B
Standard ML
10 lines
171 B
Standard ML
|
signature TABLE =
|
||
|
|
sig
|
||
|
|
type key
|
||
|
|
type 'a table
|
||
|
|
val empty : 'a table
|
||
|
|
val enter : 'a table * key * 'a -> 'a table
|
||
|
|
val look : 'a table * key -> 'a option
|
||
|
|
end
|
||
|
|
|