Changeset 358 for trunk/TestCase/SimpleTestCase/SPrintFTest.ab

Timestamp:

Oct 19, 2007, 11:42:51 PM (17 years ago)

Author:

イグトランス (egtra)

Message:

FormatIntegerO, FormatIntegerXを実装

File:

• trunk/TestCase/SimpleTestCase/SPrintFTest.ab (modified) (1 diff)

trunk/TestCase/SimpleTestCase/SPrintFTest.ab

@@ -66 +66 @@
     UnitTest("FormatIntegerD(+3, field width = 5)", s = "   +3")
 
+    s = FormatIntegerO(&o1234567, DWORD_MAX, 0, None)
+    UnitTest("FormatIntegerO(&o1234567)", s = "1234567")
+
+    s = FormatIntegerO(&o1234567, DWORD_MAX, 0, Alt)
+    UnitTest("FormatIntegerO(&o1234567, Alt)", s = "01234567")
+
+    s = FormatIntegerO(0, DWORD_MAX, 0, Alt)
+    UnitTest("FormatIntegerO(0, Alt)", s = "0")
+
+    s = FormatIntegerX(&hffff, DWORD_MAX, 0, None)
+    UnitTest("FormatIntegerX(&hffff)", s = "ffff")
+
+    s = FormatIntegerX(&hffff, DWORD_MAX, 0, Cap)
+    UnitTest("FormatIntegerX(&hffff, Cap)", s = "FFFF")
+
+    s = FormatIntegerX(&h12345678, DWORD_MAX, 0, Alt)
+    UnitTest("FormatIntegerX(&h12345678, Alt)", s = "0x12345678")
+
+    s = FormatIntegerX(1, 2, 0, Alt Or Cap)
+    UnitTest("FormatIntegerX(1, precision = 2, Alt, Cap)", s = "0X01")
+
+    s = FormatIntegerX(0, 4, 0, Alt)
+    UnitTest("FormatIntegerX(0, precision = 4, Alt)", s = "0000")
+
 '   s = FormatIntegerLU(8589934590, DWORD_MAX, 0, None)
 '   UnitTest("FormatIntegerLU(8589934590)", s = "8589934590")
-
-    
-
 End Sub