factor: Rename MACRO: and MACRO: to have quot as the output in stack effects.

[factor.git] / basis / classes / struct / struct.factor

diff --git a/basis/classes/struct/struct.factor b/basis/classes/struct/struct.factor
index b7a68163c6e9f7aa81baf9e70ee72da2ce5d8254..07ad7df82dc86d6fb538597d270cbe6d0dffbe89 100644 (file)
--- a/basis/classes/struct/struct.factor
+++ b/basis/classes/struct/struct.factor
@@ -138,11 +138,11 @@ M: struct-bit-slot-spec (writer-quot)
 : (unboxer-quot) ( class -- quot )
     drop [ >c-ptr ] ;
 
-MACRO: read-struct-slot ( slot -- )
+MACRO: read-struct-slot ( slot -- quot )
     dup type>> add-depends-on-c-type
     (reader-quot) ;
 
-MACRO: write-struct-slot ( slot -- )
+MACRO: write-struct-slot ( slot -- quot )
     dup type>> add-depends-on-c-type
     (writer-quot) ;
 PRIVATE>