Re: [PATCH] Add new debug meta-command ,error

[Andy Wingo]

Hi,

Thanks for the patch. Only one small comment; feel free to commit when
you're happy with it (I think you have access).

On Sun 29 Aug 2010 21:52, "Jose A. Ortega Ruiz" <address@hidden> writes:

> +(define-meta-command (error repl)
> +  "error
> +Display the original error message."
> +  (let ((debug (repl-debug repl)))
> +     (format #t "~a~%" (if debug (debug-error-message debug) ""))))
> +

Perhaps use define-stack-command to handle the no-debug case. In any
case if there is no debug, we need a better message.

Thanks,

Andy
-- 
http://wingolog.org/