Mercurial > hg > plml
diff cpp/plml.cpp @ 37:89688ebc447f tip
Deprecating this repository.
author | samer |
---|---|
date | Mon, 05 Jan 2015 17:42:03 +0000 |
parents | 4269030c3f55 |
children |
line wrap: on
line diff
--- a/cpp/plml.cpp Thu Feb 06 16:26:30 2014 +0000 +++ b/cpp/plml.cpp Mon Jan 05 17:42:03 2015 +0000 @@ -260,32 +260,32 @@ } install_t install() { - PL_register_foreign("mlOPEN", 2, (void *)mlOpen, 0); - PL_register_foreign("mlCLOSE", 1, (void *)mlClose, 0); - PL_register_foreign("mlEXEC", 2, (void *)mlExec, 0); - PL_register_foreign("mlWSNAME", 3, (void *)mlWSName, 0); - PL_register_foreign("mlWSALLOC", 2, (void *)mlWSAlloc, 0); - PL_register_foreign("mlWSGET", 2, (void *)mlWSGet,0); - PL_register_foreign("mlWSPUT", 2, (void *)mlWSPut, 0); - PL_register_foreign("mlMX2ATOM", 2, (void *)mlMx2Atom, 0); - PL_register_foreign("mlMX2FLOAT", 2, (void *)mlMx2Float, 0); - PL_register_foreign("mlMX2LOGICAL", 2, (void *)mlMx2Logical, 0); - PL_register_foreign("mlMX2STRING", 2, (void *)mlMx2String, 0); - PL_register_foreign("mlMXINFO", 3, (void *)mlMxInfo, 0); - PL_register_foreign("mlSUB2IND", 3, (void *)mlMxSub2Ind, 0); - PL_register_foreign("mlGETFLOAT", 3, (void *)mlMxGetFloat, 0); - PL_register_foreign("mlGETLOGICAL", 3, (void *)mlMxGetLogical, 0); - PL_register_foreign("mlGETCELL", 3, (void *)mlMxGetCell, 0); - PL_register_foreign("mlGETFIELD", 4, (void *)mlMxGetField, 0); - PL_register_foreign("mlGETREALS", 2, (void *)mlMxGetReals, 0); - PL_register_foreign("mlCREATENUMERIC", 2, (void *)mlMxCreateNumeric, 0); - PL_register_foreign("mlCREATECELL", 2, (void *)mlMxCreateCell, 0); - PL_register_foreign("mlCREATESTRING", 2, (void *)mlMxCreateString, 0); - PL_register_foreign("mlPUTFLOAT", 3, (void *)mlMxPutFloat, 0); - PL_register_foreign("mlPUTFLOATS", 3, (void *)mlMxPutFloats, 0); - PL_register_foreign("mlPUTCELL", 3, (void *)mlMxPutCell, 0); - PL_register_foreign("mlCOPYNOGC", 2, (void *)mlMxCopyNoGC, 0); - PL_register_foreign("mlNEWREFGC", 2, (void *)mlMxNewRefGC, 0); + PL_register_foreign("mlOPEN", 2, (void (*)())mlOpen, 0); + PL_register_foreign("mlCLOSE", 1, (void (*)())mlClose, 0); + PL_register_foreign("mlEXEC", 2, (void (*)())mlExec, 0); + PL_register_foreign("mlWSNAME", 3, (void (*)())mlWSName, 0); + PL_register_foreign("mlWSALLOC", 2, (void (*)())mlWSAlloc, 0); + PL_register_foreign("mlWSGET", 2, (void (*)())mlWSGet,0); + PL_register_foreign("mlWSPUT", 2, (void (*)())mlWSPut, 0); + PL_register_foreign("mlMX2ATOM", 2, (void (*)())mlMx2Atom, 0); + PL_register_foreign("mlMX2FLOAT", 2, (void (*)())mlMx2Float, 0); + PL_register_foreign("mlMX2LOGICAL", 2, (void (*)())mlMx2Logical, 0); + PL_register_foreign("mlMX2STRING", 2, (void (*)())mlMx2String, 0); + PL_register_foreign("mlMXINFO", 3, (void (*)())mlMxInfo, 0); + PL_register_foreign("mlSUB2IND", 3, (void (*)())mlMxSub2Ind, 0); + PL_register_foreign("mlGETFLOAT", 3, (void (*)())mlMxGetFloat, 0); + PL_register_foreign("mlGETLOGICAL", 3, (void (*)())mlMxGetLogical, 0); + PL_register_foreign("mlGETCELL", 3, (void (*)())mlMxGetCell, 0); + PL_register_foreign("mlGETFIELD", 4, (void (*)())mlMxGetField, 0); + PL_register_foreign("mlGETREALS", 2, (void (*)())mlMxGetReals, 0); + PL_register_foreign("mlCREATENUMERIC", 2, (void (*)())mlMxCreateNumeric, 0); + PL_register_foreign("mlCREATECELL", 2, (void (*)())mlMxCreateCell, 0); + PL_register_foreign("mlCREATESTRING", 2, (void (*)())mlMxCreateString, 0); + PL_register_foreign("mlPUTFLOAT", 3, (void (*)())mlMxPutFloat, 0); + PL_register_foreign("mlPUTFLOATS", 3, (void (*)())mlMxPutFloats, 0); + PL_register_foreign("mlPUTCELL", 3, (void (*)())mlMxPutCell, 0); + PL_register_foreign("mlCOPYNOGC", 2, (void (*)())mlMxCopyNoGC, 0); + PL_register_foreign("mlNEWREFGC", 2, (void (*)())mlMxNewRefGC, 0); mx_blob.magic = PL_BLOB_MAGIC; mx_blob.flags = PL_BLOB_UNIQUE;