mirror of
https://github.com/CPunch/Cosmo.git
synced 2025-10-27 11:20:06 +00:00
Initial commit
This commit is contained in:
18
src/cbaselib.c
Normal file
18
src/cbaselib.c
Normal file
@@ -0,0 +1,18 @@
|
||||
#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
|
||||
}
|
||||
Reference in New Issue
Block a user