From 18f6ed50ef0b3ad91727640bfa53bc8fd169b595 Mon Sep 17 00:00:00 2001 From: Stelian Ionescu Date: Sun, 5 Aug 2012 15:51:33 +0200 Subject: [PATCH] Move calls to REQUIRE into the DEFSYSTEM --- bordeaux-threads.asd | 17 ++++++++++------- 1 file changed, 10 insertions(+), 7 deletions(-) diff --git a/bordeaux-threads.asd b/bordeaux-threads.asd index aaf6f26..6adf53b 100644 --- a/bordeaux-threads.asd +++ b/bordeaux-threads.asd @@ -4,13 +4,7 @@ Copyright 2006,2007 Greg Pfeil Distributed under the MIT license (see LICENSE file) |# -(in-package :cl-user) - -(eval-when (:compile-toplevel :load-toplevel :execute) - #+allegro (require :smputil) - #+corman (require :threads)) - -(eval-when (:compile-toplevel :load-toplevel :execute) +(cl:eval-when (:compile-toplevel :load-toplevel :execute) #+(or armedbear (and allegro multiprocessing) (and clisp mt) @@ -56,6 +50,15 @@ Distributed under the MIT license (see LICENSE file) #+(and thread-support digitool) (:file "condition-variables") (:file "default-implementations")))) + :perform (asdf:compile-op :before (o c) + #+allegro (require :smputil) + #+corman (require :threads)) + :perform (asdf:load-op :before (o c) + #+allegro (require :smputil) + #+corman (require :threads)) + :perform (asdf:load-source-op :before (o c) + #+allegro (require :smputil) + #+corman (require :threads)) :in-order-to ((asdf:test-op (asdf:load-op bordeaux-threads-test))) :perform (asdf:test-op :after (op c) (asdf:oos 'asdf:test-op :bordeaux-threads-test))) -- 2.11.4.GIT