diff --git a/vm/callstack.hpp b/vm/callstack.hpp
index e17f36895a..8104bebb68 100755
--- a/vm/callstack.hpp
+++ b/vm/callstack.hpp
@@ -49,20 +49,6 @@ inline void factor_vm::iterate_callstack_object_reversed(callstack *stack_, Iter
 	iterate_callstack_object_reversed(stack_, iterator, none);
 }
 
-template<typename Iterator>
-inline void factor_vm::iterate_callstack_object(callstack *stack_, Iterator &iterator)
-{
-	data_root<callstack> stack(stack_,this);
-	fixnum frame_offset = factor::untag_fixnum(stack->length) - sizeof(stack_frame);
-
-	while(frame_offset >= 0)
-	{
-		stack_frame *frame = stack->frame_at(frame_offset);
-		frame_offset -= frame->size;
-		iterator(frame);
-	}
-}
-
 template<typename Iterator, typename Fixup>
 inline void factor_vm::iterate_callstack_reversed(context *ctx, Iterator &iterator, Fixup &fixup)
 {
diff --git a/vm/vm.hpp b/vm/vm.hpp
index 07ebcc1f1a..87e6541725 100755
--- a/vm/vm.hpp
+++ b/vm/vm.hpp
@@ -621,10 +621,6 @@ struct factor_vm
 	bool read_embedded_image_footer(FILE *file, embedded_image_footer *footer);
 	bool embedded_image_p();
 
-	// callstack
-	template<typename Iterator>
-	void iterate_callstack_object(callstack *stack_, Iterator &iterator);
-
 	template<typename Iterator, typename Fixup>
 	void iterate_callstack_object_reversed(callstack *stack_, Iterator &iterator,
 		Fixup &fixup);