summaryrefslogtreecommitdiff
path: root/Master/tlpkg/tlgs/lib/cat.ps
diff options
context:
space:
mode:
Diffstat (limited to 'Master/tlpkg/tlgs/lib/cat.ps')
-rw-r--r--Master/tlpkg/tlgs/lib/cat.ps74
1 files changed, 0 insertions, 74 deletions
diff --git a/Master/tlpkg/tlgs/lib/cat.ps b/Master/tlpkg/tlgs/lib/cat.ps
deleted file mode 100644
index 1dec040db76..00000000000
--- a/Master/tlpkg/tlgs/lib/cat.ps
+++ /dev/null
@@ -1,74 +0,0 @@
-% Copyright (C) 2001-2012 Artifex Software, Inc.
-% 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.
-%
-% Refer to licensing information at http://www.artifex.com or contact
-% Artifex Software, Inc., 7 Mt. Lassen Drive - Suite A-134, San Rafael,
-% CA 94903, U.S.A., +1(415)492-9861, for further information.
-%
-%
-% $Id: cat.ps 8331 2008-02-05 11:07:00Z kens $
-%
-% Appends one file to another. Primarily used to overcome the
-% 'copy' limitation of Windows command shell for ps2epsi
-%
-% the files to be appended are given by the environament
-% variables %infile% and %outfile%. %infile% is appended to
-% %outfile%
-%
-
-/datastring 1024 string def
-
-{
- (outfile) getenv
- {
- /outfilename exch def
- (infile) getenv
- {
- /infilename exch def
-
- infilename status
- {
- pop pop pop pop outfilename status
- {
- pop pop pop pop
- infilename (r) file /infile exch def
- outfilename (a+) file /outfile exch def
- {
- infile datastring readstring
- {
- outfile exch writestring
- }
- {
- dup length 0 gt
- {outfile exch writestring} {pop} ifelse
- exit
- } ifelse
- } loop
- infile closefile
- outfile closefile
- }
- {
- (Failed to find file ) print outfilename ==
- } ifelse
- }
- {
- (Failed to find file ) print infilename ==
- } ifelse
- }
- {
- (Couldn't find %infile% environment variable) ==
- } ifelse
- }
- {
- (Couldn't find %outfile% environment variable) ==
- }
- ifelse
-} bind
-exec