diff options
Diffstat (limited to 'module/language/cps/dce.scm')
| -rw-r--r-- | module/language/cps/dce.scm | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/module/language/cps/dce.scm b/module/language/cps/dce.scm index 6fc885e7f..3d0d1e972 100644 --- a/module/language/cps/dce.scm +++ b/module/language/cps/dce.scm @@ -191,6 +191,7 @@ sites." (match exp (($ $primcall (or 'scm-set! 'scm-set!/tag 'scm-set!/immediate + 'tagged-scm-set!/immediate 'word-set! 'word-set!/immediate) _ (obj . _)) (or (var-live? obj live-vars) |