jyapayne/swig
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Fixed pointer to function bug.

Browse source 
git-svn-id: https://swig.svn.sourceforge.net/svnroot/swig/trunk/SWIG@825 626c5289-ae23-0410-ae9c-e8d60b6d4f22
This commit is contained in:
Dave Beazley 2000-09-04 02:16:17 +00:00
commit 59ec687725
1 changed files with 6 additions and 4 deletions
Download patch file Download diff file Expand all files Collapse all files

10
Source/SWIG1.1/parser.yxx
View file

@ -1095,7 +1095,8 @@ statement : INCLUDE STRING LBRACE {
p = $7; p = $7;
while (p) { while (p) {
if (strcmp($3,typemap_lang) == 0) { if (strcmp($3,typemap_lang) == 0) {
Swig_typemap_clear($5,Gettype(p->p),Getname(p->p)); Printf(stderr,"%s:%d. Warning. Typemap deletion is temporary disabled in this release.\n", input_file, line_number);
/* Swig_typemap_clear($5,Gettype(p->p),Getname(p->p)); */
} }
p = p->next; p = p->next;
} }
@ -1113,7 +1114,8 @@ statement : INCLUDE STRING LBRACE {
TMParm *p; TMParm *p;
p = $5; p = $5;
while (p) { while (p) {
Swig_typemap_clear($3,Gettype(p->p),Getname(p->p)); Printf(stderr,"%s:%d. Warning. Typemap deletion is temporary disabled in this release.\n", input_file, line_number);
/* Swig_typemap_clear($3,Gettype(p->p),Getname(p->p)); */
p = p->next; p = p->next;
} }
} }
@ -1175,7 +1177,8 @@ statement : INCLUDE STRING LBRACE {
TMParm *p; TMParm *p;
p = $2; p = $2;
while (p) { while (p) {
Swig_typemap_clear_apply(Gettype(p->p), Getname(p->p)); Printf(stderr,"%s:%d. Warning. %%clear directive is temporarily disabled in this release. Ignored.\n", input_file, line_number);
/* Swig_typemap_clear_apply(Gettype(p->p), Getname(p->p)); */
p = p->next; p = p->next;
} }
} }
@ -1502,7 +1505,6 @@ parm_type : type pname {
free($3); free($3);
} }
| type LPAREN stars pname RPAREN LPAREN parms RPAREN { | type LPAREN stars pname RPAREN LPAREN parms RPAREN {
FatalError();
$$ = NewParm($1,$4); $$ = NewParm($1,$4);
SwigType *pt = Gettype($$); SwigType *pt = Gettype($$);
DOHList *l = typelist($7); DOHList *l = typelist($7);