|
From: | Chicken Trac |
Subject: | [Chicken-janitors] #460: coops: anonymous classes can't be used as metaclasses |
Date: | Sat, 18 Dec 2010 21:55:28 -0000 |
#460: coops: anonymous classes can't be used as metaclasses -----------------------------------------+---------------------------------- Reporter: syn | Owner: felix Type: defect | Status: new Priority: minor | Milestone: 4.7.0 Component: extensions | Version: 4.6.x Keywords: coops anonymous metaclasses | -----------------------------------------+---------------------------------- This program reproduces the issue: {{{ (use coops) (define-class <foo> () () metaclass: (make-class (<standard-class>) ((bar 1)))) (print (slot-value <foo> 'bar)) }}} It results in this error: {{{ Error: (slot-value) slot not found bar #<coops standard-class `<foo>'> }}} -- Ticket URL: <http://bugs.call-cc.org/ticket/460> Chicken Scheme <http://www.call-with-current-continuation.org/> Chicken Scheme is a compiler for the Scheme programming language.
[Prev in Thread] | Current Thread | [Next in Thread] |