diff --git a/ChangeLog b/ChangeLog
index c482dfdc55..ef50f57951 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,7 @@
+Mon Aug  6 18:41:12 2007  Koichi Sasada  <ko1@atdot.net>
+
+	* lib/vm/instruction.rb (make_header_analysys): fix last commit.
+
 Mon Aug  6 18:33:22 2007  Koichi Sasada  <ko1@atdot.net>
 
 	* lib/vm/instruction.rb (make_header_analysys): add to separate
diff --git a/lib/vm/instruction.rb b/lib/vm/instruction.rb
index af8f0ac648..183d6b4b17 100644
--- a/lib/vm/instruction.rb
+++ b/lib/vm/instruction.rb
@@ -794,6 +794,14 @@ module RubyVM
       ret
     end
 
+    def make_header_analysys insn
+      ret = "  USAGE_ANALYSIS_INSN(BIN(#{insn.name}));\n"
+      insn.opes.each_with_index{|op, i|
+        ret += "  USAGE_ANALYSIS_OPERAND(BIN(#{insn.name}), #{i}, #{op[1]});\n"
+      }
+      ret
+    end
+
     def make_header insn
       ret  = "\nINSN_ENTRY(#{insn.name}){\n"
       ret += "  /* prepare stack status */\n"                 if verbose?