webapps.wiki: adding search bar

[factor.git] / vm / dispatch.hpp

diff --git a/vm/dispatch.hpp b/vm/dispatch.hpp
index b9cbcbbd858c4911486e5429f588c9e1b6e83522..7f676212cb51817f3243bc3971a7cfab503ae2ba 100644 (file)
--- a/vm/dispatch.hpp
+++ b/vm/dispatch.hpp
@@ -1,9 +1,15 @@
-namespace factor
-{
+namespace factor {
 
-PRIMITIVE(lookup_method);
-PRIMITIVE(mega_cache_miss);
-PRIMITIVE(reset_dispatch_stats);
-PRIMITIVE(dispatch_stats);
+struct dispatch_statistics {
+  cell megamorphic_cache_hits;
+  cell megamorphic_cache_misses;
+
+  cell cold_call_to_ic_transitions;
+  cell ic_to_pic_transitions;
+  cell pic_to_mega_transitions;
+
+  cell pic_tag_count;
+  cell pic_tuple_count;
+};
 
 }