From b3a91b0f038fed2807f5e393187692245e6a51ee Mon Sep 17 00:00:00 2001 From: Matthias Andreas Benkard Date: Sat, 9 Aug 2008 20:32:41 +0200 Subject: Various minor bugfixes. --- MLKDispatchingMacroCharacterReader.m | 2 ++ MLKInterpreter.m | 4 +++- MLKPackage.m | 3 +++ Sacla/share.lisp | 3 +++ 4 files changed, 11 insertions(+), 1 deletion(-) diff --git a/MLKDispatchingMacroCharacterReader.m b/MLKDispatchingMacroCharacterReader.m index 2550c3c..0286284 100644 --- a/MLKDispatchingMacroCharacterReader.m +++ b/MLKDispatchingMacroCharacterReader.m @@ -27,6 +27,8 @@ #import "runtime-compatibility.h" #import "util.h" +#import + @implementation MLKDispatchingMacroCharacterReader -(id) init diff --git a/MLKInterpreter.m b/MLKInterpreter.m index a98fb41..deb92eb 100644 --- a/MLKInterpreter.m +++ b/MLKInterpreter.m @@ -48,7 +48,9 @@ #ifdef _WIN32 #include #else - #define _BSD_SOURCE + #ifndef _BSD_SOURCE + #define _BSD_SOURCE + #endif #undef _POSIX_C_SOURCE // needed at least on Mac OS X for RTLD_DEFAULT to be defined #include #endif diff --git a/MLKPackage.m b/MLKPackage.m index f867694..8c90951 100644 --- a/MLKPackage.m +++ b/MLKPackage.m @@ -72,6 +72,9 @@ static NSMutableDictionary *packages = nil; [tlUser usePackage:cl]; [tlUser usePackage:toilet]; //[tlUser usePackage:clUser]; + + [toilet usePackage:cl]; + [toilet usePackage:sys]; [clUser usePackage:cl]; [clUser usePackage:toilet]; diff --git a/Sacla/share.lisp b/Sacla/share.lisp index 6fa3af8..9d4a4d7 100644 --- a/Sacla/share.lisp +++ b/Sacla/share.lisp @@ -26,6 +26,9 @@ ;; (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE ;; OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. +(in-package #:common-lisp) + + (deftype proper-list () '(satisfies proper-list-p)) (deftype proper-sequence () '(satisfies proper-sequence-p)) (deftype string-designator () '(or character symbol string)) -- cgit v1.2.3