Changeset 600 in dev for trunk/ab5.0/abdev/BasicCompiler_Common/src/Const.cpp

Timestamp:

May 10, 2008, 8:50:41 PM (17 years ago)

Author:

dai_9181

Message:

依存関係を整理中

File:

• trunk/ab5.0/abdev/BasicCompiler_Common/src/Const.cpp (modified) (3 diffs)

trunk/ab5.0/abdev/BasicCompiler_Common/src/Const.cpp

@@ -7 +7 @@
 }
 
-void Consts::Add( const NamespaceScopes &namespaceScopes, const std::string &name , const char *Expression)
+void Consts::Add( const NamespaceScopes &namespaceScopes, const std::string &name, _int64 i64data, const Type &type )
 {
-    _int64 i64data;
-    Type resultType;
-    if( !StaticCalculation(false, Expression, 0, &i64data, resultType) ){
-        //変数の場合
-        //何もしない（実行領域コンパイル時にdim宣言として扱う）
-        return;
-    }
-
-    //リテラル値の場合
-    //登録を行う
-
-    CConst *newconst = new CConst(namespaceScopes, name, resultType, i64data);
+    CConst *newconst = new CConst(namespaceScopes, name, type, i64data);
 
     //ハッシュリストに追加
@@ -69 +58 @@
     return pConst->GetDoubleData();
 }
-bool Consts::IsStringPtr( const Symbol &symbol ){
+bool Consts::IsStringPtr( const Symbol &symbol, bool isUnicode ){
     CConst *pConst = GetObjectPtr( symbol );
 
@@ -76 +65 @@
     const Type &type = pConst->GetType();
 
-    return ( type.GetBasicType() == typeOfPtrChar && type.GetIndex() == LITERAL_STRING );
+    int charType = isUnicode
+        ? MAKE_PTR_TYPE(DEF_WORD,1)
+        : MAKE_PTR_TYPE(DEF_SBYTE,1);
+
+    return ( type.GetBasicType() == charType && type.GetIndex() == LITERAL_STRING );
 }