diff --git a/vm/math.cpp b/vm/math.cpp
index bb18139246..ce8ac6eaf4 100755
--- a/vm/math.cpp
+++ b/vm/math.cpp
@@ -213,17 +213,6 @@ void factor_vm::primitive_bignum_log2()
 	ctx->replace(tag<bignum>(bignum_integer_length(untag<bignum>(ctx->peek()))));
 }
 
-unsigned int factor_vm::bignum_producer(unsigned int digit)
-{
-	unsigned char *ptr = (unsigned char *)alien_offset(ctx->peek());
-	return *(ptr + digit);
-}
-
-unsigned int bignum_producer(unsigned int digit, factor_vm *parent)
-{
-	return parent->bignum_producer(digit);
-}
-
 cell factor_vm::unbox_array_size_slow()
 {
 	if(tagged<object>(ctx->peek()).type() == BIGNUM_TYPE)
diff --git a/vm/vm.hpp b/vm/vm.hpp
index 3ee9937d8f..ed7f9bf6d0 100755
--- a/vm/vm.hpp
+++ b/vm/vm.hpp
@@ -453,7 +453,6 @@ struct factor_vm
 	void primitive_bignum_not();
 	void primitive_bignum_bitp();
 	void primitive_bignum_log2();
-	unsigned int bignum_producer(unsigned int digit);
 	inline cell unbox_array_size();
 	cell unbox_array_size_slow();
 	void primitive_fixnum_to_float();