From 7e621409df5dc29ec8c64a9a172766749aa99665 Mon Sep 17 00:00:00 2001 From: Reinhard Kotucha Date: Tue, 12 May 2009 20:04:43 +0000 Subject: tlgs: rm gs8.62 git-svn-id: svn://tug.org/texlive/trunk@13058 c570f23f-e606-0410-a88d-b1316a301751 --- Master/tlpkg/tlgs/lib/traceimg.ps | 42 --------------------------------------- 1 file changed, 42 deletions(-) delete mode 100644 Master/tlpkg/tlgs/lib/traceimg.ps (limited to 'Master/tlpkg/tlgs/lib/traceimg.ps') diff --git a/Master/tlpkg/tlgs/lib/traceimg.ps b/Master/tlpkg/tlgs/lib/traceimg.ps deleted file mode 100644 index 91a9850b775..00000000000 --- a/Master/tlpkg/tlgs/lib/traceimg.ps +++ /dev/null @@ -1,42 +0,0 @@ -% Copyright (C) 1994 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: traceimg.ps 6300 2005-12-28 19:56:24Z giles $ -% traceimg.ps -% Trace the data supplied to the 'image' operator. - -% This code currently handles only the (Level 2) dictionary form of image, -% with a single data source and 8-bit pixels. - -/traceimage % traceimage - - { currentcolorspace == (setcolorspace\n) print - (<<) print - dup { (\t) print exch ==only ( ) print == } forall - (>>\n) print flush - begin /i_left Width Height mul store /i_dict currentdict store end - { i_left 0 le { exit } if - i_dict /DataSource get exec - dup type /filetype eq - { i_buf 0 i_left 32 .min getinterval readstring pop - } if - dup (%stdout) (w) file exch writehexstring (\n) print flush - i_left exch length sub /i_left exch def - } loop - } bind odef - -/image /traceimage load def -/i_left 0 def -/i_dict null def -/i_buf 32 string def -- cgit v1.2.3