Lines Matching defs:output_stream
147 LispObj *output_stream;
149 output_stream = ARGUMENT(0);
151 if (output_stream == UNSPEC)
152 output_stream = NIL;
153 else if (output_stream != NIL) {
154 CHECK_STREAM(output_stream);
156 if (LispGetColumn(output_stream)) {
157 LispWriteChar(output_stream, '\n');
158 if (output_stream == NIL ||
159 (output_stream->data.stream.type == LispStreamStandard &&
160 output_stream->data.stream.source.file == Stdout))
174 LispObj *object, *output_stream;
176 output_stream = ARGUMENT(1);
179 if (output_stream == UNSPEC)
180 output_stream = NIL;
181 LispPrint(object, output_stream, 0);
193 LispObj *object, *output_stream;
195 output_stream = ARGUMENT(1);
198 if (output_stream == UNSPEC)
199 output_stream = NIL;
203 LispPrint(object, output_stream, 0);
215 LispObj *object, *output_stream;
217 output_stream = ARGUMENT(1);
220 if (output_stream == UNSPEC)
221 output_stream = NIL;
222 LispWriteChar(output_stream, '\n');
223 LispPrint(object, output_stream, 0);
224 LispWriteChar(output_stream, ' ');
235 LispObj *output_stream;
237 output_stream = ARGUMENT(0);
239 if (output_stream == UNSPEC)
240 output_stream = NIL;
241 else if (output_stream != NIL) {
242 CHECK_STREAM(output_stream);
244 LispWriteChar(output_stream, '\n');
245 if (output_stream == NIL ||
246 (output_stream->data.stream.type == LispStreamStandard &&
247 output_stream->data.stream.source.file == Stdout))
306 LispObj *character, *output_stream;
308 output_stream = ARGUMENT(1);
311 if (output_stream == UNSPEC)
312 output_stream = NIL;
316 LispWriteChar(output_stream, ch);