From: Donald Lee <dlqs@gmx.com>
Date: Mon, 9 Aug 2021 22:29:19 +0000 (+0800)
Subject: tests: Add test consecutive frrscript_call
X-Git-Tag: base_8.1~215^2~3
X-Git-Url: https://git.puffer.fish/?a=commitdiff_plain;h=80bfe93670461bfc868c6252e2f15bd44586cd4e;p=mirror%2Ffrr.git

tests: Add test consecutive frrscript_call

Signed-off-by: Donald Lee <dlqs@gmx.com>
---

diff --git a/tests/lib/test_frrscript.c b/tests/lib/test_frrscript.c
index 7b23045978..4c5d8d2928 100644
--- a/tests/lib/test_frrscript.c
+++ b/tests/lib/test_frrscript.c
@@ -62,6 +62,14 @@ int main(int argc, char **argv)
 	long long *ansptr =
 		frrscript_get_result(fs, "fact", "ans", lua_tointegerp);
 	assert(*ansptr == 120);
+
+	/* check consecutive call + get_result without re-loading */
+	n = 4;
+	result = frrscript_call(fs, "fact", ("n", &n));
+	assert(result == 0);
+	ansptr = frrscript_get_result(fs, "fact", "ans", lua_tointegerp);
+	assert(*ansptr == 24);
+
 	XFREE(MTYPE_SCRIPT_RES, ansptr);
 
 	/* Negative testing */