# This suite builds and uses a program returning 1.
# tesh is instructed of this return code and must not whine.
-$ rm -rf temp_testdir-set-return
-$ mkdir temp_testdir-set-return
-
-$ cd temp_testdir-set-return
-< #include <stdlib.h>
-< int main(void) {
-< exit(1);
-< }
-$ mkfile return1.c
-
-$ gcc -o return1 return1.c
-
! expect return 1
-$ ./return1
-$ cd ..
-$ rm -rf temp_testdir-set-return
+$ perl -e "exit 1"
+
+! expect return 42
+$ perl -e "exit 42"
