diff options
| author | Arnold D. Robbins <arnold@skeeve.com> | 2012-11-12 23:13:16 +0200 |
|---|---|---|
| committer | Arnold D. Robbins <arnold@skeeve.com> | 2012-11-12 23:13:16 +0200 |
| commit | cafbb82185c4a5fc2608975c048d66017456a038 (patch) | |
| tree | 916adf5fa6bab4c90a465b037a6b8bc05cdef1de /vms/vms_gawk.c | |
| parent | 3b0ec209b9630bd4f8689a4ecc5544c419ebd259 (diff) | |
| download | gawk-cafbb82185c4a5fc2608975c048d66017456a038.tar.gz | |
Initial changes for VMS building.
Diffstat (limited to 'vms/vms_gawk.c')
| -rw-r--r-- | vms/vms_gawk.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/vms/vms_gawk.c b/vms/vms_gawk.c index 222d803d..8b20c377 100644 --- a/vms/vms_gawk.c +++ b/vms/vms_gawk.c @@ -80,8 +80,8 @@ vms_gawk() int native_dcl = 1, /* assume true until we know otherwise */ short_circ; /* some options make P1, /commands, /input superfluous */ - CmdName = (which_gawk == exe_profiling) ? "PGAWK" - : (which_gawk == exe_debugging) ? "DGAWK" + CmdName = do_profile ? "PGAWK" + : do_debug ? "DGAWK" : "GAWK"; /* check "GAWK_P1"--it's required; its presence will tip us off */ |