stlc-dll: rename infer- and check-

1 files changed, 2 insertions, 0 deletions

diff --git a/lib.rkt b/lib.rkt
index 72f93ad..6d431fd 100644
--- a/lib.rkt
+++ b/lib.rkt
@@ -94,6 +94,8 @@
       (desugar `((λ (,id : (,a → ,b)) ,in) (λ (,x : ,a) ,e)))]
     [`(let (,id : (,a → ,b)) (λ ,x ,e) ,in)
       (desugar `((λ (,id : (,a → ,b)) ,in) (λ (,x : ,a) ,e)))]
+    [`(let ,x (,e : ,t) ,in)
+      (desugar `((λ (,x : ,t) ,in) ,e))]
     [`(let ,x ,e ,in)
       (desugar `((λ ,x ,in) ,e))]
     [`(let ,x ,e)