CPunch/Cosmo
1
0
Fork 0
mirror of https://github.com/CPunch/Cosmo.git synced 2024-11-05 00:00:10 +00:00
Code Issues Packages Projects Releases Wiki Activity

Added error to the base library

Browse Source
This commit is contained in:
Inversion 2021-02-10 21:48:41 -08:00 committed by cpunch
parent 1539a7e676
commit ce844dc110
1 changed files with 20 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

22
src/cbaselib.c
View File

@ -110,6 +110,22 @@ int cosmoB_loadstring(CState *state, int nargs, CValue *args) {
return 2; // <boolean>, <closure> or <error> return 2; // <boolean>, <closure> or <error>
} }
int cosmoB_error(CState *state, int nargs, CValue *args) {
if (nargs < 1) {
cosmoV_error(state, "error() expected 1 argument, got %d!", nargs);
return 0;
}
if (!IS_STRING(args[0])) {
cosmoV_typeError(state, "error()", "<string>", "%s", cosmoV_typeStr(args[0]));
return 0;
}
cosmoV_error(state, "%s", cosmoO_readCString(cosmoV_readString(args[0])));
return 0;
}
void cosmoB_loadLibrary(CState *state) { void cosmoB_loadLibrary(CState *state) {
const char *identifiers[] = { const char *identifiers[] = {
"print", "print",
@ -118,7 +134,8 @@ void cosmoB_loadLibrary(CState *state) {
"pcall", "pcall",
"tonumber", "tonumber",
"tostring", "tostring",
"loadstring" "loadstring",
"error"
}; };
CosmoCFunction baseLib[] = { CosmoCFunction baseLib[] = {
@ -128,7 +145,8 @@ void cosmoB_loadLibrary(CState *state) {
cosmoB_pcall, cosmoB_pcall,
cosmoB_tonumber, cosmoB_tonumber,
cosmoB_tostring, cosmoB_tostring,
cosmoB_loadstring cosmoB_loadstring,
cosmoB_error
}; };
int i; int i;