# HG changeset patch # User Claus Gittinger # Date 854386626 -3600 # Node ID 46629b32e1d7f1623a5a1f850d32993d6a26a1ff # Parent d7717bcf2e5571b98bf4a7c3fb1aee1b776ec41c intitial checkin diff -r d7717bcf2e55 -r 46629b32e1d7 GraphicsDevice.st --- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/GraphicsDevice.st Mon Jan 27 18:37:06 1997 +0100 @@ -0,0 +1,60 @@ +" +COPYRIGHT (c) 1996 by Claus Gittinger + All Rights Reserved + + This software is furnished under a license and may be used + only in accordance with the terms of that license and with the + inclusion of the above copyright notice. This software may not + be provided or otherwise made available to, or used by, any + other person. No title to or ownership of the software is + hereby transferred. +" + + +Object subclass:#GraphicsDevice + instanceVariableNames:'displayId visualType' + classVariableNames:'' + poolDictionaries:'' + category:'Interface-Graphics' +! + +!GraphicsDevice class methodsFor:'documentation'! + +copyright +" +COPYRIGHT (c) 1996 by Claus Gittinger + All Rights Reserved + + This software is furnished under a license and may be used + only in accordance with the terms of that license and with the + inclusion of the above copyright notice. This software may not + be provided or otherwise made available to, or used by, any + other person. No title to or ownership of the software is + hereby transferred. +" + +! + +documentation +" + this abstract class was inserted to provide a home for ST-80 classes + (previously, DeviceWorkstation was directly under Object). + + [instance variables:] + displayId the device handle + visualType one of #StaticGray, #PseudoColor, ... #TrueColor + + [see also:] + DeviceWorkstation XWorkstation + + [author:] + Claus Gittinger +" + +! ! + +!GraphicsDevice class methodsFor:'documentation'! + +version + ^ '$Header: /cvs/stx/stx/libview/GraphicsDevice.st,v 1.1 1997-01-27 17:37:06 cg Exp $' +! !