summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--sly/signal.scm5
1 files changed, 2 insertions, 3 deletions
diff --git a/sly/signal.scm b/sly/signal.scm
index 70c00ca..c1f16e7 100644
--- a/sly/signal.scm
+++ b/sly/signal.scm
@@ -1,5 +1,5 @@
;;; Sly
-;;; Copyright (C) 2013, 2014 David Thompson <dthompson2@worcester.edu>
+;;; Copyright (C) 2013, 2014, 2016 David Thompson <dthompson2@worcester.edu>
;;;
;;; This program is free software: you can redistribute it and/or
;;; modify it under the terms of the GNU General Public License as
@@ -93,8 +93,7 @@
<signal-box>
(lambda (box port)
(let ((signal (signal-unbox box)))
- (format port "#<signal value: ~a inputs: ~a>"
- (%signal-ref signal) (signal-inputs signal)))))
+ (format port "~a" (%signal-ref signal)))))
;; Alternate spelling of signal-box? for the public API.
(define signal? signal-box?)