예제 #1
0
/* ?unbuffered:bool -> Llvm.llmodule -> Unix.file_descr -> bool */
CAMLprim value llvm_write_bitcode_to_fd(value U, LLVMModuleRef M, value FD) {
  int Unbuffered;
  int Result;

  if (U == Val_int(0)) {
    Unbuffered = 0;
  } else {
    Unbuffered = Bool_val(Field(U, 0));
  }

  Result = LLVMWriteBitcodeToFD(M, Int_val(FD), 0, Unbuffered);
  return Val_bool(Result == 0);
}
예제 #2
0
SWIGEXPORT jint JNICALL Java_jllvm_llvm_BitWriterJNI_LLVMWriteBitcodeToFD(JNIEnv *jenv, jclass jcls, jlong jarg1, jint jarg2, jint jarg3, jint jarg4) {
  jint jresult = 0 ;
  LLVMModuleRef arg1 = (LLVMModuleRef) 0 ;
  int arg2 ;
  int arg3 ;
  int arg4 ;
  int result;
  
  (void)jenv;
  (void)jcls;
  arg1 = *(LLVMModuleRef *)&jarg1; 
  arg2 = (int)jarg2; 
  arg3 = (int)jarg3; 
  arg4 = (int)jarg4; 
  result = (int)LLVMWriteBitcodeToFD(arg1,arg2,arg3,arg4);
  jresult = (jint)result; 
  return jresult;
}