VM: removing array_to_stack() from the factor_vm class

[factor.git] / vm / contexts.cpp

diff --git a/vm/contexts.cpp b/vm/contexts.cpp
index c922090ea79c5b6e94db71870abf13969ca976f6..d110418db5052d749919e14b4af3741dbf93f7e4 100644 (file)
--- a/vm/contexts.cpp
+++ b/vm/contexts.cpp
@@ -240,7 +240,7 @@ void factor_vm::primitive_retainstack_for() {
 }
 
 // returns pointer to top of stack
-cell factor_vm::array_to_stack(array* array, cell bottom) {
+static cell array_to_stack(array* array, cell bottom) {
   cell depth = array_capacity(array) * sizeof(cell);
   memcpy((void*)bottom, array + 1, depth);
   return bottom + depth - sizeof(cell);