~ubuntu-branches/ubuntu/hardy/ghostscript/hardy

« back to all changes in this revision

Viewing changes to src/zsysvm.c

  • Committer: Bazaar Package Importer
  • Author(s): Till Kamppeter
  • Date: 2007-11-22 12:17:43 UTC
  • mfrom: (1.1.7 upstream)
  • Revision ID: james.westby@ubuntu.com-20071122121743-cd70s3ypq0r243mp
Tags: 8.61.dfsg.1-0ubtuntu1
* New upstream release
  o Final 8.61 release
* debian/patches/09_ijs_krgb_support.dpatch: Adapted to upstream changes.
* debian/rules: Updated CUPS-related variables for "make install" calls.
* debian/rules: Remove /usr/include/ghostscript from the ghostscript
  package, they go into lings-dev.

Show diffs side-by-side

added added

removed removed

Lines of Context:
11
11
   San Rafael, CA  94903, U.S.A., +1(415)492-9861, for further information.
12
12
*/
13
13
 
14
 
/* $Id: zsysvm.c 8022 2007-06-05 22:23:38Z giles $ */
 
14
/* $Id: zsysvm.c 8250 2007-09-25 13:31:24Z giles $ */
15
15
/* System VM and VM-specific operators */
16
16
#include "ghost.h"
17
17
#include "oper.h"
28
28
 */
29
29
 
30
30
/* Execute an operator with a specific VM selected as current VM. */
31
 
private int
 
31
static int
32
32
specific_vm_op(i_ctx_t *i_ctx_p, op_proc_t opproc, uint space)
33
33
{
34
34
    uint save_space = icurrent_space;
41
41
}
42
42
 
43
43
/* <int> .globalvmarray <array> */
44
 
private int
 
44
static int
45
45
zglobalvmarray(i_ctx_t *i_ctx_p)
46
46
{
47
47
    return specific_vm_op(i_ctx_p, zarray, avm_global);
48
48
}
49
49
 
50
50
/* <int> .globalvmdict <dict> */
51
 
private int
 
51
static int
52
52
zglobalvmdict(i_ctx_t *i_ctx_p)
53
53
{
54
54
    return specific_vm_op(i_ctx_p, zdict, avm_global);
55
55
}
56
56
 
57
57
/* <obj_0> ... <obj_n-1> <n> .globalvmpackedarray <packedarray> */
58
 
private int
 
58
static int
59
59
zglobalvmpackedarray(i_ctx_t *i_ctx_p)
60
60
{
61
61
    return specific_vm_op(i_ctx_p, zpackedarray, avm_global);
62
62
}
63
63
 
64
64
/* <int> .globalvmstring <string> */
65
 
private int
 
65
static int
66
66
zglobalvmstring(i_ctx_t *i_ctx_p)
67
67
{
68
68
    return specific_vm_op(i_ctx_p, zstring, avm_global);
69
69
}
70
70
 
71
71
/* <int> .localvmarray <array> */
72
 
private int
 
72
static int
73
73
zlocalvmarray(i_ctx_t *i_ctx_p)
74
74
{
75
75
    return specific_vm_op(i_ctx_p, zarray, avm_local);
76
76
}
77
77
 
78
78
/* <int> .localvmdict <dict> */
79
 
private int
 
79
static int
80
80
zlocalvmdict(i_ctx_t *i_ctx_p)
81
81
{
82
82
    return specific_vm_op(i_ctx_p, zdict, avm_local);
83
83
}
84
84
 
85
85
/* <obj_0> ... <obj_n-1> <n> .localvmpackedarray <packedarray> */
86
 
private int
 
86
static int
87
87
zlocalvmpackedarray(i_ctx_t *i_ctx_p)
88
88
{
89
89
    return specific_vm_op(i_ctx_p, zpackedarray, avm_local);
90
90
}
91
91
 
92
92
/* <int> .localvmstring <string> */
93
 
private int
 
93
static int
94
94
zlocalvmstring(i_ctx_t *i_ctx_p)
95
95
{
96
96
    return specific_vm_op(i_ctx_p, zstring, avm_local);
97
97
}
98
98
 
99
99
/* <int> .systemvmarray <array> */
100
 
private int
 
100
static int
101
101
zsystemvmarray(i_ctx_t *i_ctx_p)
102
102
{
103
103
    return specific_vm_op(i_ctx_p, zarray, avm_system);
104
104
}
105
105
 
106
106
/* <int> .systemvmdict <dict> */
107
 
private int
 
107
static int
108
108
zsystemvmdict(i_ctx_t *i_ctx_p)
109
109
{
110
110
    return specific_vm_op(i_ctx_p, zdict, avm_system);
111
111
}
112
112
 
113
113
/* <obj_0> ... <obj_n-1> <n> .systemvmpackedarray <packedarray> */
114
 
private int
 
114
static int
115
115
zsystemvmpackedarray(i_ctx_t *i_ctx_p)
116
116
{
117
117
    return specific_vm_op(i_ctx_p, zpackedarray, avm_system);
118
118
}
119
119
 
120
120
/* <int> .systemvmstring <string> */
121
 
private int
 
121
static int
122
122
zsystemvmstring(i_ctx_t *i_ctx_p)
123
123
{
124
124
    return specific_vm_op(i_ctx_p, zstring, avm_system);
125
125
}
126
126
 
127
127
/* <name_string> <access_string> .systemvmfile <file> */
128
 
private int
 
128
static int
129
129
zsystemvmfile(i_ctx_t *i_ctx_p)
130
130
{
131
131
    return specific_vm_op(i_ctx_p, zfile, avm_system);
133
133
 
134
134
/* <string> .systemvmlibfile <file> true */
135
135
/* <string> .systemvmlibfile <string> false */
136
 
private int
 
136
static int
137
137
zsystemvmlibfile(i_ctx_t *i_ctx_p)
138
138
{
139
139
    return specific_vm_op(i_ctx_p, zlibfile, avm_system);
142
142
/* <source> <EODcount> <EODstring> .systemvmSFD <file> */
143
143
/* <source> <dict> <EODcount> <EODstring> .systemvmSFD <file> */
144
144
/* <source> <dict> .systemvmSFD <file> *//* (LL3 only) */
145
 
private int
 
145
static int
146
146
zsystemvmSFD(i_ctx_t *i_ctx_p)
147
147
{
148
148
    return specific_vm_op(i_ctx_p, zSFD, avm_system);
149
149
}
150
150
 
151
151
/* <any> .systemvmcheck <bool> */
152
 
private int
 
152
static int
153
153
zsystemvmcheck(i_ctx_t *i_ctx_p)
154
154
{
155
155
    os_ptr op = osp;