Changeset 0dad890 in tol

Timestamp:

May 18, 2011, 6:15:35 PM (15 years ago)

Author:

Víctor de Buen <vdebuen@…>

Branches:

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

Children:

ec6a62d

Parents:

16264c8

Message:

Refs #1209

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

File:

• tol/btol/bgrammar/spfuninst.cpp (modified) (1 diff)

tol/btol/bgrammar/spfuninst.cpp

@@ -1956 +1956 @@
     {
       uns = GraAnything()->LeftEvaluateTree(branch1,false);
-      BGrammar* uns_gra = uns->Grammar();
-      if(uns && (uns_gra!=GraNameBlock()) && (uns_gra!=GraSet()))
-      {
-        int mode = uns->Mode();
-        if(mode!=BCLASSMODE)
-        {
-          Error(I2("Evaluating expression ",
-                   "Evaluando la expresión ")+
-                   gra->Name()+" '"+BParser::Unparse(tre)+"'\n"+
-                I2("Left term is not a valid Set or NameBlock but a ",
-                   "El término a la izquierda no es un Set ni un NameBlock sino un ")+
-                   uns_gra->Name()+" '"+BParser::Unparse(branch1)+"'\n");
-          DESTROY(uns);
-          return(NULL);
+      if(uns)
+      {
+        BGrammar* uns_gra = uns->Grammar();
+        if(uns && (uns_gra!=GraNameBlock()) && (uns_gra!=GraSet()))
+        {
+          int mode = uns->Mode();
+          if(mode!=BCLASSMODE)
+          {
+            Error(I2("Evaluating expression ",
+                     "Evaluando la expresión ")+
+                     gra->Name()+" '"+BParser::Unparse(tre)+"'\n"+
+                  I2("Left term is not a valid Set or NameBlock but a ",
+                     "El término a la izquierda no es un Set ni un NameBlock sino un ")+
+                     uns_gra->Name()+" '"+BParser::Unparse(branch1)+"'\n");
+            DESTROY(uns);
+            return(NULL);
+          }
         }
       }