syntax/parse: nullability analysis improvement

An S-pattern used as an H-pattern is not nullable.
This commit is contained in:
Ryan Culpepper 2016-07-31 22:59:45 -04:00
parent 2e96b60120
commit 9bf30e0977

View File

@ -490,6 +490,7 @@ A RepConstraint is one of
[(hpat:commit hp) (hpat-nullable hp)] [(hpat:commit hp) (hpat-nullable hp)]
[(hpat:ord hp _ _) (hpat-nullable hp)] [(hpat:ord hp _ _) (hpat-nullable hp)]
[(hpat:post hp) (hpat-nullable hp)] [(hpat:post hp) (hpat-nullable hp)]
[(? pattern? hp) 'no]
[_ 'unknown])) [_ 'unknown]))
;; ehpat-nullable : EllipsisHeadPattern -> AbsNullable ;; ehpat-nullable : EllipsisHeadPattern -> AbsNullable