Re: [xsubpp PATCH 5.005_63]

[jarausch@igpm.rwth-aachen.de]

Sorry for the noise, but my previous two patches didn't cure the right
point.

Hopefully this one does (apply it 5.005_63 + Sarathy's  patch 4731)

*** perl5.005_63_ORIG/lib/ExtUtils/xsubpp	Fri Dec 31 10:31:46 1999
--- perl5.005_63_P/lib/ExtUtils/xsubpp	Wed Jan 12 15:22:41 2000
***************
*** 995,1001 ****
      %XsubAliases = %XsubAliasValues = %Interfaces = ();
      $DoSetMagic = 1;
  
!     @args = split(/\s*,\s*/, $orig_args);
      if (defined($class)) {
  	my $arg0 = ((defined($static) or $func_name eq 'new')
  		    ? "CLASS" : "THIS");
--- 995,1003 ----
      %XsubAliases = %XsubAliasValues = %Interfaces = ();
      $DoSetMagic = 1;
  
!     my $temp_args = $orig_args;
!     $temp_args =~ s/\\\s*//g;
!     @args = split(/\s*,\s*/, $temp_args);
      if (defined($class)) {
  	my $arg0 = ((defined($static) or $func_name eq 'new')
  		    ? "CLASS" : "THIS");

-- 
Helmut Jarausch
Lehrstuhl fuer Numerische Mathematik
Institute of Technology, RWTH Aachen
D 52056 Aachen, Germany

---

[Date Prev][Date Next] [Thread Prev][Thread Next] [Date Index][Thread Index][Top&Search][Original]

---