File mttroot/mtt/bin/trans/mtt_p2m artifact 09a0ccbaff part of check-in 4315e39664
#! /bin/sh
sed 's/begin//' |\
sed 's/end//' |\
sed 's/\[\([0-9,]*\)\]/(\1)/g' |\
sed 's/:=/ = /' |\
sed 's/mtt\([a-z]*\)\([0-9]\)\([0-9]*\)/mtt\1(\2\3)/g' |\
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;
}
}'