]> gitweb.factorcode.org Git - factor.git/commitdiff
cocoa.messages: with-out-parameters has a local alloc error, so don't use it..
authorDoug Coleman <doug.coleman@gmail.com>
Sun, 29 Jan 2023 03:43:37 +0000 (21:43 -0600)
committerDoug Coleman <doug.coleman@gmail.com>
Sun, 29 Jan 2023 03:52:59 +0000 (21:52 -0600)
basis/cocoa/messages/messages.factor

index 77ee8bbd9ceceea5232fca66e7c29231dd77d737..5775fec4af00f1ab7346ff9cbe4339365af2ec77 100644 (file)
@@ -250,7 +250,7 @@ ERROR: no-objc-type name ;
 : each-method-in-class ( class quot: ( classname method -- ) -- )
     [
         [ class_getName ] keep
-        { uint } [ class_copyMethodList ] with-out-parameters
+        0 uint <ref> [ class_copyMethodList ] keep uint deref
     ] dip over 0 = [ 4drop ] [
         [ void* <c-direct-array> ] dip
         [ with each ] [ drop (free) ] 2bi