[Openmcl-devel] Problem with time in Slime

[Gary Byers]

On Mon, 4 Aug 2008, Patrick May wrote:

> 	I'm trying to time a function within Slime.  The function completes,
> but then I get the error listed below.  The same code and call to time
> works from the command line.  The value (10000 292411 50005000) is
> what is returned from the function being timed.
>
> 	Is this a Clozure issue, a Slime issue, or a user issue?

I don't know, but CL:TIME is a macro, not a generic function.

? (find-all-symbols "TIME")

Is there more than one ?  If so, are you calling something other than
CL:TIME ?

? (macro-function 'cl:time)

Does this return a (macroexpansion) function ?


>
> Thanks,
>
> Patrick
>
> No applicable method for args:
>  ((10000 292411 50005000))
>  to #<STANDARD-GENERIC-FUNCTION TIME #x9383FE6>
>    [Condition of type SIMPLE-ERROR]
>
> Restarts:
>  0: [CONTINUE] Try calling it again
>  1: [ABORT] Return to SLIME's top level.
>  2: [ABORT-BREAK] Reset this process
>  3: [ABORT] Kill this process
>
> Backtrace:
>   0: (#<CCL::STANDARD-KERNEL-METHOD NO-APPLICABLE-METHOD (T)>
> #<STANDARD-GENERIC-FUNCTION TIME #x9383FE6> '(10000 292411 50005000))
>   1: (CCL::CALL-CHECK-REGS 'TIME '(10000 292411 50005000))
>   2: ((:INTERNAL SWANK:INTERACTIVE-EVAL))
>   3: (SWANK::CALL-WITH-BUFFER-SYNTAX #<CCL:COMPILED-LEXICAL-CLOSURE
> (:INTERNAL
>                                      SWANK:INTERACTIVE-EVAL)
> #x9476966>)
>   4: (CCL::CALL-CHECK-REGS 'SWANK:INTERACTIVE-EVAL "(time (test-
> histogram 10000 4))")
>   5: ((:INTERNAL SWANK::EVAL-FOR-EMACS))
>   6: (#<Anonymous Function #x856B3FE> #<Compiled-function SWANK:SWANK-
> DEBUGGER-HOOK #x861A9AE> #<CCL:COMPILED-LEXICAL-CLOSURE (:INTERNAL
>                                      SWANK::EVAL-FOR-EMACS) #x9476986>)
>   7: (FUNCALL 'SWANK::EVAL-FOR-EMACS '(SWANK:INTERACTIVE-EVAL "(time
> (test-histogram 10000 4))") "ita-puzzles" 783)
>   8: ((:INTERNAL SWANK::HANDLE-REQUEST))
>   9: (#<Anonymous Function #x856B3FE> #<Compiled-function SWANK:SWANK-
> DEBUGGER-HOOK #x861A9AE> #<Compiled-function (:INTERNAL
>                           SWANK::HANDLE-REQUEST) (Non-Global)
> #x85F2FE6>)
>  10: (SWANK::CALL-WITH-REDIRECTED-IO #<CONNECTION  #x867B856>
> #<CCL:COMPILED-LEXICAL-CLOSURE (:INTERNAL
>                                      SWANK::CALL-WITH-CONNECTION)
> #x94769A6>)
>  11: (SWANK::CALL-WITH-CONNECTION #<CONNECTION  #x867B856> #<Compiled-
> function (:INTERNAL
>                           SWANK::HANDLE-REQUEST) (Non-Global)
> #x85F2FE6>)
>  12: (SWANK::HANDLE-REQUEST #<CONNECTION  #x867B856>)
>  13: (SWANK::CALL-WITH-BINDINGS 'NIL #<CCL:COMPILED-LEXICAL-CLOSURE
> (:INTERNAL
>                                      SWANK::SPAWN-WORKER-THREAD)
> #x94769BE>)
>  14: (CCL::RUN-PROCESS-INITIAL-FORM #<PROCESS worker(833) [Active]
> #x9472B9E> '(#<CCL:COMPILED-LEXICAL-CLOSURE (:INTERNAL
>                                        CCL::%PROCESS-RUN-FUNCTION)
> #x9472B5E>))
>  15: ((:INTERNAL CCL::%PROCESS-PRESET-INTERNAL) #<PROCESS worker(833)
> [Active] #x9472B9E> '(#<CCL:COMPILED-LEXICAL-CLOSURE (:INTERNAL
>                                        CCL::%PROCESS-RUN-FUNCTION)
> #x9472B5E>))
>  16: ((:INTERNAL CCL::THREAD-MAKE-STARTUP-FUNCTION))
>
>
> _______________________________________________
> Openmcl-devel mailing list
> Openmcl-devel at clozure.com
> http://clozure.com/mailman/listinfo/openmcl-devel
>
>