--- old/src/share/vm/compiler/compilerOracle.cpp	2016-02-10 10:49:51.509356787 +0100
+++ new/src/share/vm/compiler/compilerOracle.cpp	2016-02-10 10:49:51.397356782 +0100
@@ -294,6 +294,26 @@
           lists[command]->match(method));
 }
 
+static void print_commandlist(OracleCommand command, outputStream* st) {
+  if (lists[command] != NULL) {
+    st->print("    %s: ", command_names[command]);
+    lists[command]->print_all(st);
+    st->cr();
+  }
+}
+
+void CompilerOracle::print_inlinecommands(outputStream* st) {
+  if (lists[InlineCommand] || lists[DontInlineCommand] || lists[ExcludeCommand] || lists[CompileOnlyCommand]) {
+    st->print_cr(" Following compile commands are in use: ");
+  } else {
+    st->cr();
+  }
+  print_commandlist(InlineCommand, st);
+  print_commandlist(DontInlineCommand, st);
+  print_commandlist(ExcludeCommand, st);
+  print_commandlist(CompileOnlyCommand, st);
+}
+
 static void add_predicate(OracleCommand command, BasicMatcher* bm) {
   assert(command != OptionCommand, "must use add_option_string");
   if (command == LogCommand && !LogCompilation && lists[LogCommand] == NULL) {