DataMuseum.dk

Presents historical artifacts from the history of:

DKUUG/EUUG Conference tapes

This is an automatic "excavation" of a thematic subset of
artifacts from Datamuseum.dk's BitArchive.

See our Wiki for more about DKUUG/EUUG Conference tapes

Excavated with: AutoArchaeologist - Free & Open Source Software.


top - metrics - download
Index: T g

⟦616e46980⟧ TextFile

    Length: 1733 (0x6c5)
    Types: TextFile
    Names: »gdevs.ps«

Derivation

└─⟦a05ed705a⟧ Bits:30007078 DKUUG GNU 2/12/89
    └─⟦ff23ba0e6⟧ »./ghostscript-1.3.tar.Z« 
        └─⟦a24a58cd3⟧ 
            └─⟦this⟧ »gdevs.ps« 

TextFile

%    Copyright (C) 1989 Aladdin Enterprises.  All rights reserved.
%    Distributed by Free Software Foundation, Inc.
%
% This file is part of Ghostscript.
%
% Ghostscript is distributed in the hope that it will be useful, but
% WITHOUT ANY WARRANTY.  No author or distributor accepts responsibility
% to anyone for the consequences of using it or for whether it serves any
% particular purpose or works at all, unless he says so in writing.  Refer
% to the Ghostscript General Public License for full details.
%
% Everyone is granted permission to copy, modify and redistribute
% Ghostscript, but only under the conditions described in the Ghostscript
% General Public License.  A copy of this license is supposed to have been
% given to you along with Ghostscript so you can know your rights and
% responsibilities.  It should be in a file named COPYING.  Among other
% things, the copyright notice and this notice must be preserved on all
% copies.

% Device-specific initialization for Ghostscript, version 1.3.
% The interpreter predefines the name defaultdevicename
% as a string which is the default (currently, the only) device name.

/defaultdevicename defaultdevicename def	% only evaluate once
/.ifdevice { defaultdevicename eq { exec stop } { pop } ifelse } def

{

% Device parameters for X Windows
 {	/.device.width 8.5 72 mul cvi def
	/.device.height 11 72 mul def
	/.pixel.size 1 def	% pixel width in points
	/.aspect.ratio 1 def	% pixel height/width
 } (X) .ifdevice

% Device parameters for EGA
 {	/.device.width 640 def
	/.device.height 350 def
	/.pixel.size 1 def
	/.aspect.ratio 14 11 div def
 } (EGA) .ifdevice

% Undefined device
(Unknown device ) print defaultdevicename print (\n) print flush

} stopped pop