diff options
author | William S Fulton <wsf@fultondesigns.co.uk> | 2005-09-30 23:01:13 +0000 |
---|---|---|
committer | William S Fulton <wsf@fultondesigns.co.uk> | 2005-09-30 23:01:13 +0000 |
commit | 32839df23baaec3183ed935a4213084660d401b2 (patch) | |
tree | 5566a64a952dda47d8a1a4a7126f8bfe88e37f90 /Source/Modules/chicken.cxx | |
parent | bc0c43d7c13293679b38b9280997194185a4d43c (diff) | |
download | swig-32839df23baaec3183ed935a4213084660d401b2.tar.gz |
Modify following features to work as flags, so that they can be truely set and unset:
immutable
git-svn-id: https://swig.svn.sourceforge.net/svnroot/swig/trunk/SWIG@7566 626c5289-ae23-0410-ae9c-e8d60b6d4f22
Diffstat (limited to 'Source/Modules/chicken.cxx')
-rw-r--r-- | Source/Modules/chicken.cxx | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/Source/Modules/chicken.cxx b/Source/Modules/chicken.cxx index dc62905f1..98a67242e 100644 --- a/Source/Modules/chicken.cxx +++ b/Source/Modules/chicken.cxx @@ -771,7 +771,7 @@ CHICKEN::variableWrapper(Node *n) { Printf(f->code, "if (argc!=2 && argc!=3) C_bad_argc(argc,2);\n"); /* Check for a setting of the variable value */ - if (!Getattr(n,"feature:immutable")) { + if (!GetFlag(n,"feature:immutable")) { Printf(f->code, "if (argc > 2) {\n"); if ((tm = Swig_typemap_lookup_new("varin",n,name,0))) { Replaceall(tm,"$source","value"); @@ -1232,7 +1232,7 @@ CHICKEN::membervariableHandler(Node *n) Printv(clos_class_defines," (list '", proc, " ':swig-virtual ':swig-get ", chickenPrimitiveName(getfunc), NIL); - if (!Getattr(n,"feature:immutable")) { + if (!GetFlag(n,"feature:immutable")) { if (class_node) { Printv(clos_class_defines, " ':swig-set (lambda (x y) (", chickenPrimitiveName(setfunc), " x (slot-ref y 'swig-this))))\n", NIL); } else { |