For this particular project, MrEd-Designer will crash as the frame is being created for display. Usually this is after some sort of 'major' change where MED cannot simply tweak the existing display (e.g. after some sort of delete from or paste into the widget hierarchy rather than some change to a widget's properties). Once MED crashed as the project was being loaded and was about to be displayed for the first time (i.e. even before any changes at all could be made). I will create a test project and see if I can get some sort of edit sequence to readily replicate the problem. Cheers, Kieron. <div class="gmail_quote">On Mon, Jun 18, 2012 at 7:26 AM, Laurent <<a href="mailto:laurent.orseau@gmail.com" target="_blank">laurent.orseau@gmail.com</a>> wrote: <blockquote class="gmail_quote" style="margin:0 0 0 .8ex;border-left:1px #ccc solid;padding-left:1ex">Hi Kieron, As is, I can't do much on the MrEd Designer side, but maybe Matthew will have a much better understanding of what the problem is on the Racket side with the below information (there's nothing here that says where the bug might appear in MED, as you noticed). If possible, try to reduce your project to a minimalist one where the bug still appears, then send it to me. Does the bug appear when you do nothing? If not, what actions do you do before it appears? Does simply loading the project make the bug appear? Cheers, Laurent <div class="gmail_quote"><div><div class="h5">On Mon, Jun 18, 2012 at 8:24 AM, Kieron Hardy <<a href="mailto:kieron.hardy@gmail.com" target="_blank">kieron.hardy@gmail.com</a>> wrote: </div></div><blockquote class="gmail_quote" style="margin:0 0 0 .8ex;border-left:1px #ccc solid;padding-left:1ex"><div><div class="h5">Hi all, On Windows Vista (64-bit on quad-core CPU), MrEd-Designer randomly crashes when working on a large and somewhat complex UI. At the command prompt I get a trace, and the last one included: ptr-ref: contract violation expected: (and/c cpointer? (not/c (lambda (p) (pointer-equal? p #f)))) given: #f argument position: 1st other arguments: #<ctype:scheme> context: ...\collects\mred\private\wx\win32\wndclass.rkt:43:0: set-hwnd-wx! ...\collects\racket\private\class-internal.rkt:<a href="tel:3960" value="+333960" target="_blank">3960</a>:0: continue-make-object ...\collects\mred\private\wx\win32\panel.rkt:16:2 ...\collects\racket\private\class-internal.rkt:<a href="tel:3960" value="+333960" target="_blank">3960</a>:0: continue-make-object ...\collects\mred\private\wx\win32\panel.rkt:98:2 ...\collects\racket\private\class-internal.rkt:<a href="tel:3960" value="+333960" target="_blank">3960</a>:0: continue-make-object ...\collects\mred\private\wxwindow.rkt:14:6 ...\collects\racket\private\class-internal.rkt:<a href="tel:3960" value="+333960" target="_blank">3960</a>:0: continue-make-object ...\collects\mred\private\wxitem.rkt:34:6 ...\collects\racket\private\class-internal.rkt:<a href="tel:3960" value="+333960" target="_blank">3960</a>:0: continue-make-object ...\collects\mred\private\wxpanel.rkt:69:4 ...\collects\racket\private\class-internal.rkt:<a href="tel:3960" value="+333960" target="_blank">3960</a>:0: continue-make-object ...\collects\racket\private\class-internal.rkt:<a href="tel:3960" value="+333960" target="_blank">3960</a>:0: continue-make-object ...\collects\racket\private\class-internal.rkt:<a href="tel:3960" value="+333960" target="_blank">3960</a>:0: continue-make-object ...\collects\racket\private\class-internal.rkt:<a href="tel:3960" value="+333960" target="_blank">3960</a>:0: continue-make-object ...\collects\racket\private\class-internal.rkt:<a href="tel:3960" value="+333960" target="_blank">3960</a>:0: continue-make-object... Where wndclass.rkt contains: (define (set-hwnd-wx! hwnd wx) (let* ([c (GetWindowLongPtrW hwnd GWLP_USERDATA)] [v (ptr-ref c _racket)]) (vector-set! v 0 (make-weak-box wx)))) and two functions that invoke SetWindowLongPtrW GWLP_USERDATA: ;; call in atomic mode: (define (register-hwnd! hwnd) (hash-set! all-hwnds (cast hwnd _pointer _intptr) #t) (let ([c (malloc-immobile-cell (vector #f #f #f))]) (void (SetWindowLongPtrW hwnd GWLP_USERDATA c)))) and: ;; call in atomic mode: (define (unregister-hwnd! hwnd) (let ([c (GetWindowLongPtrW hwnd GWLP_USERDATA)]) (when c (free-immobile-cell c) (SetWindowLongPtrW hwnd GWLP_USERDATA #f)) (hash-remove! all-hwnds (cast hwnd _pointer _intptr)))) Since the crashes occur at random it seems likely that there is some sort of race condition (perhaps caused by the register and/or unregister functions not being called in 'atomic' mode), but my unfamiliarity with the internals of both MrEd-Designer and the GUI components of Racket leave me at a bit of a loss at how to proceed debugging this problem. Any hints or tips would be very welcome. Cheers, Kieron. </div></div>____________________ Racket Users list: <a href="http://lists.racket-lang.org/users" target="_blank">http://lists.racket-lang.org/users</a> </blockquote></div> </blockquote></div>