[racket-dev] [plt] Push #28706: master branch updated

From: Matthias Felleisen (matthias at ccs.neu.edu)
Date: Thu May 8 19:17:44 EDT 2014

(We have maybe/c somewhere, and I think we should use it.) 


On May 8, 2014, at 4:19 PM, samth at racket-lang.org wrote:

> samth has updated `master' from 98ae3d8b2d to e1ab2ffcf4.
>  http://git.racket-lang.org/plt/98ae3d8b2d..e1ab2ffcf4
> 
> =====[ One Commit ]=====================================================
> Directory summary:
> 100.0% pkgs/typed-racket-pkgs/typed-racket-lib/typed-racket/infer/
> 
> ~~~~~~~~~~
> 
> e1ab2ff Sam Tobin-Hochstadt <samth at cs.indiana.edu> 2014-05-08 16:18
> :
> | Fix contract.
> |
> | First bug caught with new test.  Thanks Robby!
> :
>  M .../typed-racket-lib/typed-racket/infer/infer-unit.rkt       | 2 +-
> 
> =====[ Overall Diff ]===================================================
> 
> pkgs/typed-racket-pkgs/typed-racket-lib/typed-racket/infer/infer-unit.rkt
> ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
> --- OLD/pkgs/typed-racket-pkgs/typed-racket-lib/typed-racket/infer/infer-unit.rkt
> +++ NEW/pkgs/typed-racket-pkgs/typed-racket-lib/typed-racket/infer/infer-unit.rkt
> @@ -360,7 +360,7 @@
>    (Type/c Type/c . -> . (or/c #f cset?))
>    (cgen V X Y S T))
>   (define/cond-contract (cg/inv S T)
> -   (Type/c Type/c . -> . cset?)
> +   (Type/c Type/c . -> . (or/c #f cset?))
>    (cgen/inv V X Y S T))
>   ;; this places no constraints on any variables in X
>   (define empty (empty-cset X Y))



Posted on the dev mailing list.