Fix broken tests that depended on an unsafe optimization.
This commit is contained in:
parent
4bbb1f4cd9
commit
14097dd90e
|
@ -1,4 +1,4 @@
|
|||
#lang typed/scheme
|
||||
#:optimize
|
||||
(require racket/unsafe/ops)
|
||||
(quotient (vector-length '#(1 2 3)) 2)
|
||||
(modulo (vector-length '#(1 2 3)) 2)
|
||||
|
|
|
@ -1,3 +1,3 @@
|
|||
binary-nonzero-fixnum.rkt line 4 col 11 - vector-length - vector-length
|
||||
binary-nonzero-fixnum.rkt line 4 col 1 - quotient - binary nonzero fixnum
|
||||
binary-nonzero-fixnum.rkt line 4 col 9 - vector-length - vector-length
|
||||
binary-nonzero-fixnum.rkt line 4 col 1 - modulo - binary nonzero fixnum
|
||||
1
|
||||
|
|
|
@ -1,5 +1,5 @@
|
|||
#lang typed/scheme
|
||||
#:optimize
|
||||
(require racket/unsafe/ops racket/flonum)
|
||||
(+ (quotient 1 1) 2.0)
|
||||
(+ (modulo 1 1) 2.0)
|
||||
(+ (expt 100 100) 2.0)
|
||||
|
|
|
@ -1,5 +1,5 @@
|
|||
float-promotion.rkt line 4 col 4 - quotient - binary nonzero fixnum
|
||||
float-promotion.rkt line 4 col 4 - modulo - binary nonzero fixnum
|
||||
float-promotion.rkt line 4 col 1 - + - binary float
|
||||
float-promotion.rkt line 5 col 1 - + - binary float
|
||||
3.0
|
||||
2.0
|
||||
1e+200
|
||||
|
|
|
@ -1,4 +1,4 @@
|
|||
#lang typed/scheme
|
||||
#:optimize
|
||||
(require racket/unsafe/ops)
|
||||
(+ (quotient 2 1) 1.0+2.0i 3.0+6.0i)
|
||||
(+ (modulo 2 1) 1.0+2.0i 3.0+6.0i)
|
||||
|
|
|
@ -1,8 +1,8 @@
|
|||
inexact-complex-fixnum.rkt line 4 col 4 - quotient - binary nonzero fixnum
|
||||
inexact-complex-fixnum.rkt line 4 col 4 - quotient - binary nonzero fixnum
|
||||
inexact-complex-fixnum.rkt line 4 col 3 - (#%app quotient (quote 2) (quote 1)) - float-coerce-expr in complex ops
|
||||
inexact-complex-fixnum.rkt line 4 col 18 - 1.0+2.0i - unboxed literal
|
||||
inexact-complex-fixnum.rkt line 4 col 27 - 3.0+6.0i - unboxed literal
|
||||
inexact-complex-fixnum.rkt line 4 col 4 - modulo - binary nonzero fixnum
|
||||
inexact-complex-fixnum.rkt line 4 col 4 - modulo - binary nonzero fixnum
|
||||
inexact-complex-fixnum.rkt line 4 col 3 - (#%app modulo (quote 2) (quote 1)) - float-coerce-expr in complex ops
|
||||
inexact-complex-fixnum.rkt line 4 col 16 - 1.0+2.0i - unboxed literal
|
||||
inexact-complex-fixnum.rkt line 4 col 25 - 3.0+6.0i - unboxed literal
|
||||
inexact-complex-fixnum.rkt line 4 col 1 - + - unboxed binary inexact complex
|
||||
inexact-complex-fixnum.rkt line 4 col 0 - (#%app + (#%app quotient (quote 2) (quote 1)) (quote 1.0+2.0i) (quote 3.0+6.0i)) - unboxed inexact complex
|
||||
6.0+8.0i
|
||||
inexact-complex-fixnum.rkt line 4 col 0 - (#%app + (#%app modulo (quote 2) (quote 1)) (quote 1.0+2.0i) (quote 3.0+6.0i)) - unboxed inexact complex
|
||||
4.0+8.0i
|
||||
|
|
Loading…
Reference in New Issue
Block a user