diff options
author | Camil Staps | 2017-07-25 12:00:16 +0200 |
---|---|---|
committer | Camil Staps | 2017-07-25 12:00:16 +0200 |
commit | dbb6669308de538ef479f69836763fa5834c2b59 (patch) | |
tree | 9ef19df0833ba934cc383f0165d21de7ace5c330 /Sil | |
parent | Resolve #6: check return type (diff) |
Fix erroneous change
Diffstat (limited to 'Sil')
-rw-r--r-- | Sil/Compile.icl | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/Sil/Compile.icl b/Sil/Compile.icl index 3f1059f..2cc6e01 100644 --- a/Sil/Compile.icl +++ b/Sil/Compile.icl @@ -360,7 +360,7 @@ where updateReturnFrame :: TypeSize (Int, Int) -> Gen () updateReturnFrame {asize=0,bsize=0} _ = nop updateReturnFrame {bsize=0} (aso, _) = tell ['ABC'.Update_a 0 (aso-1), 'ABC'.Pop_a 1] // TODO should depend on return type - updateReturnFrame _ (_, bso) = tell ['ABC'.Update_b 0 (bso-1), 'ABC'.Pop_b 1] // TODO should depend on return type + updateReturnFrame _ (_, bso) = tell ['ABC'.Update_b 0 (bso-1)] // TODO should depend on return type gen (Return Nothing) = comment "Return" *> cleanup *> |