summaryrefslogtreecommitdiff
path: root/Master/tlpkg/tlgs/lib/gs_cmdl.ps
diff options
context:
space:
mode:
Diffstat (limited to 'Master/tlpkg/tlgs/lib/gs_cmdl.ps')
-rw-r--r--Master/tlpkg/tlgs/lib/gs_cmdl.ps58
1 files changed, 29 insertions, 29 deletions
diff --git a/Master/tlpkg/tlgs/lib/gs_cmdl.ps b/Master/tlpkg/tlgs/lib/gs_cmdl.ps
index 0b675b74862..848b5c73a3e 100644
--- a/Master/tlpkg/tlgs/lib/gs_cmdl.ps
+++ b/Master/tlpkg/tlgs/lib/gs_cmdl.ps
@@ -1,19 +1,19 @@
% Copyright (C) 1994, 1996, 1999 Aladdin Enterprises. All rights reserved.
-%
+%
% This software is provided AS-IS with no warranty, either express or
% implied.
-%
+%
% This software is distributed under license and may not be copied,
% modified or distributed except as expressly authorized under the terms
% of the license contained in the file LICENSE in this distribution.
-%
+%
% For more information about licensing, please refer to
% http://www.ghostscript.com/licensing/. For information on
% commercial licensing, go to http://www.artifex.com/licensing/ or
% contact Artifex Software, Inc., 101 Lucas Valley Road #110,
% San Rafael, CA 94903, U.S.A., +1(415)492-9861.
-% $Id: gs_cmdl.ps 6300 2005-12-28 19:56:24Z giles $
+% $Id$
% Parse and execute the command line.
% C code handles the following switches: -h/-? -I -M -v
@@ -24,7 +24,7 @@ cmddict begin
% Get the next argument from the parsed argument list.
/nextarg % - nextarg <arg> true
- % - nextarg false
+ % - nextarg false
{ argv length 0 eq
{ false }
{ argv dup 0 get exch dup length 1 sub 1 exch getinterval /argv exch def }
@@ -51,12 +51,12 @@ cmddict begin
{ pop /expand@ false def
}
{ expand@ { (@) anchorsearch } { false } ifelse
- { pop findlibfile
- { exch pop }
- { (r) file } % let the error happen
- expandargfile
- }
- if
+ { pop findlibfile
+ { exch pop }
+ { (r) file } % let the error happen
+ expandargfile
+ }
+ if
}
ifelse
}
@@ -91,7 +91,7 @@ cmddict begin
argv 0 get (-) anchorsearch { pop pop exit } if
pop nextarg token
{ exch pop % Probably should check for empty.
- end exec //cmddict begin
+ end exec //cmddict begin
}
if
}
@@ -146,29 +146,29 @@ cmddict begin
{ //cmddict begin
/expand@ true def
[
- % Process the GS_OPTIONS environment variable.
+ % Process the GS_OPTIONS environment variable.
(GS_OPTIONS) getenv { 0 () /SubFileDecode filter expandargfile } if
- % Process the actual command line.
+ % Process the actual command line.
.getargv { expandarg } forall
] readonly /argv exch def
- % Now interpret the commands.
+ % Now interpret the commands.
{ nextarg not { exit } if
dup 0 get (-) 0 get eq
{ dup length 1 eq
- { pop (%stdin) (r) file runjob
- }
- { dup length 2 gt
- { dup dup length 2 sub 2 exch getinterval exch 1 1 getinterval }
- if currentdict .knownget
- { exec
- }
- { (Ignoring unknown switch ) print
- dup length 1 eq { (-) print print } if print
- () = flush
- }
- ifelse
- }
- ifelse
+ { pop (%stdin) (r) file runjob
+ }
+ { dup length 2 gt
+ { dup dup length 2 sub 2 exch getinterval exch 1 1 getinterval }
+ if currentdict .knownget
+ { exec
+ }
+ { (Ignoring unknown switch ) print
+ dup length 1 eq { (-) print print } if print
+ () = flush
+ }
+ ifelse
+ }
+ ifelse
}
{ runfilejob
}