diff options
author | hans-christoph <hans-christoph@b9310e46-f624-0410-8ea1-cfbb3a30dc96> | 2009-07-14 13:35:59 +0000 |
---|---|---|
committer | hans-christoph <hans-christoph@b9310e46-f624-0410-8ea1-cfbb3a30dc96> | 2009-07-14 13:35:59 +0000 |
commit | ce9661da773f129cfa3463f14ad4023c8c17e6d7 (patch) | |
tree | 2d63fc0a6dd0f94382c2ef521f7993f6ca18e28c /Compose/check-compose.pl | |
parent | 15be884f90285fc931609fc67fcacd12e3e0bd41 (diff) |
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
git-svn-id: https://svn.neo-layout.org@1928 b9310e46-f624-0410-8ea1-cfbb3a30dc96
Diffstat (limited to '')
-rwxr-xr-x | Compose/check-compose.pl | 12 |
1 files changed, 10 insertions, 2 deletions
diff --git a/Compose/check-compose.pl b/Compose/check-compose.pl index 53e5f76..0c373ae 100755 --- a/Compose/check-compose.pl +++ b/Compose/check-compose.pl @@ -8,6 +8,10 @@ # ./check-compose.pl *.neo use strict; +use Getopt::Std; +our ($opt_q); + +getopts('q'); # almost quiet operation my %prefix; my %code; @@ -22,6 +26,7 @@ while (my $line = <>) { $prefix{"@codes[0..$i]"} = $line; if ($code{"@codes[0..$i]"}) { + if ($opt_q) { exit 1; } print <<EOF; * @codes[0..$i] Präfix bereits terminal verwendet @@ -32,7 +37,8 @@ EOF } if ($code{"@codes"}) { - print <<EOF; + if ($opt_q) { exit 1; } + print <<EOF; * @codes Sequenz mehrfach verwendet $line @@ -43,7 +49,8 @@ EOF $code{"@codes"} = $line; if ($prefix{"@codes"}) { - print <<EOF; + if ($opt_q) { exit 1; } + print <<EOF; * @codes Sequenz bereits als Präfix verwendet $line @@ -51,3 +58,4 @@ EOF EOF } } + |