// method_oop - pre-checked for validity, but may be NULL meaning obsolete method

jvmtiError
JvmtiEnv::SetBreakpoint(methodOop method_oop, jlocation location) {

  {- -------------------------------------------
  (1) method_oop 引数が NULL の場合は, ここでリターン(JVMTI_ERROR_INVALID_METHODID).
      ---------------------------------------- -}

      NULL_CHECK(method_oop, JVMTI_ERROR_INVALID_METHODID);

  {- -------------------------------------------
  (1) location 引数が負値だったりコードサイズを越えていたら, ここでリターン(JVMTI_ERROR_INVALID_LOCATION).
      ---------------------------------------- -}

      if (location < 0) {   // simple invalid location check first
        return JVMTI_ERROR_INVALID_LOCATION;
      }
      // verify that the breakpoint is not past the end of the method
      if (location >= (jlocation) method_oop->code_size()) {
        return JVMTI_ERROR_INVALID_LOCATION;
      }

  {- -------------------------------------------
  (1) (変数宣言など)

      (なお, JvmtiBreakpoints オブジェクトが作られていなかった場合は
       この JvmtiCurrentBreakpoints::get_jvmti_breakpoints() 呼び出し時に遅延生成される)
      ---------------------------------------- -}

      ResourceMark rm;
      JvmtiBreakpoint bp(method_oop, location);
      JvmtiBreakpoints& jvmti_breakpoints = JvmtiCurrentBreakpoints::get_jvmti_breakpoints();

  {- -------------------------------------------
  (1) JvmtiBreakpoints::set() を呼んで, 引数で指定された地点を新規のブレークポイントとして登録する.
      (ただし, もし既にブレークポイントになっていれば(= 既に _bps 内に記録されていれば), 
       ここでエラーをリターン(JVMTI_ERROR_DUPLICATE))
      ---------------------------------------- -}

      if (jvmti_breakpoints.set(bp) == JVMTI_ERROR_DUPLICATE)
        return JVMTI_ERROR_DUPLICATE;

  {- -------------------------------------------
  (1) (トレース出力)
      ---------------------------------------- -}

      if (TraceJVMTICalls) {
        jvmti_breakpoints.print();
      }

  {- -------------------------------------------
  (1) リターン
      ---------------------------------------- -}

      return JVMTI_ERROR_NONE;
    } /* end SetBreakpoint */