Stacken/c64-livecoding
6
0
Fork 0
Code Issues 1 Pull requests Projects Releases Packages Wiki Activity Actions

Comment out incorrect optimization

Browse source
This commit is contained in:
John Lorentzson 2025-07-17 19:02:37 +02:00
parent 8fe1c85a40
commit c2fde9fdd0
1 changed files with 1 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

1
wip-duuqnd/user-side-compiler/middle/optimizations.lisp
View file

@ -154,6 +154,7 @@ though I'm pretty sure it can't anyway.")
(flet ((arg-duplicates-p (a b)
(or (and (ir-constant-p a) (ir-constant-p b)
(eql (ir-constant-value a) (ir-constant-value b)))
#+(or)
(and (typep a 'ir-fetchvar) (typep b 'ir-fetchvar)
(eql (input (definition a)) (input (definition b)))))))
(dolist (call calls)