summaryrefslogtreecommitdiff
path: root/src/elab_env.sml
diff options
context:
space:
mode:
authorGravatar Adam Chlipala <adam@chlipala.net>2012-07-29 12:27:13 -0400
committerGravatar Adam Chlipala <adam@chlipala.net>2012-07-29 12:27:13 -0400
commit4211ec9bd6e9d8172f74cdb56a1207fc1d64990f (patch)
tree64d9ddce82db685341ff2fa640f4accad0ecfbdc /src/elab_env.sml
parentdff81b1a774536c0da5e9650855dfbfc37101419 (diff)
Remove 'class' declaration; now use 'con' instead
Diffstat (limited to 'src/elab_env.sml')
-rw-r--r--src/elab_env.sml7
1 files changed, 0 insertions, 7 deletions
diff --git a/src/elab_env.sml b/src/elab_env.sml
index f31804f2..5d684817 100644
--- a/src/elab_env.sml
+++ b/src/elab_env.sml
@@ -1647,13 +1647,6 @@ fun declBinds env (d, loc) =
in
pushENamedAs env x n ct
end
- | DClass (x, n, k, c) =>
- let
- val k = (KArrow (k, (KType, loc)), loc)
- val env = pushCNamedAs env x n k (SOME c)
- in
- pushClass env n
- end
| DDatabase _ => env
| DCookie (tn, x, n, c) =>
let