From f51c2ec764ecd6153d17c81408df5b85ee3daa8b Mon Sep 17 00:00:00 2001 From: Chris Hanson Date: Sun, 21 Jan 2018 13:27:16 -0800 Subject: [PATCH] Add unparser for variable items. --- src/runtime/syntax-items.scm | 5 +++++ 1 file changed, 5 insertions(+) diff --git a/src/runtime/syntax-items.scm b/src/runtime/syntax-items.scm index b23c90403..83b9ff7b5 100644 --- a/src/runtime/syntax-items.scm +++ b/src/runtime/syntax-items.scm @@ -75,6 +75,11 @@ USA. (make-variable-item name) variable-item? (name variable-item/name)) + +(define-unparser-method variable-item? + (simple-unparser-method 'variable-item? + (lambda (item) + (list (variable-item/name item))))) ;;; Expression items represent any kind of expression other than a ;;; run-time variable or a sequence. -- 2.25.1