]> gitweb.factorcode.org Git - factor.git/commitdiff
fix bootstrap
authorJoe Groff <joe@victoria.(none)>
Thu, 13 Aug 2009 16:05:20 +0000 (12:05 -0400)
committerJoe Groff <joe@victoria.(none)>
Thu, 13 Aug 2009 16:05:20 +0000 (12:05 -0400)
core/slots/slots.factor

index 7e86bd93ee36106660415e927dc64b3df111c057..7b117ac4122aa432215ac526582aff1bb62d33a3 100755 (executable)
@@ -170,6 +170,7 @@ M: class initial-value* no-initial-value ;
 : initial-value ( class -- object )
     {
         { [ \ f bootstrap-word over class<= ] [ f ] }
+        { [ \ array-capacity bootstrap-word over class<= ] [ 0 ] }
         { [ dup \ integer bootstrap-word class<= ] [ 0 ] }
         { [ float bootstrap-word over class<= ] [ 0.0 ] }
         { [ string bootstrap-word over class<= ] [ "" ] }