suzanne.soy/typed-racket
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Added one more test for unboxed let bindings.

Browse Source 
original commit: ec39ea5f3352068497a97c959e72814fab7089d0
This commit is contained in:
Vincent St-Amour 2010-07-24 17:01:07 -04:00
parent ea0d96e9dd
commit a248746a2d
1 changed files with 7 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
collects/tests/typed-scheme/optimizer/generic/unboxed-let2.rkt Normal file
View File

@ -0,0 +1,7 @@
#lang typed/scheme #:optimize
(require racket/unsafe/ops)
(let ((t1 (+ 1.0+2.0i 2.0+4.0i))
(t2 (+ 3.0+6.0i 4.0+8.0i)))
(+ t1 t2))