diff options
| author |  Adam Chlipala <adamc@hcoop.net> | 2009-10-25 12:48:50 -0400 |
|---|---|---|
| committer | Adam Chlipala <adamc@hcoop.net> | 2009-10-25 12:48:50 -0400 |
| commit | 8d179338f320dfc2b7d6a23204cf1ae90f4898ba (patch) | |
| tree | 44283631b960a77b7f9f11b5a0795b4604b75a35 /src/unnest.sml | |
| parent | d04337d2e0319d56ac5f7ed2b4d431cb56017bb5 (diff) | |
Inlining threshold for Mono_reduce
Diffstat (limited to 'src/unnest.sml')
| -rw-r--r-- | src/unnest.sml | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/unnest.sml b/src/unnest.sml index e0245c6f..a4bdb7a9 100644 --- a/src/unnest.sml +++ b/src/unnest.sml @@ -339,7 +339,7 @@ fun exp ((ks, ts), e as old, st : state) = (*Print.prefaces "Have a vi" [("x", Print.PD.string x), ("e", ElabPrint.p_exp ElabEnv.empty e)];*) - (x, n, t, e) + ("$" ^ x, n, t, e) end) vis |