From 6a52aa26109ac2650040060430417d662ec86ce7 Mon Sep 17 00:00:00 2001 From: stibear Date: Sat, 30 Aug 2014 15:31:26 +0900 Subject: [PATCH] setter -> @@setter --- piclib/srfi/17.scm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/piclib/srfi/17.scm b/piclib/srfi/17.scm index 5b3c019d..eb02e66e 100644 --- a/piclib/srfi/17.scm +++ b/piclib/srfi/17.scm @@ -24,7 +24,7 @@ (error "No setter found"))))) (set-setter! (lambda (proc setter) - (dictionary-set! (attribute proc) 'setter setter)))) + (dictionary-set! (attribute proc) '@@setter setter)))) (set-setter! setter set-setter!) setter))