Changeset 68 in dev for BasicCompiler32/NumOpe.cpp

Timestamp:

Mar 12, 2007, 4:04:55 AM (18 years ago)

Author:

dai_9181

Message:

#84の対応（64bitでの動作確認はまだ）。
Stringクラスのコンストラクタにリテラル文字列が渡せないバグを修正。
STRING_IS_NOT_ALWAYS_UNICODEを暗黙的に定義するようにした（暫定対応）。

File:

• BasicCompiler32/NumOpe.cpp (modified) (2 diffs)

BasicCompiler32/NumOpe.cpp

@@ -73 +73 @@
     ///////////////////////////////////////////////////////
 
-    char *parameter = (char *)malloc( lstrlen( lpszText ) + 3 );
-    lstrcpy( parameter, lpszText );
+    char *parameter = (char *)malloc( lstrlen( lpszText ) + 32 );
+    sprintf( parameter, "\"%s\"%c%c*Char", lpszText, 1, ESC_AS );
     SetStringQuotes( parameter );
 
@@ -196 +196 @@
                         pobj_Class=(CClass *)lpBaseIndex;
                         TYPEINFO BaseTypeInfo = {BaseType,lpBaseIndex};
-                        if(IsStringSubsituation(pobj_Class)
-                            || IsStringObjectType(BaseTypeInfo)){
+                        if(IsStringObjectType(BaseTypeInfo)){
                             //要求タイプがオブジェクトであり、Stringの受け入れが可能な場合