From b0f2a9b40081d0e84bbe898b5c9b70c42dfd73d8 Mon Sep 17 00:00:00 2001 From: Rob Browning Date: Sat, 12 Feb 2005 06:15:07 +0000 Subject: [PATCH] * standalone/test-require-extension: new test script. --- test-suite/standalone/test-require-extension | 12 ++++++++++++ 1 file changed, 12 insertions(+) create mode 100755 test-suite/standalone/test-require-extension diff --git a/test-suite/standalone/test-require-extension b/test-suite/standalone/test-require-extension new file mode 100755 index 000000000..c953a30af --- /dev/null +++ b/test-suite/standalone/test-require-extension @@ -0,0 +1,12 @@ +#!/bin/sh + +set -e + +! guile -c '(require-extension 7)' 2> /dev/null +! guile -c '(require-extension (blarg))' 2> /dev/null +! guile -c '(require-extension (srfi "foo"))' 2> /dev/null + +guile -c '(require-extension (srfi 1)) (exit (procedure? take-right))' +guile -c '(require-extension (srfi))' + +exit 0 -- 2.20.1