From saurabhnanda at gmail.com Tue Aug 7 08:55:51 2007 From: saurabhnanda at gmail.com (Saurabh Nanda) Date: Tue, 7 Aug 2007 14:25:51 +0530 Subject: [Cl-perec-devel] cl-def? Message-ID: <794f042d0708070155l25ba2b9bi938d497d6e0acc31@mail.gmail.com> Hi, I'm trying to load cl-perec but it can't find the cl-def package. The cl-def home page at common-lisp (http://common-lisp.net/project/cl-def/) does not point me to any repository. Is there a darcs repository or a tarball that I can get access to? Saurabh. -- http://nandz.blogspot.com http://foodieforlife.blogspot.com -------------- next part -------------- An HTML attachment was scrubbed... URL: From saurabhnanda at gmail.com Tue Aug 7 11:39:27 2007 From: saurabhnanda at gmail.com (Saurabh Nanda) Date: Tue, 7 Aug 2007 17:09:27 +0530 Subject: [Cl-perec-devel] Re: cl-def? In-Reply-To: <794f042d0708070155l25ba2b9bi938d497d6e0acc31@mail.gmail.com> References: <794f042d0708070155l25ba2b9bi938d497d6e0acc31@mail.gmail.com> Message-ID: <794f042d0708070439m37f03342u7af3885491970878@mail.gmail.com> Found cl-def and a couple of other packages in the cl-dwim project. I'm stuck with a compile-time problem now: ; in: DEFLOGGER SQL-LOG ; (IT.BESE.ARNESI:DEFLOGGER CL-RDBMS::SQL-LOG NIL :LEVEL IT.BESE.ARNESI:+WARN+ ; :COMPILE-TIME-LEVEL IT.BESE.ARNESI:+INFO+:APPENDER ; (MAKE-INSTANCE 'CL-RDBMS::SQL-LOG-APPENDER :STREAM ; *DEBUG-IO*)) ; ; caught ERROR: ; (during macroexpansion of (DEFLOGGER SQL-LOG ...)) ; error while parsing arguments to DEFMACRO DEFLOGGER: ; unknown keyword: :COMPILE-TIME-LEVEL; expected one of :DOCUMENTATION, :APPENDERS, :APPENDER, :LEVEL Any pointers? Saurabh. -- http://nandz.blogspot.com http://foodieforlife.blogspot.com -------------- next part -------------- An HTML attachment was scrubbed... URL: From saurabhnanda at gmail.com Tue Aug 7 12:55:03 2007 From: saurabhnanda at gmail.com (Saurabh Nanda) Date: Tue, 7 Aug 2007 18:25:03 +0530 Subject: [Cl-perec-devel] Errors while loading cl-perec Message-ID: <794f042d0708070555m54e39742t622c6cbe685bd6a9@mail.gmail.com> Hi, I'm just dying to get this package to run. A whole lot of my work depends on cl-perec working the way I'm expecting it to :-). I'm running into these pesky load time errors. Can anyone help me out with them? Using package `COMMON-LISP' results in name conflicts for these symbols: CLOSER-MOP:DEFGENERIC CLOSER-MOP:STANDARD-GENERIC-FUNCTION CLOSER-MOP:DEFCLASS CLOSER-MOP:ENSURE-GENERIC-FUNCTION CLOSER-MOP:STANDARD-CLASS CLOSER-MOP:DEFGENERIC CLOSER-MOP:STANDARD-GENERIC-FUNCTION CLOSER-MOP:DEFCLASS CLOSER-MOP:ENSURE-GENERIC-FUNCTION CLOSER-MOP:STANDARD-CLASS [Condition of type PACKAGE-ERROR] If I try to use the 'continue' option in the debugger, a whole lot of similar errors keep getting thrown every now and then. Saurabh. -- http://nandz.blogspot.com http://foodieforlife.blogspot.com From attila.lendvai at gmail.com Sun Aug 12 19:41:03 2007 From: attila.lendvai at gmail.com (Attila Lendvai) Date: Sun, 12 Aug 2007 21:41:03 +0200 Subject: [Cl-perec-devel] Re: cl-def? In-Reply-To: <794f042d0708070439m37f03342u7af3885491970878@mail.gmail.com> References: <794f042d0708070155l25ba2b9bi938d497d6e0acc31@mail.gmail.com> <794f042d0708070439m37f03342u7af3885491970878@mail.gmail.com> Message-ID: > ; caught ERROR: > ; (during macroexpansion of (DEFLOGGER SQL-LOG ...)) > ; error while parsing arguments to DEFMACRO DEFLOGGER: > ; unknown keyword: :COMPILE-TIME-LEVEL; expected one of :DOCUMENTATION, > :APPENDERS, :APPENDER, :LEVEL > > Any pointers? hi, your arnesi is way too old, you'll need the latest of most of the dependencies from their repos. cl-perec is undergoing heavy development. i've updated the cl-def page since then. we use sbcl as our primary (well, as the only :) platform and while all our code is written to use only standard features, there are most probably small problems when using different platforms. but... cl-perec uses (setf standard-instance-access) which is not defined in stock sbcl. we have a branch where we added this, and i've sent a patch to sbcl-devel, too. the diff is trivial, though: hunk ./src/pcl/slots.lisp 169 +(defun (setf standard-instance-access) (new-value instance location) + (setf (clos-slots-ref (std-instance-slots instance) location) new-value)) + if you are stuck again, please include the lisp implementation and version you are using. hth, -- attila From levente.meszaros at gmail.com Mon Aug 13 07:48:53 2007 From: levente.meszaros at gmail.com (=?ISO-8859-1?Q?Levente_M=E9sz=E1ros?=) Date: Mon, 13 Aug 2007 09:48:53 +0200 Subject: [Cl-perec-devel] Re: cl-def? In-Reply-To: References: <794f042d0708070155l25ba2b9bi938d497d6e0acc31@mail.gmail.com> <794f042d0708070439m37f03342u7af3885491970878@mail.gmail.com> Message-ID: Well, by heavy development we didn't mean the core features of cl-perec but some exotic ones. I think the API is quite stable now, although the implementation may change when needed. Also nota that the test suite is pretty comprehensive. Bug reports and patches are always welcomed. Cheers, levy On 8/12/07, Attila Lendvai wrote: > > ; caught ERROR: > > ; (during macroexpansion of (DEFLOGGER SQL-LOG ...)) > > ; error while parsing arguments to DEFMACRO DEFLOGGER: > > ; unknown keyword: :COMPILE-TIME-LEVEL; expected one of :DOCUMENTATION, > > :APPENDERS, :APPENDER, :LEVEL > > > > Any pointers? > > hi, > > your arnesi is way too old, you'll need the latest of most of the > dependencies from their repos. cl-perec is undergoing heavy > development. > > i've updated the cl-def page since then. > > we use sbcl as our primary (well, as the only :) platform and while > all our code is written to use only standard features, there are most > probably small problems when using different platforms. > > but... cl-perec uses (setf standard-instance-access) which is not > defined in stock sbcl. we have a branch where we added this, and i've > sent a patch to sbcl-devel, too. > > the diff is trivial, though: > > hunk ./src/pcl/slots.lisp 169 > +(defun (setf standard-instance-access) (new-value instance location) > + (setf (clos-slots-ref (std-instance-slots instance) location) new-value)) > + > > if you are stuck again, please include the lisp implementation and > version you are using. > > hth, > > -- > attila > _______________________________________________ > Cl-perec-devel mailing list > Cl-perec-devel at common-lisp.net > http://common-lisp.net/cgi-bin/mailman/listinfo/cl-perec-devel > -- There's no perfectoin From attila.lendvai at gmail.com Mon Aug 13 16:06:59 2007 From: attila.lendvai at gmail.com (Attila Lendvai) Date: Mon, 13 Aug 2007 18:06:59 +0200 Subject: [Cl-perec-devel] Re: cl-def? In-Reply-To: References: <794f042d0708070155l25ba2b9bi938d497d6e0acc31@mail.gmail.com> <794f042d0708070439m37f03342u7af3885491970878@mail.gmail.com> Message-ID: > but... cl-perec uses (setf standard-instance-access) which is not > defined in stock sbcl. we have a branch where we added this, and i've > sent a patch to sbcl-devel, too. fyi, i've added some code to cl-perec that defines it when sbcl itself does not define it, so cl-perec should work with stock sbcl now. -- attila From saurabhnanda at gmail.com Mon Aug 13 17:50:47 2007 From: saurabhnanda at gmail.com (Saurabh Nanda) Date: Mon, 13 Aug 2007 23:20:47 +0530 Subject: [Cl-perec-devel] Re: cl-def? In-Reply-To: References: <794f042d0708070155l25ba2b9bi938d497d6e0acc31@mail.gmail.com> <794f042d0708070439m37f03342u7af3885491970878@mail.gmail.com> Message-ID: <794f042d0708131050k51aae715obbe73dab1c3f0b36@mail.gmail.com> > your arnesi is way too old, you'll need the latest of most of the > dependencies from their repos. cl-perec is undergoing heavy > development. Thanks for the pointer. I downloaded arnesi from http://www.common-lisp.net/project/bese/darcs/arnesi_dev finally and this problem seems to be solved. > we use sbcl as our primary (well, as the only :) platform and while > all our code is written to use only standard features, there are most > probably small problems when using different platforms. My environment is ACL 8.0 currently. I've tried loading cl-perec on Allegro and now it's running into some troubles while loading the computed-class-system package. I'm reproducing the error message below: Using package `COMMON-LISP' results in name conflicts for these symbols: CLOSER-MOP:DEFGENERIC CLOSER-MOP:STANDARD-GENERIC-FUNCTION CLOSER-MOP:DEFCLASS CLOSER-MOP:ENSURE-GENERIC-FUNCTION CLOSER-MOP:STANDARD-CLASS CLOSER-MOP:DEFGENERIC CLOSER-MOP:STANDARD-GENERIC-FUNCTION CLOSER-MOP:DEFCLASS CLOSER-MOP:ENSURE-GENERIC-FUNCTION CLOSER-MOP:STANDARD-CLASS [Condition of type PACKAGE-ERROR] > but... cl-perec uses (setf standard-instance-access) which is not > defined in stock sbcl. we have a branch where we added this, and i've > sent a patch to sbcl-devel, too. Will I require this patch in ACL as well? The common-lisp.net site seems to be down right now. I'll pull in fresh patches from all the darcs projects that I checked out and try loading cl-perec tomorrow morning. Saurabh. PS: I've changed the subject line of the message. -- http://nandz.blogspot.com http://foodieforlife.blogspot.com From saurabhnanda at gmail.com Tue Aug 14 04:58:57 2007 From: saurabhnanda at gmail.com (Saurabh Nanda) Date: Tue, 14 Aug 2007 10:28:57 +0530 Subject: [Cl-perec-devel] Re: cl-def? In-Reply-To: <794f042d0708131050k51aae715obbe73dab1c3f0b36@mail.gmail.com> References: <794f042d0708070155l25ba2b9bi938d497d6e0acc31@mail.gmail.com> <794f042d0708070439m37f03342u7af3885491970878@mail.gmail.com> <794f042d0708131050k51aae715obbe73dab1c3f0b36@mail.gmail.com> Message-ID: <794f042d0708132158v7351a533u8c735a85744fa5b5@mail.gmail.com> > Using package `COMMON-LISP' results in name conflicts for these > symbols: CLOSER-MOP:DEFGENERIC CLOSER-MOP:STANDARD-GENERIC-FUNCTION > CLOSER-MOP:DEFCLASS CLOSER-MOP:ENSURE-GENERIC-FUNCTION > CLOSER-MOP:STANDARD-CLASS CLOSER-MOP:DEFGENERIC > CLOSER-MOP:STANDARD-GENERIC-FUNCTION CLOSER-MOP:DEFCLASS > CLOSER-MOP:ENSURE-GENERIC-FUNCTION CLOSER-MOP:STANDARD-CLASS > [Condition of type PACKAGE-ERROR] > The common-lisp.net site seems to be down right now. I'll pull in > fresh patches from all the darcs projects that I checked out and try > loading cl-perec tomorrow morning. I updated arnesi_dev, cl-perec, computed-class, and checked out closer-mop from http://www.common-lisp.net/project/closer/darcs/closer-mop/. Still the same errors. Any pointers? If I "continue" from the error (let the conflicting symbols be uninterned and go ahead), I get the following error: "SB-PCL" is not the name of a package. [Condition of type PACKAGE-ERROR] I think I should just try this in SBCL once. Saurabh. -- http://nandz.blogspot.com http://foodieforlife.blogspot.com From saurabhnanda at gmail.com Tue Aug 14 05:04:37 2007 From: saurabhnanda at gmail.com (Saurabh Nanda) Date: Tue, 14 Aug 2007 10:34:37 +0530 Subject: [Cl-perec-devel] Re: cl-def? In-Reply-To: <794f042d0708132158v7351a533u8c735a85744fa5b5@mail.gmail.com> References: <794f042d0708070155l25ba2b9bi938d497d6e0acc31@mail.gmail.com> <794f042d0708070439m37f03342u7af3885491970878@mail.gmail.com> <794f042d0708131050k51aae715obbe73dab1c3f0b36@mail.gmail.com> <794f042d0708132158v7351a533u8c735a85744fa5b5@mail.gmail.com> Message-ID: <794f042d0708132204m71b6c9a1h63d4ad2ad0164ae2@mail.gmail.com> I tried loading cl-perec in SBCL. v1.0 (asdf:oos 'asdf:load-op :cl-perec) barfs while loading the computed-class package. The REPL output buffer freezes and the debugger is started in *inferior-lisp*. There are multiple backtraces and I'm posting the first one completely (if it helps): NIL * Help! 11 nested errors. SB-KERNEL:*MAXIMUM-ERROR-DEPTH* exceeded. 0: (BACKTRACE 536870911 #) 1: ((LAMBDA NIL)) 2: ((LAMBDA NIL)) 3: (SB-IMPL::%WITH-STANDARD-IO-SYNTAX #) 4: (SB-IMPL::ERROR-ERROR) 5: (SB-IMPL::INFINITE-ERROR-PROTECTOR) 6: (SB-KERNEL:INTERNAL-ERROR #.(SB-SYS:INT-SAP #XB648175C) #) 7: ("foreign function: #x8063F11") 8: ("foreign function: #x805D25C") 9: ("foreign function: #x8054FB6") 10: ("foreign function: #x805D682") 11: ((SB-PCL::FAST-METHOD SWANK-BACKEND:CALL-WITH-RECURSIVE-LOCK-HELD (T T)) # # #S(SB-THREAD:MUTEX :NAME "buffer write lock" :VALUE NIL) #) 12: ((SB-PCL::FAST-METHOD STREAM-WRITE-CHAR (SWANK-BACKEND::SLIME-OUTPUT-STREAM T)) (#(3 2 4 6) . #()) # # #\H) 13: ((SB-PCL::FAST-METHOD STREAM-WRITE-STRING (FUNDAMENTAL-CHARACTER-OUTPUT-STREAM "#<...>" . "#<...>")) # # # "Help! " 0 6) 14: (WRITE-STRING "Help! " # :START 0 :END 6) 15: (SB-IMPL::%WRITE-STRING "Help! " # :OUTPUT-STREAM #> 0 6) 16: (WRITE-STRING "Help! " # :OUTPUT-STREAM #> :START 0 :END NIL) 17: (PRINC "Help! " # :OUTPUT-STREAM #>) 18: ((LAMBDA NIL)) 19: ((LAMBDA NIL)) 20: (SB-IMPL::%WITH-STANDARD-IO-SYNTAX #) 21: (SB-IMPL::ERROR-ERROR) 22: (SB-IMPL::INFINITE-ERROR-PROTECTOR) 23: (SB-KERNEL:INTERNAL-ERROR #.(SB-SYS:INT-SAP #XB6481F3C) #) 24: ("foreign function: #x8063F11") 25: ("foreign function: #x805D25C") 26: ("foreign function: #x8054FB6") 27: ("foreign function: #x805D682") 28: ((SB-PCL::FAST-METHOD SWANK-BACKEND:CALL-WITH-RECURSIVE-LOCK-HELD (T T)) # # #S(SB-THREAD:MUTEX :NAME "buffer write lock" :VALUE NIL) #) 29: ((SB-PCL::FAST-METHOD STREAM-FORCE-OUTPUT (SWANK-BACKEND::SLIME-OUTPUT-STREAM)) (#(5 6) . #()) # #) 30: (FORCE-OUTPUT #) 31: (FORCE-OUTPUT # :OUTPUT-STREAM #>) 32: (SB-INT:FLUSH-STANDARD-OUTPUT-STREAMS) 33: (INVOKE-DEBUGGER #) 34: (ERROR TYPE-ERROR) 35: (SB-KERNEL::OBJECT-NOT-LIST-ERROR-HANDLER # #.(SB-SYS:INT-SAP #XB648295C) # (398)) 36: (SB-KERNEL:INTERNAL-ERROR #.(SB-SYS:INT-SAP #XB648262C) #) 37: ("foreign function: #x8063F11") 38: ("foreign function: #x805D25C") 39: ("foreign function: #x8054FB6") 40: ("foreign function: #x805D682") 41: ((SB-PCL::FAST-METHOD SWANK-BACKEND:CALL-WITH-RECURSIVE-LOCK-HELD (T T)) # # #S(SB-THREAD:MUTEX :NAME "buffer write lock" :VALUE NIL) #) 42: ((SB-PCL::FAST-METHOD STREAM-FORCE-OUTPUT (SWANK-BACKEND::SLIME-OUTPUT-STREAM)) (#(5 6) . #()) # #) 43: (FORCE-OUTPUT #) 44: (FORCE-OUTPUT # :OUTPUT-STREAM #>) 45: (SB-INT:FLUSH-STANDARD-OUTPUT-STREAMS) 46: (INVOKE-DEBUGGER #) 47: (ERROR TYPE-ERROR) 48: (SB-KERNEL::OBJECT-NOT-LIST-ERROR-HANDLER # #.(SB-SYS:INT-SAP #XB648304C) # (398)) 49: (SB-KERNEL:INTERNAL-ERROR #.(SB-SYS:INT-SAP #XB6482D1C) #) 50: ("foreign function: #x8063F11") 51: ("foreign function: #x805D25C") 52: ("foreign function: #x8054FB6") 53: ("foreign function: #x805D682") 54: ((SB-PCL::FAST-METHOD SWANK-BACKEND:CALL-WITH-RECURSIVE-LOCK-HELD (T T)) # # #S(SB-THREAD:MUTEX :NAME "buffer write lock" :VALUE NIL) #) 55: ((SB-PCL::FAST-METHOD STREAM-FORCE-OUTPUT (SWANK-BACKEND::SLIME-OUTPUT-STREAM)) (#(5 6) . #()) # #) 56: (FORCE-OUTPUT #) 57: (FORCE-OUTPUT # :OUTPUT-STREAM #>) 58: (SB-INT:FLUSH-STANDARD-OUTPUT-STREAMS) 59: (INVOKE-DEBUGGER #) 60: (ERROR TYPE-ERROR) 61: (SB-KERNEL::OBJECT-NOT-LIST-ERROR-HANDLER # #.(SB-SYS:INT-SAP #XB648373C) # (398)) 62: (SB-KERNEL:INTERNAL-ERROR #.(SB-SYS:INT-SAP #XB648340C) #) 63: ("foreign function: #x8063F11") 64: ("foreign function: #x805D25C") 65: ("foreign function: #x8054FB6") 66: ("foreign function: #x805D682") 67: ((SB-PCL::FAST-METHOD SWANK-BACKEND:CALL-WITH-RECURSIVE-LOCK-HELD (T T)) # # #S(SB-THREAD:MUTEX :NAME "buffer write lock" :VALUE NIL) #) 68: ((SB-PCL::FAST-METHOD STREAM-FORCE-OUTPUT (SWANK-BACKEND::SLIME-OUTPUT-STREAM)) (#(5 6) . #()) # #) 69: (FORCE-OUTPUT #) 70: (FORCE-OUTPUT # :OUTPUT-STREAM #>) 71: (SB-INT:FLUSH-STANDARD-OUTPUT-STREAMS) 72: (INVOKE-DEBUGGER #) 73: (ERROR TYPE-ERROR) 74: (SB-KERNEL::OBJECT-NOT-LIST-ERROR-HANDLER # #.(SB-SYS:INT-SAP #XB6483E2C) # (398)) 75: (SB-KERNEL:INTERNAL-ERROR #.(SB-SYS:INT-SAP #XB6483AFC) #) 76: ("foreign function: #x8063F11") 77: ("foreign function: #x805D25C") 78: ("foreign function: #x8054FB6") 79: ("foreign function: #x805D682") 80: ((SB-PCL::FAST-METHOD SWANK-BACKEND:CALL-WITH-RECURSIVE-LOCK-HELD (T T)) # # #S(SB-THREAD:MUTEX :NAME "buffer write lock" :VALUE NIL) #) 81: ((SB-PCL::FAST-METHOD STREAM-FORCE-OUTPUT (SWANK-BACKEND::SLIME-OUTPUT-STREAM)) (#(5 6) . #()) # #) 82: (FORCE-OUTPUT #) 83: (FORCE-OUTPUT # :OUTPUT-STREAM #>) 84: (SWANK::FORCE-USER-OUTPUT) 85: (SWANK::DEBUG-IN-EMACS #) 86: (INVOKE-DEBUGGER #) 87: (ERROR TYPE-ERROR) 88: (SB-KERNEL::OBJECT-NOT-LIST-ERROR-HANDLER # #.(SB-SYS:INT-SAP #XB6484538) # (398)) 89: (SB-KERNEL:INTERNAL-ERROR #.(SB-SYS:INT-SAP #XB648420C) #) 90: ("foreign function: #x8063F11") 91: ("foreign function: #x805D25C") 92: ("foreign function: #x8054FB6") 93: ("foreign function: #x805D682") 94: ((SB-PCL::FAST-METHOD SWANK-BACKEND:CALL-WITH-RECURSIVE-LOCK-HELD (T T)) # # #S(SB-THREAD:MUTEX :NAME "buffer write lock" :VALUE NIL) #) 95: (SB-FORMAT::&-FORMAT-DIRECTIVE-INTERPRETER # #<~&> (#<~@<> #<~S> ": " #<~3i> #<~:_> #<~A> #<~:>> #<~%>) # (STYLE-WARNING #)) 96: (SB-FORMAT::INTERPRET-DIRECTIVE-LIST # (#<~&> #<~@<> #<~S> ": " #<~3i> #<~:_> #<~A> #<~:>> #<~%>) (STYLE-WARNING #) (STYLE-WARNING #)) 97: (SB-FORMAT::%FORMAT # "~&~@<~S: ~3i~:_~A~:>~%" (STYLE-WARNING #) (STYLE-WARNING #)) 98: (FORMAT # "~&~@<~S: ~3i~:_~A~:>~%") 99: (WARN SB-INT:SIMPLE-STYLE-WARNING) 100: (SB-IMPL::CALL-WITH-SANE-IO-SYNTAX #) 101: (SB-INT:STYLE-WARN "redefining ~S in DEFGENERIC") 102: (SB-PCL::LOAD-DEFGENERIC SWANK-BACKEND:CURRENT-THREAD NIL #S(SB-C:DEFINITION-SOURCE-LOCATION :NAMESTRING "/home/nanda/deb/lisp/libs/slime/swank-backend.lisp" :TOPLEVEL-FORM-NUMBER 111 :PLIST NIL) :DOCUMENTATION "Return the currently executing thread.") 103: (SB-FASL::LOAD-FASL-GROUP #) 104: (SB-FASL::LOAD-AS-FASL # NIL #) 105: (SB-FASL::INTERNAL-LOAD #P"/var/cache/common-lisp-controller/1000/sbcl/local/home/nanda/deb/lisp/libs/slime/swank-backend.fasl" #P"/var/cache/common-lisp-controller/1000/sbcl/local/home/nanda/deb/lisp/libs/slime/swank-backend.fasl" :ERROR NIL NIL :BINARY NIL) 106: (SB-FASL::INTERNAL-LOAD #P"/var/cache/common-lisp-controller/1000/sbcl/local/home/nanda/deb/lisp/libs/slime/swank-backend.fasl" #P"/var/cache/common-lisp-controller/1000/sbcl/local/home/nanda/deb/lisp/libs/slime/swank-backend.fasl" :ERROR NIL NIL NIL :DEFAULT) 107: (LOAD #P"/var/cache/common-lisp-controller/1000/sbcl/local/home/nanda/deb/lisp/libs/slime/swank-backend.fasl") 108: ((SB-PCL::FAST-METHOD ASDF:PERFORM (ASDF:LOAD-OP ASDF:CL-SOURCE-FILE)) # # # #) 109: ((LAMBDA (SB-PCL::.PV-CELL. SB-PCL::.NEXT-METHOD-CALL. SB-PCL::.ARG0. SB-PCL::.ARG1.)) # # # #) 110: ((LAMBDA NIL)) 111: (SB-C::%WITH-COMPILATION-UNIT #) 112: (ASDF:OPERATE ASDF:LOAD-OP :CL-PEREC) 113: (SB-INT:SIMPLE-EVAL-IN-LEXENV (ASDF:OOS (QUOTE ASDF:LOAD-OP) :CL-PEREC) #) 114: (SWANK::EVAL-REGION "(asdf:oos 'asdf:load-op :cl-perec) " T) 115: ((LAMBDA NIL)) 116: ((SB-PCL::FAST-METHOD SWANK-BACKEND:CALL-WITH-SYNTAX-HOOKS (T)) # # #) 117: (SWANK::CALL-WITH-BUFFER-SYNTAX #) 118: (SB-INT:SIMPLE-EVAL-IN-LEXENV (SWANK:LISTENER-EVAL "(asdf:oos 'asdf:load-op :cl-perec) ") #) 119: ((LAMBDA NIL)) 120: ((SB-PCL::FAST-METHOD SWANK-BACKEND:CALL-WITH-DEBUGGER-HOOK (T T)) # # # #) 121: ((LAMBDA NIL)) 122: ((SB-PCL::FAST-METHOD SWANK-BACKEND:CALL-WITH-DEBUGGER-HOOK (T T)) # # # #) 123: (SWANK::CALL-WITH-REDIRECTED-IO # #) 124: (SWANK::CALL-WITH-CONNECTION # #) 125: (SWANK::HANDLE-REQUEST #) 126: ((LAMBDA NIL)) 127: ((LAMBDA NIL)) 128: ((SB-PCL::FAST-METHOD SWANK-BACKEND:CALL-WITH-DEBUGGER-HOOK (T T)) # # # #) 129: (SWANK::CALL-WITH-REDIRECTED-IO # #) 130: (SWANK::CALL-WITH-CONNECTION # #) 131: (SWANK::CALL-WITH-BINDINGS NIL #) 132: ((LAMBDA NIL)) 133: ("foreign function: #x8063F11") 134: ("foreign function: #x805D2B1") 135: ("foreign function: #x805BDAD") 136: ("foreign function: #xB7FC331B") Thanks, Saurabh. -- http://nandz.blogspot.com http://foodieforlife.blogspot.com From levente.meszaros at gmail.com Tue Aug 14 07:47:05 2007 From: levente.meszaros at gmail.com (=?ISO-8859-1?Q?Levente_M=E9sz=E1ros?=) Date: Tue, 14 Aug 2007 09:47:05 +0200 Subject: [Cl-perec-devel] Re: cl-def? In-Reply-To: <794f042d0708132158v7351a533u8c735a85744fa5b5@mail.gmail.com> References: <794f042d0708070155l25ba2b9bi938d497d6e0acc31@mail.gmail.com> <794f042d0708070439m37f03342u7af3885491970878@mail.gmail.com> <794f042d0708131050k51aae715obbe73dab1c3f0b36@mail.gmail.com> <794f042d0708132158v7351a533u8c735a85744fa5b5@mail.gmail.com> Message-ID: Cl-perec is known to work only under SBCL at the moment and we did not test it under any other CL implementaton. SB-PCL is the CLOS package of SBCL and as such you will clearly not find it under Allegro. Some parts of the MOP code (found in both cl-perec and also in computed-class) is closely related to SB-PCL so might be non-trivial to make it work under Allegro or any other CL implementation. On the other hand it's doable if someone with CLOS MOP knowledge takes the time. I think it's better to set up the system with SBCL head or the one found under cl-dwim. >From cl-perec web-site: Platforms The current version is tested under SBCL 1.0+!!! and Ubuntu Linux using PostgreSQL 8.2. In principle it should be pretty easy to support other RDBMS systems because the mapping uses standard SQL features. The RDBMS access is implemented using cl-rdbms which only supports PostgreSQL (and partially oracle) at the time of writing. As for MOP compatibility: it is not yet tested with other Common Lisp implementations, but it was designed to be a portable, so we are only expecting minor issues when porting. levy On 8/14/07, Saurabh Nanda wrote: > > Using package `COMMON-LISP' results in name conflicts for these > > symbols: CLOSER-MOP:DEFGENERIC CLOSER-MOP:STANDARD-GENERIC-FUNCTION > > CLOSER-MOP:DEFCLASS CLOSER-MOP:ENSURE-GENERIC-FUNCTION > > CLOSER-MOP:STANDARD-CLASS CLOSER-MOP:DEFGENERIC > > CLOSER-MOP:STANDARD-GENERIC-FUNCTION CLOSER-MOP:DEFCLASS > > CLOSER-MOP:ENSURE-GENERIC-FUNCTION CLOSER-MOP:STANDARD-CLASS > > [Condition of type PACKAGE-ERROR] > > > The common-lisp.net site seems to be down right now. I'll pull in > > fresh patches from all the darcs projects that I checked out and try > > loading cl-perec tomorrow morning. > > I updated arnesi_dev, cl-perec, computed-class, and checked out > closer-mop from > http://www.common-lisp.net/project/closer/darcs/closer-mop/. Still the > same errors. Any pointers? > > If I "continue" from the error (let the conflicting symbols be > uninterned and go ahead), I get the following error: > > "SB-PCL" is not the name of a package. > [Condition of type PACKAGE-ERROR] > > I think I should just try this in SBCL once. > > Saurabh. > -- > http://nandz.blogspot.com > http://foodieforlife.blogspot.com > _______________________________________________ > Cl-perec-devel mailing list > Cl-perec-devel at common-lisp.net > http://common-lisp.net/cgi-bin/mailman/listinfo/cl-perec-devel > -- There's no perfectoin From levente.meszaros at gmail.com Tue Aug 14 07:50:57 2007 From: levente.meszaros at gmail.com (=?ISO-8859-1?Q?Levente_M=E9sz=E1ros?=) Date: Tue, 14 Aug 2007 09:50:57 +0200 Subject: [Cl-perec-devel] Re: cl-def? In-Reply-To: <794f042d0708132204m71b6c9a1h63d4ad2ad0164ae2@mail.gmail.com> References: <794f042d0708070155l25ba2b9bi938d497d6e0acc31@mail.gmail.com> <794f042d0708070439m37f03342u7af3885491970878@mail.gmail.com> <794f042d0708131050k51aae715obbe73dab1c3f0b36@mail.gmail.com> <794f042d0708132158v7351a533u8c735a85744fa5b5@mail.gmail.com> <794f042d0708132204m71b6c9a1h63d4ad2ad0164ae2@mail.gmail.com> Message-ID: Unfortunately this stack trace is useless because it is a recursive error, could you please try with SBCL CVS head and either with the patch Attila sent or the head cl-perec repo? levy On 8/14/07, Saurabh Nanda wrote: > I tried loading cl-perec in SBCL. v1.0 (asdf:oos 'asdf:load-op > :cl-perec) barfs while loading the computed-class package. The REPL > output buffer freezes and the debugger is started in *inferior-lisp*. > > There are multiple backtraces and I'm posting the first one completely > (if it helps): > > NIL > * Help! 11 nested errors. SB-KERNEL:*MAXIMUM-ERROR-DEPTH* exceeded. > 0: (BACKTRACE 536870911 #) > 1: ((LAMBDA NIL)) > 2: ((LAMBDA NIL)) > 3: (SB-IMPL::%WITH-STANDARD-IO-SYNTAX #) > 4: (SB-IMPL::ERROR-ERROR) > 5: (SB-IMPL::INFINITE-ERROR-PROTECTOR) > 6: (SB-KERNEL:INTERNAL-ERROR #.(SB-SYS:INT-SAP #XB648175C) > #) > 7: ("foreign function: #x8063F11") > 8: ("foreign function: #x805D25C") > 9: ("foreign function: #x8054FB6") > 10: ("foreign function: #x805D682") > 11: ((SB-PCL::FAST-METHOD SWANK-BACKEND:CALL-WITH-RECURSIVE-LOCK-HELD > (T T)) # # > #S(SB-THREAD:MUTEX :NAME "buffer write lock" :VALUE NIL) # (LAMBDA NIL) {B83EB8D}>) > 12: ((SB-PCL::FAST-METHOD STREAM-WRITE-CHAR > (SWANK-BACKEND::SLIME-OUTPUT-STREAM T)) (#(3 2 4 6) . #()) > # # {A82D041}> #\H) > 13: ((SB-PCL::FAST-METHOD STREAM-WRITE-STRING > (FUNDAMENTAL-CHARACTER-OUTPUT-STREAM "#<...>" . "#<...>")) # argument> # # {A82D041}> "Help! " 0 6) > 14: (WRITE-STRING "Help! " # {A82D041}> :START 0 :END 6) > 15: (SB-IMPL::%WRITE-STRING "Help! " # # :OUTPUT-STREAM > #> 0 6) > 16: (WRITE-STRING "Help! " # # :OUTPUT-STREAM > #> :START 0 :END NIL) > 17: (PRINC "Help! " # # :OUTPUT-STREAM > #>) > 18: ((LAMBDA NIL)) > 19: ((LAMBDA NIL)) > 20: (SB-IMPL::%WITH-STANDARD-IO-SYNTAX #) > 21: (SB-IMPL::ERROR-ERROR) > 22: (SB-IMPL::INFINITE-ERROR-PROTECTOR) > 23: (SB-KERNEL:INTERNAL-ERROR #.(SB-SYS:INT-SAP #XB6481F3C) > #) > 24: ("foreign function: #x8063F11") > 25: ("foreign function: #x805D25C") > 26: ("foreign function: #x8054FB6") > 27: ("foreign function: #x805D682") > 28: ((SB-PCL::FAST-METHOD SWANK-BACKEND:CALL-WITH-RECURSIVE-LOCK-HELD > (T T)) # # > #S(SB-THREAD:MUTEX :NAME "buffer write lock" :VALUE NIL) # (LAMBDA NIL) {B83EB35}>) > 29: ((SB-PCL::FAST-METHOD STREAM-FORCE-OUTPUT > (SWANK-BACKEND::SLIME-OUTPUT-STREAM)) (#(5 6) . #()) # argument> #) > 30: (FORCE-OUTPUT #) > 31: (FORCE-OUTPUT # # :OUTPUT-STREAM > #>) > 32: (SB-INT:FLUSH-STANDARD-OUTPUT-STREAMS) > 33: (INVOKE-DEBUGGER #) > 34: (ERROR TYPE-ERROR) > 35: (SB-KERNEL::OBJECT-NOT-LIST-ERROR-HANDLER # > #.(SB-SYS:INT-SAP #XB648295C) # #XB648262C :TYPE (* (STRUCT SB-VM::OS-CONTEXT-T-STRUCT))> (398)) > 36: (SB-KERNEL:INTERNAL-ERROR #.(SB-SYS:INT-SAP #XB648262C) > #) > 37: ("foreign function: #x8063F11") > 38: ("foreign function: #x805D25C") > 39: ("foreign function: #x8054FB6") > 40: ("foreign function: #x805D682") > 41: ((SB-PCL::FAST-METHOD SWANK-BACKEND:CALL-WITH-RECURSIVE-LOCK-HELD > (T T)) # # > #S(SB-THREAD:MUTEX :NAME "buffer write lock" :VALUE NIL) # (LAMBDA NIL) {B837E75}>) > 42: ((SB-PCL::FAST-METHOD STREAM-FORCE-OUTPUT > (SWANK-BACKEND::SLIME-OUTPUT-STREAM)) (#(5 6) . #()) # argument> #) > 43: (FORCE-OUTPUT #) > 44: (FORCE-OUTPUT # # :OUTPUT-STREAM > #>) > 45: (SB-INT:FLUSH-STANDARD-OUTPUT-STREAMS) > 46: (INVOKE-DEBUGGER #) > 47: (ERROR TYPE-ERROR) > 48: (SB-KERNEL::OBJECT-NOT-LIST-ERROR-HANDLER # > #.(SB-SYS:INT-SAP #XB648304C) # #XB6482D1C :TYPE (* (STRUCT SB-VM::OS-CONTEXT-T-STRUCT))> (398)) > 49: (SB-KERNEL:INTERNAL-ERROR #.(SB-SYS:INT-SAP #XB6482D1C) > #) > 50: ("foreign function: #x8063F11") > 51: ("foreign function: #x805D25C") > 52: ("foreign function: #x8054FB6") > 53: ("foreign function: #x805D682") > 54: ((SB-PCL::FAST-METHOD SWANK-BACKEND:CALL-WITH-RECURSIVE-LOCK-HELD > (T T)) # # > #S(SB-THREAD:MUTEX :NAME "buffer write lock" :VALUE NIL) # (LAMBDA NIL) {B831E85}>) > 55: ((SB-PCL::FAST-METHOD STREAM-FORCE-OUTPUT > (SWANK-BACKEND::SLIME-OUTPUT-STREAM)) (#(5 6) . #()) # argument> #) > 56: (FORCE-OUTPUT #) > 57: (FORCE-OUTPUT # # :OUTPUT-STREAM > #>) > 58: (SB-INT:FLUSH-STANDARD-OUTPUT-STREAMS) > 59: (INVOKE-DEBUGGER #) > 60: (ERROR TYPE-ERROR) > 61: (SB-KERNEL::OBJECT-NOT-LIST-ERROR-HANDLER # > #.(SB-SYS:INT-SAP #XB648373C) # #XB648340C :TYPE (* (STRUCT SB-VM::OS-CONTEXT-T-STRUCT))> (398)) > 62: (SB-KERNEL:INTERNAL-ERROR #.(SB-SYS:INT-SAP #XB648340C) > #) > 63: ("foreign function: #x8063F11") > 64: ("foreign function: #x805D25C") > 65: ("foreign function: #x8054FB6") > 66: ("foreign function: #x805D682") > 67: ((SB-PCL::FAST-METHOD SWANK-BACKEND:CALL-WITH-RECURSIVE-LOCK-HELD > (T T)) # # > #S(SB-THREAD:MUTEX :NAME "buffer write lock" :VALUE NIL) # (LAMBDA NIL) {B82CB0D}>) > 68: ((SB-PCL::FAST-METHOD STREAM-FORCE-OUTPUT > (SWANK-BACKEND::SLIME-OUTPUT-STREAM)) (#(5 6) . #()) # argument> #) > 69: (FORCE-OUTPUT #) > 70: (FORCE-OUTPUT # # :OUTPUT-STREAM > #>) > 71: (SB-INT:FLUSH-STANDARD-OUTPUT-STREAMS) > 72: (INVOKE-DEBUGGER #) > 73: (ERROR TYPE-ERROR) > 74: (SB-KERNEL::OBJECT-NOT-LIST-ERROR-HANDLER # > #.(SB-SYS:INT-SAP #XB6483E2C) # #XB6483AFC :TYPE (* (STRUCT SB-VM::OS-CONTEXT-T-STRUCT))> (398)) > 75: (SB-KERNEL:INTERNAL-ERROR #.(SB-SYS:INT-SAP #XB6483AFC) > #) > 76: ("foreign function: #x8063F11") > 77: ("foreign function: #x805D25C") > 78: ("foreign function: #x8054FB6") > 79: ("foreign function: #x805D682") > 80: ((SB-PCL::FAST-METHOD SWANK-BACKEND:CALL-WITH-RECURSIVE-LOCK-HELD > (T T)) # # > #S(SB-THREAD:MUTEX :NAME "buffer write lock" :VALUE NIL) # (LAMBDA NIL) {B8262BD}>) > 81: ((SB-PCL::FAST-METHOD STREAM-FORCE-OUTPUT > (SWANK-BACKEND::SLIME-OUTPUT-STREAM)) (#(5 6) . #()) # argument> #) > 82: (FORCE-OUTPUT #) > 83: (FORCE-OUTPUT # # :OUTPUT-STREAM > #>) > 84: (SWANK::FORCE-USER-OUTPUT) > 85: (SWANK::DEBUG-IN-EMACS #) > 86: (INVOKE-DEBUGGER #) > 87: (ERROR TYPE-ERROR) > 88: (SB-KERNEL::OBJECT-NOT-LIST-ERROR-HANDLER # > #.(SB-SYS:INT-SAP #XB6484538) # #XB648420C :TYPE (* (STRUCT SB-VM::OS-CONTEXT-T-STRUCT))> (398)) > 89: (SB-KERNEL:INTERNAL-ERROR #.(SB-SYS:INT-SAP #XB648420C) > #) > 90: ("foreign function: #x8063F11") > 91: ("foreign function: #x805D25C") > 92: ("foreign function: #x8054FB6") > 93: ("foreign function: #x805D682") > 94: ((SB-PCL::FAST-METHOD SWANK-BACKEND:CALL-WITH-RECURSIVE-LOCK-HELD > (T T)) # # > #S(SB-THREAD:MUTEX :NAME "buffer write lock" :VALUE NIL) # (LAMBDA NIL) {B81D7E5}>) > 95: (SB-FORMAT::&-FORMAT-DIRECTIVE-INTERPRETER > # #<~&> (#<~@<> #<~S> ": > " #<~3i> #<~:_> #<~A> #<~:>> #<~%>) # > (STYLE-WARNING #)) > 96: (SB-FORMAT::INTERPRET-DIRECTIVE-LIST > # (#<~&> #<~@<> #<~S> ": > " #<~3i> #<~:_> #<~A> #<~:>> #<~%>) (STYLE-WARNING > #) (STYLE-WARNING > #)) > 97: (SB-FORMAT::%FORMAT # {A82D041}> "~&~@<~S: ~3i~:_~A~:>~%" (STYLE-WARNING > #) (STYLE-WARNING > #)) > 98: (FORMAT # "~&~@<~S: > ~3i~:_~A~:>~%") > 99: (WARN SB-INT:SIMPLE-STYLE-WARNING) > 100: (SB-IMPL::CALL-WITH-SANE-IO-SYNTAX #) > 101: (SB-INT:STYLE-WARN "redefining ~S in DEFGENERIC") > 102: (SB-PCL::LOAD-DEFGENERIC SWANK-BACKEND:CURRENT-THREAD NIL > #S(SB-C:DEFINITION-SOURCE-LOCATION :NAMESTRING > "/home/nanda/deb/lisp/libs/slime/swank-backend.lisp" > :TOPLEVEL-FORM-NUMBER 111 :PLIST NIL) :DOCUMENTATION "Return the > currently executing thread.") > 103: (SB-FASL::LOAD-FASL-GROUP # /var/cache/common-lisp-controller/1000/sbcl/local/home/nanda/deb/lisp/libs/slime/swank-backend.fasl" > {B0F1689}>) > 104: (SB-FASL::LOAD-AS-FASL # /var/cache/common-lisp-controller/1000/sbcl/local/home/nanda/deb/lisp/libs/slime/swank-backend.fasl" > {B0F1689}> NIL #) > 105: (SB-FASL::INTERNAL-LOAD > #P"/var/cache/common-lisp-controller/1000/sbcl/local/home/nanda/deb/lisp/libs/slime/swank-backend.fasl" > #P"/var/cache/common-lisp-controller/1000/sbcl/local/home/nanda/deb/lisp/libs/slime/swank-backend.fasl" > :ERROR NIL NIL :BINARY NIL) > 106: (SB-FASL::INTERNAL-LOAD > #P"/var/cache/common-lisp-controller/1000/sbcl/local/home/nanda/deb/lisp/libs/slime/swank-backend.fasl" > #P"/var/cache/common-lisp-controller/1000/sbcl/local/home/nanda/deb/lisp/libs/slime/swank-backend.fasl" > :ERROR NIL NIL NIL :DEFAULT) > 107: (LOAD #P"/var/cache/common-lisp-controller/1000/sbcl/local/home/nanda/deb/lisp/libs/slime/swank-backend.fasl") > 108: ((SB-PCL::FAST-METHOD ASDF:PERFORM (ASDF:LOAD-OP > ASDF:CL-SOURCE-FILE)) # # > # # {B422121}>) > 109: ((LAMBDA (SB-PCL::.PV-CELL. SB-PCL::.NEXT-METHOD-CALL. > SB-PCL::.ARG0. SB-PCL::.ARG1.)) # # argument> # # "swank-backend" {B422121}>) > 110: ((LAMBDA NIL)) > 111: (SB-C::%WITH-COMPILATION-UNIT #) > 112: (ASDF:OPERATE ASDF:LOAD-OP :CL-PEREC) > 113: (SB-INT:SIMPLE-EVAL-IN-LEXENV (ASDF:OOS (QUOTE ASDF:LOAD-OP) > :CL-PEREC) #) > 114: (SWANK::EVAL-REGION "(asdf:oos 'asdf:load-op :cl-perec) > " T) > 115: ((LAMBDA NIL)) > 116: ((SB-PCL::FAST-METHOD SWANK-BACKEND:CALL-WITH-SYNTAX-HOOKS (T)) > # # # {B75CFCD}>) > 117: (SWANK::CALL-WITH-BUFFER-SYNTAX #) > 118: (SB-INT:SIMPLE-EVAL-IN-LEXENV (SWANK:LISTENER-EVAL "(asdf:oos > 'asdf:load-op :cl-perec) > ") #) > 119: ((LAMBDA NIL)) > 120: ((SB-PCL::FAST-METHOD SWANK-BACKEND:CALL-WITH-DEBUGGER-HOOK (T > T)) # # # SWANK:SWANK-DEBUGGER-HOOK> #) > 121: ((LAMBDA NIL)) > 122: ((SB-PCL::FAST-METHOD SWANK-BACKEND:CALL-WITH-DEBUGGER-HOOK (T > T)) # # # SWANK:SWANK-DEBUGGER-HOOK> #) > 123: (SWANK::CALL-WITH-REDIRECTED-IO # > #) > 124: (SWANK::CALL-WITH-CONNECTION # > #) > 125: (SWANK::HANDLE-REQUEST #) > 126: ((LAMBDA NIL)) > 127: ((LAMBDA NIL)) > 128: ((SB-PCL::FAST-METHOD SWANK-BACKEND:CALL-WITH-DEBUGGER-HOOK (T > T)) # # # SWANK:SWANK-DEBUGGER-HOOK> #) > 129: (SWANK::CALL-WITH-REDIRECTED-IO # > #) > 130: (SWANK::CALL-WITH-CONNECTION # > #) > 131: (SWANK::CALL-WITH-BINDINGS NIL #) > 132: ((LAMBDA NIL)) > 133: ("foreign function: #x8063F11") > 134: ("foreign function: #x805D2B1") > 135: ("foreign function: #x805BDAD") > 136: ("foreign function: #xB7FC331B") > > > Thanks, > Saurabh. > -- > http://nandz.blogspot.com > http://foodieforlife.blogspot.com > _______________________________________________ > Cl-perec-devel mailing list > Cl-perec-devel at common-lisp.net > http://common-lisp.net/cgi-bin/mailman/listinfo/cl-perec-devel > -- There's no perfectoin