static void set_sensor_obj_at(SensorInfo** sensor_ptr, instanceHandle sh) {

  {- -------------------------------------------
  (1) 新しい SensorInfo オブジェクトを作成して, 
      引数で渡されてきた sun.management.Sensor オブジェクトをその中に登録する.
      さらに, 引数で指定されたフィールドに, その SensorInfo オブジェクトを格納しておく.
      ---------------------------------------- -}

      assert(*sensor_ptr == NULL, "Should be called only once");
      SensorInfo* sensor = new SensorInfo();
      sensor->set_sensor(sh());
      *sensor_ptr = sensor;
    }