Gauche > Archives > 2021/04/05

オプティマイザがしくじってますね
gosh> (define (f) (logior (if #f 0 1)))
f
gosh> (disasm f)
CLOSURE #<closure (f)>
=== main_code (name=f, cc=0x7f36b0d67ea0, codevec=0x7f36b0cdb580, size=4, const=0 stack=0):
signatureInfo: ((f))
     0 CONSTI(1) 
     1 LOGIORC #f               ; (logior (if #f 0 1))
     3 RET