mirror of
https://github.com/CPunch/Cosmo.git
synced 2024-11-05 16:20:06 +00:00
18 lines
476 B
C
18 lines
476 B
C
|
#include "cbaselib.h"
|
||
|
|
#include "cvalue.h"
|
||
|
|
#include "cobj.h"
|
||
|
|
|
||
|
|
void cosmoB_loadlibrary(CState *state) {
|
||
|
|
cosmoV_register(state, "print", cosmoV_newObj(cosmoO_newCFunction(state, cosmoB_print)));
|
||
|
|
}
|
||
|
|
|
||
|
|
int cosmoB_print(CState *state, int nargs, CValue *args) {
|
||
|
|
for (int i = 0; i < nargs; i++) {
|
||
|
|
CObjString *str = cosmoV_toString(state, args[i]);
|
||
|
|
printf("%s", cosmoO_readCString(str));
|
||
|
|
}
|
||
|
|
|
||
|
|
printf("\n");
|
||
|
|
|
||
|
|
return 0; // print doesn't return any args
|
||
|
|
}
|