Sam, On the off-chance that the snapshot I used was somehow “stale”:
I have just done a fresh racket install from git; I have 'raco pkg install -i pict3d' And retried the test. I still get the type errors. Tim On 07/09/16 16:47, Tim Brown wrote: > :-( > > Latest nightly "snapshot 6.6.0.4--2016-09-07(42f4784/a)" still throws > the error. > > Tim > > On 07/09/16 15:37, Sam Tobin-Hochstadt wrote: >> I think this is fixed in the git repository. Can you try a snapshot build >> and see if that works? >> >> Sam >> >> On Wed, Sep 7, 2016 at 10:35 AM Tim Brown <[email protected] >> <mailto:[email protected]>> wrote: >> >> Folks (Neil?), >> >> Another type issue, but this time with pict3d. >> I am trying to use the following code to display a sphere. >> But there seems to be an issue throwing up a warning. A warning >> that “will become an error in a future release”. A warning that >> also seems to be using up a lot of juice to print itself out. >> >> Has anyone any idea where to improve the type declarations to >> suppress this? >> >> ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; >> #lang typed/racket/gui >> (require pict3d) >> >> (define f (new frame% [label "T"] [width 400] [height 400])) >> >> (new pict3d-canvas% [parent f] [pict3d (sphere origin 1/2)]) >> >> (send f show #t) >> ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; >> >> Generates numerous errors of the form: >> ------------------------------------------------------------ >> cpointer?: contract violation >> any-wrap/c: Unable to protect opaque value passed as `Any` >> value: #<cpointer> >> This warning will become an error in a future release. >> in: the 1st argument of >> a part of the or/c of >> (or/c >> struct-predicate-procedure?/c >> (-> Any boolean?)) >> contract from: (interface for cpointer?) >> blaming: <pkgs>/pict3d/typed/opengl/ffi-types.rkt >> (assuming the contract is correct) >> at: <pkgs>/pict3d/typed/opengl/ffi-types.rkt:19.20 >> ------------------------------------------------------------ >> >> ffi-types.rkt:19 is: >> .. >> 17 (require/typed >> 18 ffi/unsafe >> *19 [#:opaque CPointer cpointer?] ; includes Bytes and other things >> that can be used as cpointers >> 20 [#:opaque CType ctype?] >> 21 ) >> .. >> which seems perfectly innocuous to me :-/ >> >> Tim -- Tim Brown CEng MBCS <[email protected]> ━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━ City Computing Limited · www.cityc.co.uk City House · Sutton Park Rd · Sutton · Surrey · SM1 2AE · GB T:+44 20 8770 2110 · F:+44 20 8770 2130 ──────────────────────────────────────────────────────────────────────── City Computing Limited registered in London No:1767817. Registered Office: City House, Sutton Park Road, Sutton, Surrey, SM1 2AE VAT No: GB 918 4680 96 -- You received this message because you are subscribed to the Google Groups "Racket Users" group. To unsubscribe from this group and stop receiving emails from it, send an email to [email protected]. For more options, visit https://groups.google.com/d/optout.
