diff options
| -rw-r--r-- | sly/signal.scm | 5 |
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?) |