diff options
Diffstat (limited to 'module/language/tree-il/cse.scm')
-rw-r--r-- | module/language/tree-il/cse.scm | 5 |
1 files changed, 0 insertions, 5 deletions
diff --git a/module/language/tree-il/cse.scm b/module/language/tree-il/cse.scm index 5648e701c..ffddc1934 100644 --- a/module/language/tree-il/cse.scm +++ b/module/language/tree-il/cse.scm @@ -449,11 +449,6 @@ env ctx))) (return (make-dynlet src fluids vals body) (concat db*** (concat db** db*))))) - (($ <dynset> src fluid exp) - (let*-values (((fluid db*) (visit fluid db env 'value)) - ((exp db**) (visit exp db env 'value))) - (return (make-dynset src fluid exp) - (concat db** db*)))) (($ <toplevel-ref>) (return exp vlist-null)) (($ <module-ref>) |