diff options
| author |  Ziv Scully <ziv@mit.edu> | 2015-09-27 14:46:12 -0400 |
|---|---|---|
| committer | Ziv Scully <ziv@mit.edu> | 2015-09-27 14:46:12 -0400 |
| commit | 067c8cd3b908eb057f6721453a5c3801965d43b8 (patch) | |
| tree | f8bdebe6465d17dcf3ae8e2fbd745b9d66d35747 /src/mono_env.sml | |
| parent | f8d7c70d8f52003e14a66144a48bb4f06a1c185f (diff) | |
Use referenced (rather than all) free variables as keys for pure caches.
Diffstat (limited to 'src/mono_env.sml')
| -rw-r--r-- | src/mono_env.sml | 2 |
1 files changed, 0 insertions, 2 deletions
diff --git a/src/mono_env.sml b/src/mono_env.sml index 8617425e..52e07893 100644 --- a/src/mono_env.sml +++ b/src/mono_env.sml @@ -108,8 +108,6 @@ fun lookupERel (env : env) n = (List.nth (#relE env, n)) handle Subscript => raise UnboundRel n -fun typeContext (env : env) = map #2 (#relE env) - fun pushENamed (env : env) x n t eo s = {datatypes = #datatypes env, constructors = #constructors env, |