Index: toltcl/generic/tolaccess.cpp
===================================================================
--- toltcl/generic/tolaccess.cpp	(revision a64730a0f732a34190bfa1a12433db3b49570a2f)
+++ toltcl/generic/tolaccess.cpp	(revision 20663cb2fa77000c38eda5e84159f81cb7e562aa)
@@ -1660,8 +1660,18 @@
   BSyntaxObject* obj = GraCode( )->BGrammar::LeftEvaluateExpr( expr );
   if( oldEnabled ) { BOut::Enable( ); }
-  BUserCode *uc = dynamic_cast<BUserCode*>( obj );
-  
-  return
-    ( uc && ( uc->Contens().Grammar( ) == G ) ) ? uc->Contens().Operator( ) : NULL;
+  if(obj)
+  {
+    if(obj->Mode()==BUSERFUNMODE)
+    {
+      opr = dynamic_cast<BOperator*>(obj);
+    }    
+    if(obj->Mode()==BOBJECTMODE)
+    {
+      BUserCode *uc = dynamic_cast<BUserCode*>( obj );
+      opr = uc->Contens().Operator( );
+      if(opr && (opr->Grammar( ) != G)) { opr = NULL; }
+    }
+  }
+  return(opr);
 }