fix bootstrap
parent
287207df72
commit
fd02e59ea1
|
@ -170,6 +170,7 @@ M: class initial-value* no-initial-value ;
|
||||||
: initial-value ( class -- object )
|
: initial-value ( class -- object )
|
||||||
{
|
{
|
||||||
{ [ \ f bootstrap-word over class<= ] [ f ] }
|
{ [ \ f bootstrap-word over class<= ] [ f ] }
|
||||||
|
{ [ \ array-capacity bootstrap-word over class<= ] [ 0 ] }
|
||||||
{ [ dup \ integer bootstrap-word class<= ] [ 0 ] }
|
{ [ dup \ integer bootstrap-word class<= ] [ 0 ] }
|
||||||
{ [ float bootstrap-word over class<= ] [ 0.0 ] }
|
{ [ float bootstrap-word over class<= ] [ 0.0 ] }
|
||||||
{ [ string bootstrap-word over class<= ] [ "" ] }
|
{ [ string bootstrap-word over class<= ] [ "" ] }
|
||||||
|
|
Loading…
Reference in New Issue