mirror of
https://github.com/Stichting-MINIX-Research-Foundation/xsrc.git
synced 2025-09-09 04:38:21 -04:00
97 lines
3.1 KiB
Plaintext
97 lines
3.1 KiB
Plaintext
/*
|
|
* dpsopstack.psw -- wrapped procedures for sending and getting operands
|
|
*
|
|
* (c) Copyright 1988-1994 Adobe Systems Incorporated.
|
|
* All rights reserved.
|
|
*
|
|
* Permission to use, copy, modify, distribute, and sublicense this software
|
|
* and its documentation for any purpose and without fee is hereby granted,
|
|
* provided that the above copyright notices appear in all copies and that
|
|
* both those copyright notices and this permission notice appear in
|
|
* supporting documentation and that the name of Adobe Systems Incorporated
|
|
* not be used in advertising or publicity pertaining to distribution of the
|
|
* software without specific, written prior permission. No trademark license
|
|
* to use the Adobe trademarks is hereby granted. If the Adobe trademark
|
|
* "Display PostScript"(tm) is used to describe this software, its
|
|
* functionality or for any other purpose, such use shall be limited to a
|
|
* statement that this software works in conjunction with the Display
|
|
* PostScript system. Proper trademark attribution to reflect Adobe's
|
|
* ownership of the trademark shall be given whenever any such reference to
|
|
* the Display PostScript system is made.
|
|
*
|
|
* ADOBE MAKES NO REPRESENTATIONS ABOUT THE SUITABILITY OF THE SOFTWARE FOR
|
|
* ANY PURPOSE. IT IS PROVIDED "AS IS" WITHOUT EXPRESS OR IMPLIED WARRANTY.
|
|
* ADOBE DISCLAIMS ALL WARRANTIES WITH REGARD TO THIS SOFTWARE, INCLUDING ALL
|
|
* IMPLIED WARRANTIES OF MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
|
|
* NON- INFRINGEMENT OF THIRD PARTY RIGHTS. IN NO EVENT SHALL ADOBE BE LIABLE
|
|
* TO YOU OR ANY OTHER PARTY FOR ANY SPECIAL, INDIRECT, OR CONSEQUENTIAL
|
|
* DAMAGES OR ANY DAMAGES WHATSOEVER WHETHER IN AN ACTION OF CONTRACT,
|
|
* NEGLIGENCE, STRICT LIABILITY OR ANY OTHER ACTION ARISING OUT OF OR IN
|
|
* CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE. ADOBE WILL NOT
|
|
* PROVIDE ANY TRAINING OR OTHER SUPPORT FOR THE SOFTWARE.
|
|
*
|
|
* Adobe, PostScript, and Display PostScript are trademarks of Adobe Systems
|
|
* Incorporated which may be registered in certain jurisdictions
|
|
*
|
|
* Author: Adobe Systems Incorporated
|
|
*/
|
|
|
|
defineps DPSgetboolean(DPSContext ctxt | boolean *it)
|
|
it
|
|
endps
|
|
|
|
defineps DPSgetchararray(DPSContext ctxt; int size | char s[size])
|
|
s
|
|
endps
|
|
|
|
defineps DPSgetfloat(DPSContext ctxt | float *it)
|
|
it
|
|
endps
|
|
|
|
defineps DPSgetfloatarray(DPSContext ctxt; int size | float a[size])
|
|
dup type /arraytype eq { a } { size { a } repeat } ifelse
|
|
endps
|
|
|
|
defineps DPSgetint(DPSContext ctxt | int *it)
|
|
it
|
|
endps
|
|
|
|
defineps DPSgetintarray(DPSContext ctxt; int size | int a[size])
|
|
dup type /arraytype eq { a } { size { a } repeat } ifelse
|
|
endps
|
|
|
|
defineps DPSgetstring(DPSContext ctxt | char *s)
|
|
s
|
|
endps
|
|
|
|
defineps DPSsendboolean(DPSContext ctxt; boolean it)
|
|
it
|
|
endps
|
|
|
|
defineps DPSsendchararray(DPSContext ctxt; char s[size]; int size)
|
|
(s)
|
|
endps
|
|
|
|
defineps DPSsendfloat(DPSContext ctxt; float it)
|
|
it
|
|
endps
|
|
|
|
defineps DPSsendfloatarray(DPSContext ctxt; float a[size]; int size)
|
|
a
|
|
endps
|
|
|
|
defineps DPSsendint(DPSContext ctxt; int it)
|
|
it
|
|
endps
|
|
|
|
defineps DPSsendintarray(DPSContext ctxt; int a[size]; int size)
|
|
a
|
|
endps
|
|
|
|
defineps DPSsendstring(DPSContext ctxt; char *s)
|
|
(s)
|
|
endps
|
|
|
|
|
|
|