Overview
| Comment: | More on concatenating lines - keeps going until ; or $ found. |
|---|---|
| Downloads: | Tarball | ZIP archive | SQL archive |
| Timelines: | family | ancestors | descendants | both | origin/master | trunk |
| Files: | files | file ages | folders |
| SHA3-256: |
87b97b367a243d2142428b47296fe167 |
| User & Date: | gawthrop@users.sourceforge.net on 1998-08-12 15:53:38 |
| Other Links: | branch diff | manifest | tags |
Context
|
1998-08-13
| ||
| 08:35:40 | extended end of line regexp to include . and # check-in: 98b92713ca user: gawthrop@users.sourceforge.net tags: origin/master, trunk | |
|
1998-08-12
| ||
| 15:53:38 | More on concatenating lines - keeps going until ; or $ found. check-in: 87b97b367a user: gawthrop@users.sourceforge.net tags: origin/master, trunk | |
| 15:21:12 | Added type definition for the SVD procedures check-in: c7dffab088 user: gawthrop@users.sourceforge.net tags: origin/master, trunk | |
Changes
Modified mttroot/mtt/bin/trans/mtt_p2m from [d954652ab3] to [8d7d4ebd6d].
1 2 3 4 5 6 7 8 9 |
#! /bin/sh
sed 's/begin//' |\
sed 's/end//' |\
sed 's/\[\([0-9,]*\)\]/(\1)/g' |\
sed 's/:=/ = /' |\
awk '{
sub(/^[\ ]*/, "", $0)
| > | | > | | < | 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 |
#! /bin/sh
sed 's/begin//' |\
sed 's/end//' |\
sed 's/\[\([0-9,]*\)\]/(\1)/g' |\
sed 's/:=/ = /' |\
awk '{
sub(/^[\ ]*/, "", $0)
sub(/\$$/, ";", $0)
if (match($NF,";")==0){
Previous[++i] = $0
}
else {
for (j=1;j<=i;j++) printf("%s", Previous[j]);
printf("%s\n", $0)
i=0;
}
}'
|