Rosetta Code

Special variables: Difference between revisions

Page Discussion

Special variables (view source)

Revision as of 11:47, 11 April 2014

765 bytes added ,  10 years ago
→‎{{header|Common Lisp}}: Added REPL-only special variables
(→‎{{header|C}}: Added Common Lisp)
(→‎{{header|Common Lisp}}: Added REPL-only special variables)
Line 426:
lst)))
 
(format t "~{~a~%~}" (sort (special-variables) #'string<))</lang>
 
{{Out}}
<pre>(*BREAK-ON-SIGNALS* *COMPILE-FILE-PATHNAME* *COMPILE-FILE-TRUENAME* *COMPILE-PRINT* *COMPILE-VERBOSE* *DEBUG-IO*
<pre>*BREAK-ON-SIGNALS*
*DEBUGGER-HOOK* *DEFAULT-PATHNAME-DEFAULTS* *ERROR-OUTPUT* *FEATURES* *GENSYM-COUNTER* *LOAD-PATHNAME*
*COMPILE-FILE-PATHNAME*
*LOAD-PRINT* *LOAD-TRUENAME* *LOAD-VERBOSE* *MACROEXPAND-HOOK* *MODULES* *PACKAGE* *PRINT-ARRAY* *PRINT-BASE*
*COMPILE-FILE-TRUENAME*
*PRINT-CASE* *PRINT-CIRCLE* *PRINT-ESCAPE* *PRINT-GENSYM* *PRINT-LENGTH* *PRINT-LEVEL* *PRINT-LINES*
*COMPILE-PRINT*
*PRINT-MISER-WIDTH* *PRINT-PPRINT-DISPATCH* *PRINT-PRETTY* *PRINT-RADIX* *PRINT-READABLY* *PRINT-RIGHT-MARGIN*
*COMPILE-VERBOSE*
*QUERY-IO* *RANDOM-STATE* *READ-BASE* *READ-DEFAULT-FLOAT-FORMAT* *READ-EVAL* *READ-SUPPRESS* *READTABLE*
*DEBUG-IO*
*STANDARD-INPUT* *STANDARD-OUTPUT* *TERMINAL-IO* *TRACE-OUTPUT*)</pre>
*DEBUGGER-HOOK*
 
*DEFAULT-PATHNAME-DEFAULTS*
Inside the REPL, there are more special variables available:
*ERROR-OUTPUT*
 
*FEATURES*
* -: Contains the form that is currently evaluated.
*GENSYM-COUNTER*
<pre>> (format t "~a" -)
*LOAD-PATHNAME*
(FORMAT T ~a -)
*LOAD-PRINT*
NIL</pre>
*LOAD-TRUENAME*
 
*LOAD-VERBOSE*
* *, **, ***: Contain the last, penultimate, antepenultimate primary values that were printed.
*MACROEXPAND-HOOK*
<pre>> (+ 1 2)
*MODULES*
3
*PACKAGE*
> (values 1 2)
*PRINT-ARRAY*
1 ;
*PRINT-BASE*
2
*PRINT-CASE*
> (* 4 5)
*PRINT-CIRCLE*
20
*PRINT-ESCAPE*
> (list * ** ***)
*PRINT-GENSYM*
(20 1 3)</pre>
*PRINT-LENGTH*
 
*PRINT-LEVEL*
* +, ++, +++: Contain the last, penultimate, antepenultimate forms that were evaluated.
*PRINT-LINES*
<pre>> (+ 1 2)
*PRINT-MISER-WIDTH*
3
*PRINT-PPRINT-DISPATCH*
> (values 1 2)
*PRINT-PRETTY*
1 ;
*PRINT-RADIX*
2
*PRINT-READABLY*
> (* 4 5)
*PRINT-RIGHT-MARGIN*
20
*QUERY-IO*
> (list + ++ +++)
*RANDOM-STATE*
((* 4 5) (VALUES 1 2) (+ 1 2))</pre>
*READ-BASE*
 
*READ-DEFAULT-FLOAT-FORMAT*
* /, //, ///: Contain a list of the last, penultimate, antepenultimate values that were printed.
*READ-EVAL*
<pre>> (floor 10 2)
*READ-SUPPRESS*
5 ;
*READTABLE*
0
*STANDARD-INPUT*
> (values 1 'a "foo")
*STANDARD-OUTPUT*
1 ;
*TERMINAL-IO*
A ;
*TRACE-OUTPUT*</pre>
"foo"
> (+ 1 2)
3
> (list / // ///)
((3) (1 A "foo") (5 0))</pre>
 
=={{header|D}}==
Retrieved from "https://rosettacode.org/wiki/Special:MobileDiff/185371"