[Declare `js-slot-value' before first use in `etypecase' clinton@unknownlamer.org**20111130161936 Ignore-this: 6f04f3414a5a47ff574c140e56bee4db * Patch from Nikodemus Siivola * Fixes build on Lispworks ] { hunk ./src/js.lisp 658 +;; fixme: moved from object creation section to satisfy +;; lispworks. Probably better in the long run to define all of the +;; js-foo classes in one place because all of their methods &c +(defjsclass js-slot-value (expression) + ((object :initarg :object + :accessor sv-object) + (slot :initarg :slot + :accessor sv-slot))) + hunk ./src/js.lisp 865 -(defjsclass js-slot-value (expression) - ((object :initarg :object - :accessor sv-object) - (slot :initarg :slot - :accessor sv-slot))) - }