From e9d9c2aca90d1d974d33ad5cb3cfc9c618b00ea8 Mon Sep 17 00:00:00 2001
From: Vincent St-Amour <stamourv@racket-lang.org>
Date: Fri, 23 Jul 2010 16:47:30 -0400
Subject: [PATCH] Added a test to the optimizer.

original commit: ea580e6ff88cb3be758690b99a1968179cbc3c26
---
 collects/tests/typed-scheme/optimizer/generic/let-rhs.rkt | 6 ++++++
 1 file changed, 6 insertions(+)
 create mode 100644 collects/tests/typed-scheme/optimizer/generic/let-rhs.rkt

diff --git a/collects/tests/typed-scheme/optimizer/generic/let-rhs.rkt b/collects/tests/typed-scheme/optimizer/generic/let-rhs.rkt
new file mode 100644
index 00000000..e9f58d5d
--- /dev/null
+++ b/collects/tests/typed-scheme/optimizer/generic/let-rhs.rkt
@@ -0,0 +1,6 @@
+#lang typed/scheme #:optimize
+
+(require racket/unsafe/ops)
+
+(let ((x (+ 1.0 2.0)))
+  x)