TODO: keep track of match branching

2020-02-25 16:16:19 -05:00 · 2020-02-25 16:16:19 -05:00 · b6c934b9f3
parent 66226ac725
commit b6c934b9f3
1 changed files with 1 additions and 0 deletions
--- a/racket/typed/core-expressions.rkt
+++ b/racket/typed/core-expressions.rkt
@ -158,6 +158,7 @@
  [⊢ (match- e- [p- s-] ...
                [_ (#%app- error- "incomplete pattern match")])
     (⇒ : (U τ-s ...))
+     ;; TODO losing branching information here
     (⇒ ν-ep (eps ... ...))
     (⇒ ν-f #,(make-Branch #'((fs ...) ...)))
     (⇒ ν-s (ss ... ...))])