From 6e7dfafd860284e7e8bc7ac60f373ef777315aa0 Mon Sep 17 00:00:00 2001 From: Chris Hanson Date: Sun, 28 Jan 2018 14:50:33 -0800 Subject: [PATCH] Rename combinator-substitution -> list-substitution. --- src/runtime/syntax-rename.scm | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/src/runtime/syntax-rename.scm b/src/runtime/syntax-rename.scm index 532ccc878..e6b974682 100644 --- a/src/runtime/syntax-rename.scm +++ b/src/runtime/syntax-rename.scm @@ -289,7 +289,7 @@ USA. selector parts)))) - (define (combinator-substitution reconstruct get-subexpressions) + (define (list-substitution reconstruct get-subexpressions) (lambda (substitution expression) (reconstruct (map (lambda (expression) @@ -352,7 +352,7 @@ USA. scode-access-name)) (define-as-handler scode-combination? - (combinator-substitution + (list-substitution (lambda (subexpressions) (make-scode-combination (car subexpressions) (cdr subexpressions))) (lambda (expression) @@ -387,6 +387,6 @@ USA. scode-disjunction-alternative)) (define-as-handler scode-sequence? - (combinator-substitution make-scode-sequence scode-sequence-actions)) + (list-substitution make-scode-sequence scode-sequence-actions)) )) \ No newline at end of file -- 2.25.1