fix missing GC check

TODO.FACTOR.txt

@@ -9,7 +9,6 @@
   io/buffer - use aliens not integers
   alien/malloc - use aliens not integers
   ui/line-editor - don't use variables
-- fix powerpc backend
 - <array> ( length initial )
 - <string> ( length initial )
 - remove repetitions

library/collections/virtual-sequences.factor

@@ -47,7 +47,7 @@ C: slice ( from to seq -- seq )
     >r 3dup check-slice r>
     [ set-slice-seq ] keep
     [ set-slice-to ] keep
-    [ set-slice-from ] keep ; inline
+    [ set-slice-from ] keep ;
 
 : <range> ( from to -- seq ) dup <slice> ; inline
 

library/test/kernel.factor

@@ -1,5 +1,8 @@
 IN: scratchpad
-USING: kernel memory sequences test ;
+USING: kernel memory namespaces sequences test ;
 
 [ 0 ] [ f size ] unit-test
 [ t ] [ [ \ = \ = ] all-equal? ] unit-test
+
+! (clone) primitive was missing GC check
+[ ] [ 1000000 [ drop H{ } clone >n n> drop ] each ] unit-test

native/memory.c

@@ -151,6 +151,7 @@ CELL clone(CELL obj)
 
 void primitive_clone(void)
 {
+	maybe_gc(0);
 	drepl(clone(dpeek()));
 }