[perl #22706] IMCC ( Parrot) crash with -t when invoke is run

[Ron Blaschke via RT]

Can't reproduce, seems to pass Cinvoke call.  Should be closed.


.sub _main # void win32_setup(void)
loadlib P1, kernel32.dll
dlfunc P0, P1, GetStdHandle, pi
set I0, 1
set I5, -11
invoke # Will crash here.
store_global kernel32, P1
store_global Win32handle, P5
end
.end

C:\parrotparrot -t targ_test.imc
 0 loadlib P1, kernel32.dll   -
P1=RetContinuation=PMC(0x627998 Adr:0x0),
 3 dlfunc P0, P1, GetStdHandle, pi  - P0=PMCNULL,
P1=ParrotLibrary=PMC(0x627980), ,
 8 set I0, 1- I0=0,
11 set I5, -11  - I5=0,
14 invoke
15 store_global kernel32, P1  - , P1=ParrotLibrary=PMC(0x627980)
18 store_global Win32handle, P5   - , P5=UnManagedStruct=PMC(0x6278f0)
21 end

Re: [perl #22706] IMCC ( Parrot) crash with -t when invoke is run

[Leopold Toetsch]

Clinton Pierce wrote:

Clarification:

running an invoke() at *any* time will cause all subsequent tracing to segfault. 


I can't reproduce that on Linux (even with Dan's patch not applied yet).

leo

Re: [perl #22706] IMCC ( Parrot) crash with -t when invoke is run

[Leopold Toetsch]

Clinton Pierce [EMAIL PROTECTED] wrote:
 I checked in a fix for something that *may* have fixed this, but I'm
 not sure as I can't test it out at the moment. Try sync'ing up to CVS
 and giving it another whirl.

 Still no luck.  No luck either in getting a stack trace to the problem.

 This may just be a quirk in MSVS.NET.  I can't get the vcdg (debug) version of the 
 program to run beyond:

 func(INTERP, SELF);  // -- here

Strange. Parrot_jit_build_call_func() even does emit a stack frame. Can
you single step through it in assembly mode?

leo

Re: [perl #22706] IMCC ( Parrot) crash with -t when invoke is run

[Clinton Pierce]

Clarification:

running an invoke() at *any* time will cause all subsequent tracing to segfault.  Thus 
(pseudoPASM):

loadlib 
dlfunc 
invoke
trace 1
end

Will cause the segfault.

 Original Message-
 From: Clinton A. Pierce (via RT) [EMAIL PROTECTED]
 To: [EMAIL PROTECTED]
 Date: Sun, Jun-15-2003 11:06 AM
 Subject: [perl #22706] IMCC ( Parrot) crash with -t when invoke is run
 
 # New Ticket Created by  Clinton A. Pierce 
 # Please include the string:  [perl #22706]
 # in the subject line of all future correspondence about this issue. 
 # URL: http://rt.perl.org/rt2/Ticket/Display.html?id=22706 
 
 
 Running imcc -t or parrot -t over an invoke instruction causes the programs 
 to segfault.  This happens under Win32.  I do not have a platform 
 independant example.
 
 .sub _win32_setup   # void win32_setup(void)
  saveall
  loadlib P1, kernel32.dll
  dlfunc P0, P1, GetStdHandle, pi
  set I0, 1
  set I5, -11
  invoke   # Will crash here.
  store_global kernel32, P1
  store_global Win32handle, P5
  restoreall
  ret
 .end
 
 
 
 
 
 

[perl #22706] IMCC ( Parrot) crash with -t when invoke is run

[Clinton A. Pierce]

# New Ticket Created by  Clinton A. Pierce 
# Please include the string:  [perl #22706]
# in the subject line of all future correspondence about this issue. 
# URL: http://rt.perl.org/rt2/Ticket/Display.html?id=22706 


Running imcc -t or parrot -t over an invoke instruction causes the programs 
to segfault.  This happens under Win32.  I do not have a platform 
independant example.

.sub _win32_setup   # void win32_setup(void)
 saveall
 loadlib P1, kernel32.dll
 dlfunc P0, P1, GetStdHandle, pi
 set I0, 1
 set I5, -11
 invoke # Will crash here.
 store_global kernel32, P1
 store_global Win32handle, P5
 restoreall
 ret
.end