From ca06ce491b787b4cbefdccec027769265b2bb006 Mon Sep 17 00:00:00 2001 From: Francois-Rene Rideau <tunes@google.com> Date: Mon, 1 Sep 2014 15:09:10 -0400 Subject: [PATCH] Add a test case for lp#1362875 (tested to break on 3.1.2). --- test/test-bundle.script | 4 ++++ 1 file changed, 4 insertions(+) diff --git a/test/test-bundle.script b/test/test-bundle.script index fe30636e..172a3c52 100644 --- a/test/test-bundle.script +++ b/test/test-bundle.script @@ -54,6 +54,10 @@ (progn #+ecl (trace c::builder) (require 'sockets) ;; Test the pre-compiled system feature + ;; Test that we didn't break require for non-asdf modules + (progn + (pop #+ecl ext:*module-provider-functions* #+mkcl mkext:*module-provider-functions*) + (require 'serve-event)) (operate 'dll-op :test-asdf/dll-test) (let ((dll (first (output-files 'dll-op :test-asdf/dll-test)))) (si:load-foreign-module dll) -- GitLab