1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
|
<html><head><title>XLISP *standard-output*</title>
<link rel="stylesheet" type="text/css" href="reference.css">
</head>
<body>
<a href="../start.htm">Nyquist / XLISP 2.0</a> -
<a href="../manual/contents.htm">Contents</a> |
<a href="../tutorials/tutorials.htm">Tutorials</a> |
<a href="../examples/examples.htm">Examples</a> |
<a href="reference-index.htm">Reference</a>
<hr>
<h1>*standard-output*</h1>
<hr>
<p><table cellpadding="0" cellspacing="0" style="margin-left:10px"><tbody>
<tr valign="top">
<td><nobr>Type:</nobr></td>
<td><nobr> - </nobr></td>
<td width="100%"><nobr>system variable</nobr></td>
</tr>
<tr valign="top">
<td><nobr>Source:</nobr></td>
<td><nobr> - </nobr></td>
<td width="100%"><nobr>xlinit.c</nobr></td>
</tr>
</tbody></table></p>
<h2>Syntax</h2>
<dl>
<dt> *standard-output*</dt>
</dl>
<h2>Description</h2>
<p>The *standard-output* system variable contains a file pointer that points
to the file where all normal printing and messages from XLISP will go. The
default file for *standard-output* is the system standard output device,
normally the screen display.</p>
<h2>Examples</h2>
<pre class="example">
*standard-output* <font color="#008844">; returns #<File-Stream: #24406></font>
(setq old-so *standard-output*) <font color="#008844">; save the file pointer</font>
(setq fp (open "f" :direction :output)) <font color="#008844">; open a new output file</font>
(setq *standard-output* fp) <font color="#008844">; change where output goes</font>
(+ 2 2) <font color="#008844">; you won't see any messages</font>
<font color="#008844">; just the echo of input line</font>
(setq *standard-output* old-so) <font color="#008844">; restore standard output</font>
(close fp) <font color="#008844">; close file</font>
</pre>
<p><b>Note:</b> Be careful when modifying the *standard-output*, you will
not be able to see what you are doing. If you do not save the old file
pointer, you will not be able to return to normal operation and will need to
exit XLISP.</p>
<p>See the
<a href="../manual/xlisp-man-011.htm#standard-output">*standard-output*</a>
system variable in the <nobr>XLISP 2.0</nobr> manual.</p>
<p><nobr> <a href="#top">Back to Top</nobr></a></p>
<hr>
<a href="../start.htm">Nyquist / XLISP 2.0</a> -
<a href="../manual/contents.htm">Contents</a> |
<a href="../tutorials/tutorials.htm">Tutorials</a> |
<a href="../examples/examples.htm">Examples</a> |
<a href="reference-index.htm">Reference</a>
</body></html>
|
