Changeset 88df01a in tol for toltcl/generic/tolaccess.cpp

Timestamp:

Jan 26, 2009, 7:15:08 PM (18 years ago)

Author:

Jorge Pérez <josp.jorge@…>

Branches:

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

Children:

ee5da7f

Parents:

2235a4c

Message:

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

File:

• toltcl/generic/tolaccess.cpp (modified) (1 diff)

toltcl/generic/tolaccess.cpp

@@ -1662 +1662 @@
   if(obj)
   {
-    if(obj->Mode()==BUSERFUNMODE)
+    if( obj->Mode( ) == BUSERFUNMODE )
     {
-      opr = dynamic_cast<BOperator*>(obj);
+      opr = dynamic_cast<BOperator*>( obj );
     }    
-    if(obj->Mode()==BOBJECTMODE)
+    if( obj->Mode( ) == BOBJECTMODE )
     {
       BUserCode *uc = dynamic_cast<BUserCode*>( obj );
-      opr = uc->Contens().Operator( );
-      if(opr && (opr->Grammar( ) != G)) { opr = NULL; }
-    }
-  }
-  return(opr);
+      opr = uc ? uc->Contens().Operator( ) : NULL;
+      if( opr && ( opr->Grammar( ) != G ) ) { opr = NULL; }
+    }
+  }
+  return( opr );
 }