~thon/thon

ref: 6b703e40af6cf5c5a855a4e217e91c9fd252fa4b thon/elaborate.sml -rw-r--r-- 261 bytes
6b703e40Evan Bergeron Fix 9 months ago
                                                                                
1
2
3
4
5
6
7
8
9
10
11
structure Elaborate : sig
              val elaborate : Ast.Exp -> Ast.Exp
          end =
struct
fun elaborate ast =
    let
        val datatypeNameToType = HashTable.mkTable (HashString.hashString, op=) (42, Fail "not found");
    in
        ast
    end
end