r10917: 2006-04-17 Kevin Rosenberg (kevin@rosenberg.net)

[uffi.git] / src / readmacros-mcl.lisp

diff --git a/src/readmacros-mcl.lisp b/src/readmacros-mcl.lisp
index 3bf8f4619ede69ed8b79546cac53118617ecc99d..561bf550d12ad93ac72cbbdff640f7eecb5bae01 100644 (file)
--- a/src/readmacros-mcl.lisp
+++ b/src/readmacros-mcl.lisp
@@ -17,11 +17,11 @@
 
 
 ;; trap macros don't work right directly in the macros
-#+(and mcl (not openmcl))
+#+digitool
 (defun new-ptr (size)
   (#_NewPtr size))
 
-#+(and mcl (not openmcl))
+#+digitool
 (defun dispose-ptr (ptr)
   (#_DisposePtr ptr))