diff options
| author |  Adam Chlipala <adamc@hcoop.net> | 2008-11-01 15:58:55 -0400 |
|---|---|---|
| committer | Adam Chlipala <adamc@hcoop.net> | 2008-11-01 15:58:55 -0400 |
| commit | cfb8ffaf94885d8dc1b492a050830a9b4ffc3d04 (patch) | |
| tree | f4112230acc95c284530da52a823ff9b88516349 /src/termination.sml | |
| parent | 3f497272d327fea2638006c751d812dbbc449c78 (diff) | |
First Unnest tests working
Diffstat (limited to 'src/termination.sml')
| -rw-r--r-- | src/termination.sml | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/src/termination.sml b/src/termination.sml index b0716eca..6ed4d92f 100644 --- a/src/termination.sml +++ b/src/termination.sml @@ -292,6 +292,8 @@ fun declOk' env (d, loc) = | EError => (Rabble, calls) | EUnif (ref (SOME e)) => exp parent (penv, calls) e | EUnif (ref NONE) => (Rabble, calls) + + | ELet (_, e) => exp parent (penv, calls) e end fun doVali (i, (_, f, _, e), calls) = |