Changeset 1a5a107 in tol

Timestamp:

Jul 13, 2009, 4:43:26 PM (17 years ago)

Author:

Víctor de Buen <vdebuen@…>

Branches:

1941-docker-image-to-test, devel, master

Children:

9ff21c5

Parents:

cabaa41

Message:

Fixes 710

git-svn-id: ​https://www.tol-project.org/svn/tolp/trunk@1158 be4846ae-f051-483a-831f-b64e7d08527f

File:

• tol/btol/bgrammar/nameblock.cpp (modified) (2 diffs)

tol/btol/bgrammar/nameblock.cpp

@@ -498 +498 @@
        BParser::DefaultParser()->Filter()->IsIdentifier(name))
     {
+      if(name=="_this")
+      {
+        Error(I2("Reserved member name ",
+                 "Nombre de miembro reservado  ")+ name+"\n"+
+                I2("Cannot build NameBlock ",
+                   "No se puede construir el NameBlock ")+Name());
+        continue;
+      }
       obj->PutNameBlock(this);
       BSyntaxObject* mem = Member(name);
@@ -575 +583 @@
   if(found==private_.end())
   {
-    return(NULL);
+    if(memberName=="_this")
+    {
+      return(owner_);
+    }
+    else
+    {
+      return(NULL);
+    }
   }
   else