Is there a system variable I can set which will force GCL to print in lower case? For example, if I want to print out a list (1 2 3 t e) I get: (1 2 3 T E), which I don't want.
In Allegro Common Lisp, we compiled it with an option which gave lower-case output as the default. Well, I have a GCL binary, and I'm not in a position to recompile it, so I'm hoping there's a switch somewhere which would have the same effect.
| Is there a system variable I can set which will force GCL to print in | lower case? For example, if I want to print out a list (1 2 3 t e) I | get: (1 2 3 T E), which I don't want.
looks like you want to bind *PRINT-CASE* to :DOWNCASE.
| In Allegro Common Lisp, we compiled it with an option which gave | lower-case output as the default. Well, I have a GCL binary, and I'm | not in a position to recompile it, so I'm hoping there's a switch | somewhere which would have the same effect.
the above is described in CLtL1.
#<Erik> -- the greatest obstacle to communication is the illusion that it has already taken place
In article <3005937741.475...@naggum.no> Erik Naggum <e...@naggum.no> writes: >[David Finton] >| Is there a system variable I can set which will force GCL to print in >| lower case? For example, if I want to print out a list (1 2 3 t e) I >| get: (1 2 3 T E), which I don't want. >looks like you want to bind *PRINT-CASE* to :DOWNCASE.
Since *PRINT-CASE* is a relatively recent addition to Common Lisp, GCL might not have it. In that case, you can use the ~(...~) controls in FORMAT to force output to lower case. -- Barry Margolin BBN Planet Corporation, Cambridge, MA bar...@bbnplanet.com
In article <3mc3en$...@tools.near.net> bar...@nic.near.net (Barry Margolin) writes: > In article <3005937741.475...@naggum.no> Erik Naggum <e...@naggum.no> writes: > >[David Finton]
> >| Is there a system variable I can set which will force GCL to print in > >| lower case? For example, if I want to print out a list (1 2 3 t e) I > >| get: (1 2 3 T E), which I don't want.
> >looks like you want to bind *PRINT-CASE* to :DOWNCASE.
> Since *PRINT-CASE* is a relatively recent addition to Common Lisp, GCL > might not have it. In that case, you can use the ~(...~) controls in > FORMAT to force output to lower case. > --
| In article <3mc3en$...@tools.near.net> bar...@nic.near.net (Barry Margolin) writes: | | > In article <3005937741.475...@naggum.no> Erik Naggum <e...@naggum.no> writes: | > >[David Finton] | > | > >| Is there a system variable I can set which will force GCL to print in | > >| lower case? For example, if I want to print out a list (1 2 3 t e) I | > >| get: (1 2 3 T E), which I don't want. | > | > >looks like you want to bind *PRINT-CASE* to :DOWNCASE. | > | > Since *PRINT-CASE* is a relatively recent addition to Common Lisp, GCL | > might not have it. In that case, you can use the ~(...~) controls in | > FORMAT to force output to lower case. | > -- | | GCL version 1.1 has *PRINT-CASE*.
while we're at it, AKCL version 1.530, compiled on April 26, 1991, also has *PRINT-CASE*. that's the oldest running version of any *KCL I have around. GCL 1.0 also had it.
this is not intended to detract from the useful advice about ~(...~).
#<Erik> -- sufficiently advanced political correctness is indistinguishable from irony
