diff options
| author | Arnold D. Robbins <arnold@skeeve.com> | 2011-02-14 21:38:32 +0200 |
|---|---|---|
| committer | Arnold D. Robbins <arnold@skeeve.com> | 2011-02-14 21:38:32 +0200 |
| commit | b9d87ba0b9ea6bbd939fd9a906d5721202d8f78d (patch) | |
| tree | ee309aaf9755917bcb8d882194002f2865b59f5c /test/xref.awk | |
| parent | 105ed6e1ef928ba0bc55a0eba59f4a5ecc4eb876 (diff) | |
| download | egawk-b9d87ba0b9ea6bbd939fd9a906d5721202d8f78d.tar.gz egawk-b9d87ba0b9ea6bbd939fd9a906d5721202d8f78d.tar.bz2 egawk-b9d87ba0b9ea6bbd939fd9a906d5721202d8f78d.zip | |
VMS fixes, including ripple effect into pc and test directories.
Diffstat (limited to 'test/xref.awk')
| -rw-r--r-- | test/xref.awk | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/test/xref.awk b/test/xref.awk index 94d587f8..d23a0c8d 100644 --- a/test/xref.awk +++ b/test/xref.awk @@ -4,6 +4,7 @@ # for the sort command and to use `sort -k1' instead of `sort +1' BEGIN { + if (sortcmd == "") sortcmd = "sort" # "sort -k1" # create array of keywords to be ignored by lexer asplit("BEGIN:END:atan2:break:close:continue:cos:delete:" \ @@ -76,8 +77,6 @@ state = nextstate } # finished parsing, now ready to print output - #sortcmd = "sort -k1" - sortcmd = "sort" for ( i = 1; i <= nnames; i++ ) { printf "%d ", xnames[names[i]] | sortcmd if ( index(names[i],"(") == 0 ) |