Add *print-circle* special variable.

* stream.c (print_circle_s): New symbol variable.
(stream_init): Initialize print_circle_s as symbol
named *print-circle*; register as special var.

* stream.h (print_circle_s): Declared.

1 files changed, 1 insertions, 1 deletions

diff --git a/stream.h b/stream.h
index 615328b8..14ef8e4f 100644
--- a/stream.h
+++ b/stream.h
@@ -116,7 +116,7 @@ extern val stdio_stream_s;
 extern val stdin_s, stdout_s, stddebug_s, stderr_s, stdnull_s;
 
 extern val print_flo_precision_s, print_flo_digits_s, print_flo_format_s;
-extern val print_base_s;
+extern val print_base_s, print_circle_s;
 
 #if HAVE_SOCKETS
 extern val socket_error_s;