[SCM] Lisaac compiler branch, master, updated. lisaac-0.12-606-g4554e79

Mildred Ki'Lya silkensedai at online.fr
Mon Mar 1 01:30:54 UTC 2010


The following commit has been merged in the master branch:
commit 7d03deb413123214bb5cee2ae94991807afb29dd
Author: Mildred Ki'Lya <silkensedai at online.fr>
Date:   Sat Oct 24 15:29:13 2009 +0200

    Fix ABSTRACT_STRING.println

diff --git a/lib/standard/string/abstract_string.li b/lib/standard/string/abstract_string.li
index 84ef879..e98a1b7 100644
--- a/lib/standard/string/abstract_string.li
+++ b/lib/standard/string/abstract_string.li
@@ -999,7 +999,7 @@ Section Public
     result
   )
   [
-    +? {Result.count = count + other.count};
+    +? {Result.count = Old count + other.count};
   ];
 
   - as_lower:STRING <-
@@ -1323,6 +1323,8 @@ Section Public
     STRING.create_from_string Self
   );
 
+  - to_abstract_string :ABSTRACT_STRING <- Self;
+
   - string_buffer:STRING := STRING.create 256; // Private, temporary once buffer.
 
   - split_buffer:ARRAY(STRING) := ARRAY(STRING).create_with_capacity 4 lower 1;
@@ -1348,9 +1350,9 @@ Section Public
   );
 
   - println <-
-  [ -? {storage.item count = '\0'}; ]
   (
-    to_external.println;
+    print;
+    '\n'.print;
   );
 
   //
diff --git a/lib/standard/string/string_constant.li b/lib/standard/string/string_constant.li
index 06bab2a..efeffd9 100644
--- a/lib/standard/string/string_constant.li
+++ b/lib/standard/string/string_constant.li
@@ -106,6 +106,14 @@ Section Public
     };
   );
 
+  - println <-
+  [
+    -? {storage.item count = '\0'};
+  ]
+  (
+    to_external.println;
+  );
+
   //
   // Debug: Require / Ensure / Check
   //

-- 
Lisaac compiler



More information about the Lisaac-commits mailing list