shithub: sl

Download patch

ref: 30337092f06fce2eba1ce5087bb21e8f35391c81
parent: 16b9ff5fd8840555c30a22402ece715609992d7f
author: Sigrid Solveig Haflínudóttir <sigrid@ftrv.se>
date: Tue Jan 28 00:55:13 EST 2025

add (exit 0) and (exit 1) tests

--- a/meson.build
+++ b/meson.build
@@ -363,6 +363,8 @@
 
 test('100x100.lsp', flisp, args: ['100x100.lsp'], workdir: tests_dir)
 test('argv.lsp', flisp, args: ['argv.lsp'], workdir: tests_dir)
+test('exit0.lsp', flisp, args: ['exit0.lsp'], workdir: tests_dir)
+test('exit1.lsp', flisp, args: ['exit1.lsp'], workdir: tests_dir, should_fail: true)
 test('bench.lsp', flisp, args: ['bench.lsp'], workdir: tests_dir)
 test('hashtest.lsp', flisp, args: ['hashtest.lsp'], workdir: tests_dir)
 test('mp.lsp', flisp, args: ['mp.lsp'], workdir: tests_dir)
--- /dev/null
+++ b/test/exit0.lsp
@@ -1,0 +1,1 @@
+(exit 0)
--- /dev/null
+++ b/test/exit1.lsp
@@ -1,0 +1,1 @@
+(exit 1)
--- a/test/mkfile
+++ b/test/mkfile
@@ -3,6 +3,7 @@
 	unittest.lsp\
 	argv.lsp\
 	bench.lsp\
+	exit0.lsp\
 	hashtest.lsp\
 	torus.lsp\
 	tme.lsp\