Fixed RPN test

goodpaul6 · Jan 18, 2019 · 82cf060 · 82cf060
1 parent 4a0fc19
commit 82cf060
Showing 1 changed file with 4 additions and 4 deletions.
diff --git a/test/src/test.c b/test/src/test.c
@@ -520,10 +520,10 @@ static void test_RevPolishCalc(void)
 		"op := \"\"\n"
 		"while op != \"quit\" {\n"
 		"op = my_input()\n"
-		"if strchar(op, 0) == '+' array_push(stack, array_pop(stack) + array_pop(stack))\n"
-		"else if strchar(op, 0) == '-' array_push(stack, array_pop(stack) - array_pop(stack))\n"
-		"else if strchar(op, 0) == '*' array_push(stack, array_pop(stack) * array_pop(stack))\n"
-		"else if strchar(op, 0) == '/' array_push(stack, array_pop(stack) / array_pop(stack))\n"
+		"if stridx(op, 0) == '+' array_push(stack, array_pop(stack) + array_pop(stack))\n"
+		"else if stridx(op, 0) == '-' array_push(stack, array_pop(stack) - array_pop(stack))\n"
+		"else if stridx(op, 0) == '*' array_push(stack, array_pop(stack) * array_pop(stack))\n"
+		"else if stridx(op, 0) == '/' array_push(stack, array_pop(stack) / array_pop(stack))\n"
 		"else if op != \"quit\" array_push(stack, ston(op)) }\n";
 
 	Tiny_CompileString(state, "test_rpn", code);