Ratstail91/Airport
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Tweaked some identifier checks

Browse Source
This commit is contained in:
Kayne Ruse
2022-10-08 17:35:41 +01:00
parent 0b4a6097be
commit 2b0e71b6fb
1 changed files with 19 additions and 51 deletions
Download Patch File Download Diff File Expand all files Collapse all files

70
core/lib_engine.c
View File

@@ -221,15 +221,10 @@ static int nativeInitNode(Interpreter* interpreter, LiteralArray* arguments) {
Literal node = popLiteralArray(arguments); Literal node = popLiteralArray(arguments);
Literal nodeIdn = node; //annoying Literal nodeIdn = node;
if (IS_IDENTIFIER(node) && parseIdentifierToValue(interpreter, &node)) {
if (!parseIdentifierToValue(interpreter, &node)) {
interpreter->errorOutput("Failed to parse node identifier to value\n");
freeLiteral(node);
return -1;
}
freeLiteral(nodeIdn); freeLiteral(nodeIdn);
}
//check argument types //check argument types
if (!IS_OPAQUE(node)) { if (!IS_OPAQUE(node)) {
@@ -256,15 +251,10 @@ static int nativeFreeNode(Interpreter* interpreter, LiteralArray* arguments) {
Literal node = popLiteralArray(arguments); Literal node = popLiteralArray(arguments);
Literal nodeIdn = node; //annoying Literal nodeIdn = node;
if (IS_IDENTIFIER(node) && parseIdentifierToValue(interpreter, &node)) {
if (!parseIdentifierToValue(interpreter, &node)) {
interpreter->errorOutput("Failed to parse node identifier to value\n");
freeLiteral(node);
return -1;
}
freeLiteral(nodeIdn); freeLiteral(nodeIdn);
}
//check argument types //check argument types
if (!IS_OPAQUE(node)) { if (!IS_OPAQUE(node)) {
@@ -277,8 +267,7 @@ static int nativeFreeNode(Interpreter* interpreter, LiteralArray* arguments) {
//free the node //free the node
callEngineNode(engineNode, &engine.interpreter, "onFree"); callEngineNode(engineNode, &engine.interpreter, "onFree");
freeEngineNode(engineNode);
freeEngineNode(engineNode); //tombstones this node
//cleanup //cleanup
freeLiteral(node); freeLiteral(node);
@@ -295,14 +284,9 @@ static int nativeFreeChildNode(Interpreter* interpreter, LiteralArray* arguments
Literal node = popLiteralArray(arguments); Literal node = popLiteralArray(arguments);
Literal nodeIdn = node; //annoying Literal nodeIdn = node; //annoying
if (IS_IDENTIFIER(node) && parseIdentifierToValue(interpreter, &node)) {
if (!parseIdentifierToValue(interpreter, &node)) {
interpreter->errorOutput("Failed to parse parent node identifier to value\n");
freeLiteral(node);
return -1;
}
freeLiteral(nodeIdn); freeLiteral(nodeIdn);
}
//check argument types //check argument types
if (!IS_OPAQUE(node) || !IS_INTEGER(index)) { if (!IS_OPAQUE(node) || !IS_INTEGER(index)) {
@@ -349,25 +333,15 @@ static int nativePushNode(Interpreter* interpreter, LiteralArray* arguments) {
Literal child = popLiteralArray(arguments); Literal child = popLiteralArray(arguments);
Literal parent = popLiteralArray(arguments); Literal parent = popLiteralArray(arguments);
Literal parentIdn = parent; //annoying Literal parentIdn = parent;
Literal childIdn = child; if (IS_IDENTIFIER(parent) && parseIdentifierToValue(interpreter, &parent)) {
if (!parseIdentifierToValue(interpreter, &parent)) {
interpreter->errorOutput("Failed to parse parent identifier to value\n");
freeLiteral(parent);
freeLiteral(child);
return -1;
}
if (!parseIdentifierToValue(interpreter, &child)) {
interpreter->errorOutput("Failed to parse child identifier to value\n");
freeLiteral(parent);
freeLiteral(child);
return -1;
}
freeLiteral(parentIdn); freeLiteral(parentIdn);
}
Literal childIdn = child;
if (IS_IDENTIFIER(child) && parseIdentifierToValue(interpreter, &child)) {
freeLiteral(childIdn); freeLiteral(childIdn);
}
if (!IS_OPAQUE(parent) || !IS_OPAQUE(child)) { if (!IS_OPAQUE(parent) || !IS_OPAQUE(child)) {
interpreter->errorOutput("Incorrect argument type passed to pushNode\n"); interpreter->errorOutput("Incorrect argument type passed to pushNode\n");
@@ -399,16 +373,10 @@ static int nativeGetNode(Interpreter* interpreter, LiteralArray* arguments) {
Literal index = popLiteralArray(arguments); Literal index = popLiteralArray(arguments);
Literal parent = popLiteralArray(arguments); Literal parent = popLiteralArray(arguments);
Literal parentIdn = parent; //annoying Literal parentIdn = parent;
if (IS_IDENTIFIER(parent) && parseIdentifierToValue(interpreter, &parent)) {
if (!parseIdentifierToValue(interpreter, &parent)) {
interpreter->errorOutput("Failed to parse parent identifier to value\n");
freeLiteral(parent);
freeLiteral(index);
return -1;
}
freeLiteral(parentIdn); freeLiteral(parentIdn);
}
if (!IS_OPAQUE(parent) || !IS_INTEGER(index)) { if (!IS_OPAQUE(parent) || !IS_INTEGER(index)) {
interpreter->errorOutput("Incorrect argument type passed to getNode\n"); interpreter->errorOutput("Incorrect argument type passed to getNode\n");