src/share/vm/opto/runtime.cpp

*** 985,995 ****
--- 985,1013 ----
    fields[TypeFunc::Parms+0] = TypeInt::INT;
    const TypeTuple* range = TypeTuple::make(TypeFunc::Parms+1, fields);
    return TypeFunc::make(domain, range);
  }
  
+ // GHASH block processing
+ const TypeFunc* OptoRuntime::ghash_processBlocks_Type() {
+     int argcnt = 4;
  
+     const Type** fields = TypeTuple::fields(argcnt);
+     int argp = TypeFunc::Parms;
+     fields[argp++] = TypePtr::NOTNULL;    // state
+     fields[argp++] = TypePtr::NOTNULL;    // subkeyH
+     fields[argp++] = TypePtr::NOTNULL;    // data
+     fields[argp++] = TypeInt::INT;        // blocks
+     assert(argp == TypeFunc::Parms+argcnt, "correct decoding");
+     const TypeTuple* domain = TypeTuple::make(TypeFunc::Parms+argcnt, fields);
+ 
+     // result type needed
+     fields = TypeTuple::fields(1);
+     fields[TypeFunc::Parms+0] = NULL; // void
+     const TypeTuple* range = TypeTuple::make(TypeFunc::Parms, fields);
+     return TypeFunc::make(domain, range);
+ }
  
  //------------- Interpreter state access for on stack replacement
  const TypeFunc* OptoRuntime::osr_end_Type() {
    // create input type (domain)
    const Type **fields = TypeTuple::fields(1);