#! /bin/gawk -f # Last edited on 2002-01-01 18:40:07 by stolfi # Preprocess the Pentateuch in Chinese (GB) BEGIN { abort = -1; } (abort >= 0) { exit abort; } //{ print; } END { if (abort >= 0) { exit abort; } } function arg_error(msg) { printf "%s\n", msg > "/dev/stderr"; printf "usage: %s\n", usage > "/dev/stderr"; abort = 1; exit 1; } function data_error(msg) { printf "line %d: %s\n", FNR, msg > "/dev/stderr"; abort = 1; exit 1; }