[SCM] Lisaac compiler branch, master, updated. lisaac-0.12-411-g04e13f1

[ontologiae]

The following commit has been merged in the master branch:
commit 04e13f1ef3e121baa4e60b82d592ba5ff5d5202b
Author: ontologiae <ontologiae at ordinateur-de-ontologiae.local>
Date:   Tue Aug 18 21:52:06 2009 +0200

    number doc update

diff --git a/lib/io/file_input_stream.li b/lib/io/file_input_stream.li
index 0a59d3b..cb738bb 100644
--- a/lib/io/file_input_stream.li
+++ b/lib/io/file_input_stream.li
@@ -28,7 +28,7 @@ Section Header
 
 Section Inherit
 
-  - parent_input_stream :INPUT_STREAM := INPUT_STREAM;
+  - inherit_input_stream :INPUT_STREAM := INPUT_STREAM;
 
 Section Public
 
@@ -71,6 +71,7 @@ Section Private
 Section Public
 
   - read_character <-
+  // Return last character from stream
   ( + result:INTEGER;
     
     push_back_flag.if {
@@ -96,6 +97,7 @@ Section Public
   );
 
   - read_line_in buffer:STRING <-
+  // Return line from stream
   (
     read_character;
     ((! end_of_input) && {last_character != '\n'}).if {
diff --git a/lib/io/file_output_stream.li b/lib/io/file_output_stream.li
index 252016c..26e24cd 100644
--- a/lib/io/file_output_stream.li
+++ b/lib/io/file_output_stream.li
@@ -28,7 +28,7 @@ Section Header
 
 Section Inherit
 
-  - parent_output_stream :OUTPUT_STREAM := OUTPUT_STREAM;
+  - inherit_output_stream :OUTPUT_STREAM := OUTPUT_STREAM;
 
 Section Public
 
@@ -54,6 +54,7 @@ Section Public
 Section Public
 
   - put_character c:CHARACTER <-
+  // Put `c' on stream
   ( 
     tmp.put c to 0;
     file.physical_write tmp size 1;
diff --git a/lib/io/io.li b/lib/io/io.li
index 7e9fb9b..de586a4 100644
--- a/lib/io/io.li
+++ b/lib/io/io.li
@@ -29,6 +29,6 @@ Section Header
 
 Section Inherit
   
-  - parent_std_input:STD_INPUT := STD_INPUT;
+  - inherit_std_input:STD_INPUT := STD_INPUT;
   
-  - parent_std_output:STD_OUTPUT := STD_OUTPUT;
+  - inherit_std_output:STD_OUTPUT := STD_OUTPUT;
diff --git a/lib/io/std_error.li b/lib/io/std_error.li
index af1a478..3fde7a2 100644
--- a/lib/io/std_error.li
+++ b/lib/io/std_error.li
@@ -32,7 +32,7 @@ Section Header
   
 Section Inherit
   
-  - parent_output_stream:OUTPUT_STREAM := OUTPUT_STREAM;
+  - inherit_output_stream:OUTPUT_STREAM := OUTPUT_STREAM;
   
 Section Public
 
@@ -43,6 +43,7 @@ Section Public
   );
 
   - put_character c:CHARACTER <-
+  // Put `c' on stderr
   (
     basic_error_putc c;
   );
diff --git a/lib/io/std_input.li b/lib/io/std_input.li
index 8cc159d..7d756e4 100644
--- a/lib/io/std_input.li
+++ b/lib/io/std_input.li
@@ -29,7 +29,7 @@ Section Header
       
 Section Inherit
   
-  - parent_input_stream:INPUT_STREAM := INPUT_STREAM;
+  - inherit_input_stream:INPUT_STREAM := INPUT_STREAM;
   
 Section Private
 
@@ -41,6 +41,7 @@ Section Public
   - is_connected:BOOLEAN := TRUE;
   
   - read_character:CHARACTER<-
+  // Read character from stdin
   (
     push_back_flag.if {
       push_back_flag := FALSE;
@@ -58,12 +59,14 @@ Section Public
   
   
   - last_character:CHARACTER <-
+  // Return last character from stdin
   (
     memory
   );
   
   
   - end_of_input:BOOLEAN <-
+  // Return TRUE if end of input
   (
     + result:BOOLEAN;
     (! push_back_flag).if {
@@ -73,6 +76,7 @@ Section Public
   );
   
   - read_line_in str:STRING <-
+  // Real all character until \n (so read a line)
   (
     + mem:CHARACTER;
     read_character;
diff --git a/lib/io/std_input_output.li b/lib/io/std_input_output.li
index f126c1e..99b10fe 100644
--- a/lib/io/std_input_output.li
+++ b/lib/io/std_input_output.li
@@ -29,9 +29,9 @@ Section Header
   
 Section Inherit
   
-  - parent_input_stream:INPUT_STREAM := INPUT_STREAM;
+  - inherit_input_stream:INPUT_STREAM := INPUT_STREAM;
 
-  - parent_output_stream:OUTPUT_STREAM := OUTPUT_STREAM;
+  - inherit_output_stream:OUTPUT_STREAM := OUTPUT_STREAM;
   
 Section Public
 
diff --git a/lib/io/std_output.li b/lib/io/std_output.li
index 0f34abc..fa0c5b5 100644
--- a/lib/io/std_output.li
+++ b/lib/io/std_output.li
@@ -29,13 +29,14 @@ Section Header
   
 Section Inherit
   
-  - parent_output_stream:OUTPUT_STREAM := OUTPUT_STREAM;
+  - inherit_output_stream:OUTPUT_STREAM := OUTPUT_STREAM;
   
 Section Public
   
   - is_connected:BOOLEAN := TRUE;
   
   - put_character c:CHARACTER <- basic_io_putc c;
+  // Put `c' on stdout
 
 
   

-- 
Lisaac compiler