diff options
Diffstat (limited to 'src/especialize.sml')
-rw-r--r-- | src/especialize.sml | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/especialize.sml b/src/especialize.sml index 29cad975..a73d4064 100644 --- a/src/especialize.sml +++ b/src/especialize.sml @@ -180,7 +180,7 @@ fun calcConstArgs enclosingFunction e = in case #1 arg of ERel n => - if n = depth - 1 then + if n = depth - 1 - count then visitArgs (count + 1, args') else default () |