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