Compiler error due to range interaction with negative infinity

Bug #2052866 reported by Paul F. Dietz
6
This bug affects 1 person
Affects Status Importance Assigned to Milestone
SBCL
Fix Committed
Undecided
Unassigned

Bug Description

(lambda (x y) (subseq y (1+ (or (position 'a x) #.sb-ext:double-float-negative-infinity))))

==>

Can't decode NaN or infinity: #.SB-EXT:DOUBLE-FLOAT-NEGATIVE-INFINITY.
   [Condition of type SIMPLE-ERROR]

Restarts:
 0: [RETRY] Retry SLIME REPL evaluation request.
 1: [*ABORT] Return to SLIME's top level.
 2: [ABORT] abort thread (#<THREAD tid=16699 "repl-thread" RUNNING {1001128003}>)

Backtrace:
  0: (SB-KERNEL:UNARY-TRUNCATE-DOUBLE-FLOAT-TO-BIGNUM #.SB-EXT:DOUBLE-FLOAT-NEGATIVE-INFINITY)
  1: (SB-C::NUMERIC-TYPE->INTERVAL #<SB-KERNEL:NUMERIC-TYPE (DOUBLE-FLOAT #.SB-EXT:DOUBLE-FLOAT-NEGATIVE-INFINITY #.SB-EXT:DOUBLE-FLOAT-NEGATIVE-INFINITY)> T)
  2: (SB-C::TYPE-APPROXIMATE-INTERVAL #<SB-KERNEL:UNION-TYPE (OR (MOD 17592186044415) (DOUBLE-FLOAT #.SB-EXT:DOUBLE-FLOAT-NEGATIVE-INFINITY #.SB-EXT:DOUBLE-FLOAT-NEGATIVE-INFINITY))> T)
  3: ((FLET SB-ALIEN:INT :IN SB-C::+-CONSTRAINT-PROPAGATE-BACK-OPTIMIZER) #S(SB-C::INTERVAL :LOW 1 :HIGH 17592186044415) #<SB-C::LVAR 1 {1007844E93}> #<SB-C::LVAR 2 {1007844FD3}>)
  4: (SB-C::+-CONSTRAINT-PROPAGATE-BACK-OPTIMIZER #<SB-C::COMBINATION :FUN #<SB-C::REF :LEAF #<SB-C::GLOBAL-VAR :%SOURCE-NAME + :TYPE #1=#<SB-KERNEL:FUN-TYPE #> :DEFINED-TYPE #1# :WHERE-FROM :DECLARED :KI..
  5: (SB-C::CONSTRAINT-PROPAGATE-IN-BLOCK #<SB-C::CBLOCK 3 :START c4 {1007846213}> #S(SB-C::CONSET :VECTOR #*1111111000100000 :MIN 0 :MAX 11) T)
  6: (SB-C::FIND-BLOCK-TYPE-CONSTRAINTS #<SB-C::CBLOCK 3 :START c4 {1007846213}> T)
  7: (SB-C::FIND-AND-PROPAGATE-CONSTRAINTS #<SB-C:COMPONENT :NAME "<unknown>" {1007846503}>)
  8: (SB-C::CONSTRAINT-PROPAGATE #<SB-C:COMPONENT :NAME "<unknown>" {1007846503}>)
  9: (SB-C::IR1-OPTIMIZE-PHASE-1 #<SB-C:COMPONENT :NAME "<unknown>" {1007846503}>)
 10: (SB-C::IR1-PHASES #<SB-C:COMPONENT :NAME "<unknown>" {1007846503}>)
 11: (SB-C::COMPILE-COMPONENT #<SB-C:COMPONENT :NAME "<unknown>" {1007846503}>)
 12: (SB-C::%COMPILE (LAMBDA (X Y) (SUBSEQ Y (1+ #))) NIL NIL)
[...]

x86-64, "2.4.1.123-37358cdb1"

Stas Boukarev (stassats)
Changed in sbcl:
status: New → Fix Committed
To post a comment you must log in.
This report contains Public information  
Everyone can see this information.

Other bug subscribers

Remote bug watches

Bug watches keep track of this bug in other bug trackers.