[elephant-devel] Close all stores on exit

[Ian Eslick]

That sounds like a good idea.  I've never had problems with recovery  
or recovery time in my sites, but it is good practice to shut down  
cleanly.

Ian

On Feb 10, 2009, at 9:54 AM, Leslie P. Polzer wrote:

>
> To avoid unnecessary recoveries Elephant should ensure that all
> stores get closed, e.g.:
>
> diff -rN -u old-elephant-1.0/src/elephant/controller.lisp
> new-elephant-1.0/src/elephant/controller.lisp
> --- old-elephant-1.0/src/elephant/controller.lisp       2009-02-10  
> 15:50:08.581855135 +0100
> +++ new-elephant-1.0/src/elephant/controller.lisp       2009-02-10  
> 15:50:08.638522104 +0100
> @@ -795,6 +795,9 @@
>   (loop for pair in *dbconnection-spec*
>        do (close-store (cdr pair))))
>
> +#+sbcl
> +(push #'close-all-stores sb-ext:*exit-hooks*)
> +
> (defmacro with-open-store ((spec) &body body)
>   "Executes the body with an open controller,
>    unconditionally closing the controller on exit."
>
> If no one objects then I'm going to commit this. Others can add
> the code for their Lisp.
>
> Maybe we should also add a warning for all unsupported Lisps.
>
>  Leslie
>
> -- 
> LinkedIn Profile: http://www.linkedin.com/in/polzer
> Xing Profile: https://www.xing.com/profile/LeslieP_Polzer
> Blog: http://blog.viridian-project.de/
>
>
> _______________________________________________
> elephant-devel site list
> elephant-devel at common-lisp.net
> http://common-lisp.net/mailman/listinfo/elephant-devel