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)