Changeset 117 in dev for BasicCompiler64
- Timestamp:
- May 12, 2007, 5:31:53 PM (18 years ago)
- Location:
- BasicCompiler64
- Files:
-
- 2 edited
Legend:
- Unmodified
- Added
- Removed
-
BasicCompiler64/Compile_Func.cpp
r115 r117 30 30 tempParm=temp2; 31 31 32 extern const CClass *pobj_StringClass; 33 type.SetType( DEF_OBJECT, pobj_StringClass ); 32 type.SetType( DEF_OBJECT, pobj_DBClass->GetStringClassPtr() ); 34 33 } 35 34 -
BasicCompiler64/NumOpe.cpp
r115 r117 18 18 SetStringQuotes( parameter ); 19 19 20 extern const CClass *pobj_StringClass; 21 Operator_New( *pobj_StringClass, "", parameter, Type( DEF_OBJECT, *pobj_StringClass ) ); 20 Operator_New( *pobj_DBClass->GetStringClassPtr(), "", parameter, Type( DEF_OBJECT, *pobj_DBClass->GetStringClassPtr() ) ); 22 21 23 22 free( parameter ); … … 731 730 NewStringObject(UseReg,term); 732 731 733 extern const CClass *pobj_StringClass;734 732 type_stack[sp]=DEF_OBJECT; 735 index_stack[sp]=(LONG_PTR)pobj_ StringClass;733 index_stack[sp]=(LONG_PTR)pobj_DBClass->GetStringClassPtr(); 736 734 bLiteralCalculation=0; 737 735 … … 846 844 } 847 845 else{ 848 index_stack[sp] = (LONG_PTR)pobj_DBClass->GetObjectClass ();846 index_stack[sp] = (LONG_PTR)pobj_DBClass->GetObjectClassPtr(); 849 847 } 850 848
Note:
See TracChangeset
for help on using the changeset viewer.