[Swig-cvs] SWIG/Source/Swig cwrap.c,1.69,1.70 parms.c,1.17,1.18

[Marcelo M. <mar...@us...>]

Update of /cvsroot/swig/SWIG/Source/Swig
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv24767/Source/Swig

Modified Files:
	cwrap.c parms.c 
Log Message:
add 'self' attribute for later use

Index: cwrap.c
===================================================================
RCS file: /cvsroot/swig/SWIG/Source/Swig/cwrap.c,v
retrieving revision 1.69
retrieving revision 1.70
diff -C2 -d -r1.69 -r1.70
*** cwrap.c	30 Nov 2005 21:32:27 -0000	1.69
--- cwrap.c	14 Dec 2005 07:26:37 -0000	1.70
***************
*** 773,776 ****
--- 773,777 ----
    SwigType_add_pointer(type);
    p = NewParm(type,"self");
+   Setattr(p,"self","1");
    Setattr(p,"hidden","1");
    /*
***************
*** 1112,1115 ****
--- 1113,1117 ----
    SwigType_add_pointer(type);
    p = NewParm(type,"self");
+   Setattr(p,"self","1");
    Setattr(p,"wrap:disown","1");
    Delete(type);
***************
*** 1191,1194 ****
--- 1193,1197 ----
    SwigType_add_pointer(t);
    parms = NewParm(t,"self");
+   Setattr(parms,"self","1");
    Delete(t);
  
***************
*** 1274,1277 ****
--- 1277,1281 ----
    SwigType_add_pointer(t);
    parms = NewParm(t,"self");
+   Setattr(parms,"self","1");
    Delete(t);
  

Index: parms.c
===================================================================
RCS file: /cvsroot/swig/SWIG/Source/Swig/parms.c,v
retrieving revision 1.17
retrieving revision 1.18
diff -C2 -d -r1.17 -r1.18
*** parms.c	29 Nov 2005 01:47:10 -0000	1.17
--- parms.c	14 Dec 2005 07:26:37 -0000	1.18
***************
*** 69,72 ****
--- 69,73 ----
    String   *byname = Getattr(p, "arg:byname");
    String   *compactdefargs = Getattr(p, "compactdefargs");
+   String   *self = Getattr(p, "self");
  
    if (t) {
***************
*** 110,113 ****
--- 111,119 ----
      Delete(str);
    }
+   if (self) {
+     String *str = Copy(self);
+     Setattr(np, "self", str);
+     Delete(str);
+   }
        
    Setfile(np,Getfile(p));