Changeset 117 in dev for BasicCompiler32

Timestamp:

May 12, 2007, 5:31:53 PM (18 years ago)

Author:

dai_9181

Message:

String/ObjectをSystem名前空間に依存しない特殊型として扱うようにした

Location:

BasicCompiler32

Files:

• Compile_Func.cpp (modified) (1 diff)
• NumOpe.cpp (modified) (3 diffs)

BasicCompiler32/Compile_Func.cpp

@@ -176 +176 @@
         tempParm=temp2;
 
-        extern const CClass *pobj_StringClass;
-        type.SetType( DEF_OBJECT, pobj_StringClass );
+        type.SetType( DEF_OBJECT, pobj_DBClass->GetStringClassPtr() );
     }
 

BasicCompiler32/NumOpe.cpp

@@ -77 +77 @@
     SetStringQuotes( parameter );
 
-    extern const CClass *pobj_StringClass;
-    Operator_New( *pobj_StringClass, "", parameter, Type( DEF_OBJECT, *pobj_StringClass ) );
+    Operator_New( *pobj_DBClass->GetStringClassPtr(), "", parameter, Type( DEF_OBJECT, *pobj_DBClass->GetStringClassPtr() ) );
 
     free( parameter );
@@ -719 +718 @@
                         NewStringObject(term);
 
-                        extern const CClass *pobj_StringClass;
                         type_stack[sp]=DEF_OBJECT;
-                        index_stack[sp]=(LONG_PTR)pobj_StringClass;
+                        index_stack[sp]=(LONG_PTR)pobj_DBClass->GetStringClassPtr();
                         bLiteralCalculation=0;
 
@@ -819 +817 @@
                         }
                         else{
-                            index_stack[sp] = (LONG_PTR)pobj_DBClass->GetObjectClass();
+                            index_stack[sp] = (LONG_PTR)pobj_DBClass->GetObjectClassPtr();
                         }