diff options
Diffstat (limited to 'module/language/tree-il/effects.scm')
-rw-r--r-- | module/language/tree-il/effects.scm | 4 |
1 files changed, 0 insertions, 4 deletions
diff --git a/module/language/tree-il/effects.scm b/module/language/tree-il/effects.scm index b9b34a11c..170c89669 100644 --- a/module/language/tree-il/effects.scm +++ b/module/language/tree-il/effects.scm @@ -211,10 +211,6 @@ of an expression." (logior (compute-effects producer) (compute-effects consumer) (cause &type-check))) - (($ <dynwind> _ winder body unwinder) - (logior (compute-effects winder) - (compute-effects body) - (compute-effects unwinder))) (($ <dynlet> _ fluids vals body) (logior (accumulate-effects fluids) (accumulate-effects vals) |