VM: init_inline_caching is not needed

diff --git a/vm/factor.cpp b/vm/factor.cpp
index cfd646af930f0eb79a527a3f2f08c4e6c4187c43..5a2ff698cf3f311c8802c7429d161c58f0e34d62 100644 (file)
--- a/vm/factor.cpp
+++ b/vm/factor.cpp
@@ -72,7 +72,7 @@ void factor_vm::init_factor(vm_parameters* p) {
   callbacks = new callback_heap(p->callback_size, this);
   load_image(p);
   init_c_io();
-  init_inline_caching((int)p->max_pic_size);
+  max_pic_size = (int)p->max_pic_size;
   special_objects[OBJ_CELL_SIZE] = tag_fixnum(sizeof(cell));
   special_objects[OBJ_ARGS] = false_object;
   special_objects[OBJ_EMBEDDED] = false_object;

diff --git a/vm/inline_cache.cpp b/vm/inline_cache.cpp
index ddee666a717789ecbdd1628549fc052cee084bd9..427a2418e4818eb522047b1ed2a0c03e6b561c25 100644 (file)
--- a/vm/inline_cache.cpp
+++ b/vm/inline_cache.cpp
@@ -2,8 +2,6 @@
 
 namespace factor {
 
-void factor_vm::init_inline_caching(int max_size) { max_pic_size = max_size; }
-
 void factor_vm::deallocate_inline_cache(cell return_address) {
   /* Find the call target. */
   void* old_entry_point = get_call_target(return_address);

diff --git a/vm/vm.hpp b/vm/vm.hpp
index b459792866f5436d6ee2c338f8af0064d94ca4d8..7a7d5cf20534d66842015a403d449eb4cd4d88f3 100644 (file)
--- a/vm/vm.hpp
+++ b/vm/vm.hpp
@@ -664,7 +664,6 @@ struct factor_vm {
   void primitive_dispatch_stats();
 
   /* inline cache */
-  void init_inline_caching(int max_size);
   void deallocate_inline_cache(cell return_address);
   void update_pic_count(cell type);
   code_block* compile_inline_cache(fixnum index, cell generic_word_,