HCoop / bpt / guile.git / commit
? search:
summary | shortlog | log | commit | commitdiff | tree
(parent: 2446f8e) | patch
Don't simplify 'equal?' to 'eq?' when constant is an *inexact* small integer.
authorMark H Weaver <mhw@netris.org>
Mon, 8 Oct 2012 03:57:13 +0000 (23:57 -0400)
committerMark H Weaver <mhw@netris.org>
Mon, 8 Oct 2012 03:57:13 +0000 (23:57 -0400)
commitebd363161ef533833fc48c3389075bf4db7ebe17
tree982d30ea99212a8b22f17a8916b1fcb16455ee82tree | snapshot (tar.gz zip)
parent2446f8e126d9a7c145c4868f2a918d2dfb226d4ecommit | diff
Don't simplify 'equal?' to 'eq?' when constant is an *inexact* small integer.

* module/language/tree-il/primitives.scm (*primitive-expand-table*):
  Refine test for fixnums to verify that the small integer is exact.

* test-suite/tests/tree-il.test ("primitives"): Add test.
module/language/tree-il/primitives.scm diff | blob | blame | history
test-suite/tests/tree-il.test diff | blob | blame | history
Unnamed repository; edit this file 'description' to name the repository.