Changeset 1928 for Compose/check-compose.pl

Timestamp:

07/14/09 15:35:59 (4 years ago)

Author:

hans-christoph

Message:

Aufräumen in Compose und Unterverzeichnissen.

- Directory src erzeugt, welches alle Modul-Quelldateien aufnimmt

- Umbenennen der Modul-Quelldateien:

Compose.neo src/base.module
Compose_greek.neo src/greek.module
Compose_many_klingon_numericals.neo src/klingon.module
Compose_many_roman_numericals.neo src/roman.module
Compose_math_and_physics.neo src/math.module
Compose_sprachen.neo src/lang.module

- Löschen der zusammengesetzten generierbaren Dateien:

Compose_neo_greek.neo
Compose_neo_math.neo
Compose_neo_rom.neo

- Makefile erneuert:

make kurzer Hilfetext
make XCompose_m1_m2_m3 baut Module m1 bis m3 zusammen
make all erzeuge Default-Dateien
make clean räume Directory auf
make check verifiziere XCompose*-Dateien

- Neues Directory `contrib':

enthält Informationen, die veraltet sind, nicht mehr gepflegt
werden, oder aus einem anderen Grund nicht Teil der offiziellen
Release zu sein brauchen.

- eigene_compose_erstellen/compose.sh:

ist nun im Grunde überflüssig, wurde nach contrib verschoben

Files:

• Compose/check-compose.pl (modified) (5 diffs)

Compose/check-compose.pl

@@ -9 +9 @@
 
 use strict;
+use Getopt::Std;
+our ($opt_q);
+
+getopts('q'); # almost quiet operation
 
 my %prefix;
@@ -23 +27 @@
 
         if ($code{"@codes[0..$i]"}) {
+            if ($opt_q) { exit 1; }
             print <<EOF;
 
@@ -33 +38 @@
 
     if ($code{"@codes"}) {
-            print <<EOF;
+        if ($opt_q) { exit 1; }
+        print <<EOF;
 
 * @codes Sequenz mehrfach verwendet
@@ -44 +50 @@
 
     if ($prefix{"@codes"}) {
-            print <<EOF;
+        if ($opt_q) { exit 1; }
+        print <<EOF;
 
 * @codes Sequenz bereits als Präfix verwendet
@@ -52 +59 @@
     } 
 }
+