[SCM] Lisaac compiler branch, stable, updated. lisaac-0.12-487-g493590c

Mildred Ki'Lya silkensedai at online.fr
Fri Sep 11 12:18:41 UTC 2009


The following commit has been merged in the stable branch:
commit 493590c0a88e6b069a56077cb37a1aa4b829c0c2
Author: Mildred Ki'Lya <silkensedai at online.fr>
Date:   Fri Sep 11 14:16:15 2009 +0200

    Added -partial option to make.lip to prevent GCC from running

diff --git a/make.lip b/make.lip
index b35976a..7268f5b 100644
--- a/make.lip
+++ b/make.lip
@@ -44,6 +44,7 @@ Section Private
   // Generate code.
   + is_java:BOOLEAN;
   + is_cop:BOOLEAN; // Correct value after compilation.
+  + execute_back_end:BOOLEAN := TRUE;
   
   // Other.
   + is_statistic:BOOLEAN;
@@ -104,15 +105,24 @@ Section Private
   - get_target <-
   (
     (target = "dos").if {
+      (is_cop).if {
+        "Warning: COP not yet implemented\n".print;
+      };
       dos_target;
     };
     (target = "windows").if {
+      (is_cop).if {
+        "Warning: COP not yet implemented\n".print;
+      };
       windows_target;
     };
     (target = "unix").if {
       unix_target;
     };
     (target = "java").if {
+      (is_cop).if {
+        "Warning: COP not yet implemented\n".print;
+      };
       java_target;
     };
     (target = "").if {
@@ -170,29 +180,22 @@ Section Private
   
   - general_back_end <-
   (
-    (target = "java").if {
-      (is_cop).if {
-        "Warning: COP not yet implemented\n".print;
+    (execute_back_end).if {
+      (target = "java").if {
+        execute ("javac " + output_file + ".java");
       };
-      execute ("javac " + output_file + ".java");
-    };
-    (target = "dos").if {
-      (is_cop).if {
-        "Warning: COP not yet implemented\n".print;
+      (target = "dos").if {
+        execute ("gcc " + output_file + ".c -o " + output_file + ".exe " + option_gcc + lib_gcc);
       };
-      execute ("gcc " + output_file + ".c -o " + output_file + ".exe " + option_gcc + lib_gcc);
-    };
-    (target = "windows").if {
-      (is_cop).if {
-        "Warning: COP not yet implemented\n".print;
+      (target = "windows").if {
+        execute ("gcc " + output_file + ".c -o " + output_file + ".exe -lgdi32 " + option_gcc + lib_gcc);
       };
-      execute ("gcc " + output_file + ".c -o " + output_file + ".exe -lgdi32 " + option_gcc + lib_gcc);
-    };
-    (target = "unix").if {      
-      (is_cop).if {
-        lib_gcc := lib_gcc + " -lpthread";
+      (target = "unix").if {
+        (is_cop).if {
+          lib_gcc := lib_gcc + " -lpthread";
+        };
+        execute ("gcc " + output_file + ".c -o " + output_file + " -lm " + option_gcc + lib_gcc);
       };
-      execute ("gcc " + output_file + ".c -o " + output_file + " -lm " + option_gcc + lib_gcc);
     };
   );
   
@@ -300,6 +303,12 @@ Section Public
   (
     output_file := output;
   );
+
+  - partial <-
+  // Only generate C code and don't compile it with GCC
+  (
+    execute_back_end := FALSE;
+  );
   
   //
   // Other.

-- 
Lisaac compiler



More information about the Lisaac-commits mailing list