Glenn,
I try to merge and apply your patch on 665-Fix branch this week-end.
I quick read your patch and i see this :
! #ifdef PERLWIN32GUI_GLBREAK
! printf("XS(Create): %s\n", perlcs.cs.lpszName );
! if ( perlcs.cs.lpszName
! && strcmp ( perlcs.cs.lpszName, "findlist.pl Main Window" ) == 0 )
! { __asm { int 3 };
! }
! #endif
It's a debugger breakpoint !!!!!
Some time ago, i search a way to debug a XS code whitout find.
It's very usefull, i test it and it's work great with Visual C++.
Thank for this "Tip Of The Day" ;o)
Laurent.
>
> Due to my hard drive being in the process of failing, I thought I'd
> better get this patch isolated and delivered to you, so that it won't
> get lost. Plus maybe Glenn Munroe might be able to use it, and others.
>
> Here is a description of all the changes I've made, which you can use as
> needed as comments in the change log(s). The patch.txt was generated by
> diff -r -c against the released version of 0.0.665 sources, not
> including any patches you've already applied to the CVS bugfix branch.
> I hope that works for you... if it is hard, let me know what I should
> provide instead.
...
> --
> Glenn