diff options
| author | Matthias Andreas Benkard <matthias@benkard.de> | 2008-08-09 20:32:41 +0200 |
|---|---|---|
| committer | Matthias Andreas Benkard <matthias@benkard.de> | 2008-08-09 20:38:19 +0200 |
| commit | b3a91b0f038fed2807f5e393187692245e6a51ee (patch) | |
| tree | 9fd5da9fa6e5e16f4323428a64a81478961045a1 | |
| parent | 6d559eac7095682eb431b4457ede9098a9fb67bc (diff) | |
Various minor bugfixes.
| -rw-r--r-- | MLKDispatchingMacroCharacterReader.m | 2 | ||||
| -rw-r--r-- | MLKInterpreter.m | 4 | ||||
| -rw-r--r-- | MLKPackage.m | 3 | ||||
| -rw-r--r-- | Sacla/share.lisp | 3 |
4 files changed, 11 insertions, 1 deletions
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 <Foundation/NSValue.h> + @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 <windows.h> #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 <dlfcn.h> #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)) |