[plt-scheme] Copying text to MrEd's the-clipboard crashes DrScheme

Running the following in DrScheme causes is it to crash:

(module cut-and-paste mzscheme
  (provide cut-and-paste-test)
  (require (lib "mred.ss" "mred")
           (lib "class.ss"))

  (define (cut-and-paste-test)
    (let* ((f (new frame% (label "Cut And Paste Test")))
           (b (new button% (parent f) (label "Copy")
                   (callback (lambda (b e)
                               (send the-clipboard set-clipboard-string
"Hello World" 0))))))
      (send f show #t)))
  (cut-and-paste-test))


The following was in the event log:

Faulting application DrScheme.exe, version 372.0.0.0, time stamp 0x4775c396,
faulting module ntdll.dll, version 6.0.6000.16386, time stamp 0x4549bdc9,
exception code 0xc0000374, fault offset 0x000af1c9, process id 0x80c4,
application start time 0x01c88d349d2bdba5.

There's also an APPCRASH event:

Version=1
EventType=APPCRASH
EventTime=128508463997450000
ReportType=2
Consent=1
UploadTime=128508464028980000
Response.BucketId=697865926
Response.BucketTable=1
Response.type=4
Sig[0].Name=Application Name
Sig[0].Value=DrScheme.exe
Sig[1].Name=Application Version
Sig[1].Value=372.0.0.0
Sig[2].Name=Application Timestamp
Sig[2].Value=4775c396
Sig[3].Name=Fault Module Name
Sig[3].Value=StackHash_f274
Sig[4].Name=Fault Module Version
Sig[4].Value=6.0.6000.16386
Sig[5].Name=Fault Module Timestamp
Sig[5].Value=4549bdc9
Sig[6].Name=Exception Code
Sig[6].Value=c0000374
Sig[7].Name=Exception Offset
Sig[7].Value=000af1c9
DynamicSig[1].Name=OS Version
DynamicSig[1].Value=6.0.6000.2.0.0.256.6
DynamicSig[2].Name=Locale ID
DynamicSig[2].Value=1033
DynamicSig[22].Name=Additional Information 1
DynamicSig[22].Value=f274
DynamicSig[23].Name=Additional Information 2
DynamicSig[23].Value=ca7d6549edd6bedb30b1391fec00ebe3
DynamicSig[24].Name=Additional Information 3
DynamicSig[24].Value=5cd1
DynamicSig[25].Name=Additional Information 4
DynamicSig[25].Value=d9b2e2cae83ee3efa7ad319c5b2aa163
UI[2]=C:\Program Files\PLT\DrScheme.exe
UI[3]=MrEd-based application has stopped working
UI[4]=Windows can check online for a solution to the problem.
UI[5]=Check online for a solution and close the program
UI[6]=Check online for a solution later and close the program
UI[7]=Close the program
State[0].Key=Transport.DoneStage1
State[0].Value=1
State[1].Key=DataRequest
State[1].Value=Bucket=697865926/nBucketTable=1/nResponse=1/n
FriendlyEventName=Stopped working
ConsentKey=APPCRASH
AppName=MrEd-based application
AppPath=C:\Program Files\PLT\DrScheme.exe


On Mon, Mar 24, 2008 at 11:03 AM, Matthew Flatt <mflatt at cs.utah.edu> wrote:

> At Sun, 23 Mar 2008 18:31:11 -0400, "Ben Simon" wrote:
> > Consider the following MrEd code:
> >
> >  (new button%
> >     (parent controls) (label "Copy To Clipboard")
> >     (callback (lambda (button evt)
> >                 (send the-clipboard set-clipboard-string "Hello World"
> 0))))
> >
> > When I invoke this code as a stand alone .exe, it works as expected -
> Hello
> > World shows up on the system clipboared.
> >
> > When I invoke this code inside DrScheme, it causes DrScheme to
> immediately
> > crash (as in drscheme.exe dies).
> >
> > I'm running under Windows Vista - v372.
>
> I haven't been able to reproduce the problem using v372 on Vista. Can
> you send a complete program?
>
> Thanks,
> Matthew
>
>


-- 
Have an idea for software? I can make it happen -
http://www.ideas2executables.com
My Blog: http://benjisimon.blogspot.com
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://lists.racket-lang.org/users/archive/attachments/20080324/4698cf65/attachment.html>