Changeset 446

Timestamp:

Mar 2, 2008, 4:38:31 AM (17 years ago)

Author:

dai

Message:

#71への対応。列挙型メンバの初期値に定数や列挙型メンバを指定できないバグを修正。

Location:

trunk

Files:

• Include/system/enum.sbp (modified) (1 diff)
• bin/BasicCompiler32.exe (modified) ( previous)
• bin/BasicCompiler64.exe (modified) ( previous)

trunk/Include/system/enum.sbp

@@ -7 +7 @@
         This.value = value
         This.lpszName = lpszName
+    End Sub
+
+    Sub EnumBase( enumBase As EnumBase )
+        This.value = enumBase.value
+        This.lpszName = enumBase.lpszName
     End Sub