[SCM] Lisaac compiler branch, stable, updated. lisaac-0.12-557-g657254e
Mildred Ki'Lya
silkensedai at online.fr
Sat Oct 24 13:29:35 UTC 2009
The following commit has been merged in the stable branch:
commit 657254e77696ab453d4058edf5b614855f957b7e
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/string/abstract_string.li b/lib/string/abstract_string.li
index dfd2615..72e7b00 100644
--- a/lib/string/abstract_string.li
+++ b/lib/string/abstract_string.li
@@ -944,7 +944,7 @@ Section Public
result
)
[
- +? {Result.count = count + other.count};
+ +? {Result.count = Old count + other.count};
];
- as_lower:STRING <-
@@ -1265,6 +1265,8 @@ Section Public
(
STRING.create_from_string Self
);
+
+ - to_abstract_string :ABSTRACT_STRING <- Self;
- string_buffer:STRING := STRING.create 256; // Private, temporary once buffer.
@@ -1291,9 +1293,9 @@ Section Public
);
- println <-
- [ -? {storage.item count = '\0'}; ]
(
- to_external.println;
+ print;
+ '\n'.print;
);
//
diff --git a/lib/string/string_constant.li b/lib/string/string_constant.li
index 2817305..eaac501 100644
--- a/lib/string/string_constant.li
+++ b/lib/string/string_constant.li
@@ -106,6 +106,14 @@ Section Public
};
);
+ - println <-
+ [
+ -? {storage.item count = '\0'};
+ ]
+ (
+ to_external.println;
+ );
+
//
// Debug: Require / Ensure / Check
//
@@ -116,4 +124,3 @@ Section Public
- Self:SELF '+?' test:{BOOLEAN} <- test +? Self;
-
--
Lisaac compiler
More information about the Lisaac-commits
mailing list