10 STEXI*|ETEXI*|SQMP*|EQMP*) flag=$(($flag^1))
13 test $flag -eq 1 && printf "%s\n" "$str"
28 if test $flag -eq 1 ; then
29 printf "line %d: syntax error: expected ETEXI, found '%s'\n" "$line" "$str" >&2
35 if test $flag -ne 1 ; then
36 printf "line %d: syntax error: expected STEXI, found '%s'\n" "$line" "$str" >&2
42 if test $flag -eq 1 ; then
43 printf "line %d: syntax error: expected ETEXI, found '%s'\n" "$line" "$str" >&2
48 printf '%s\n' "$(expr "$str" : "DEFHEADING(\(.*\))")"
51 printf '%s\n' "$(expr "$str" : "ARCHHEADING(\(.*\),.*)")"
54 test $flag -eq 1 && printf '%s\n' "$str"
71 if test $flag -eq 1 ; then
72 printf "line %d: syntax error: expected EQMP, found '%s'\n" "$line" "$str" >&2
78 if test $flag -ne 1 ; then
79 printf "line %d: syntax error: expected SQMP, found '%s'\n" "$line" "$str" >&2
85 if test $flag -eq 1 ; then
86 printf "line %d: syntax error: expected EQMP, found '%s'\n" "$line" "$str" >&2
91 test $flag -eq 1 && printf '%s\n' "$str"