[bug#42689] another try

[Adam Kandur via Guix-patches via <guix-patches@gnu.org>]

From 5cade1fff3fb64892321505edd9ac1b13420782e Mon Sep 17 00:00:00 2001
From: Adam Kandur <rndd@tuta.io>
Date: Tue, 4 Aug 2020 17:40:50 +0300
Subject: [PATCH] add sbcl-livesupport in gnu/packages/lisp-xyz.scm

---
 gnu/packages/lisp-xyz.scm | 29 +++++++++++++++++++++++++++++
 1 file changed, 29 insertions(+)

diff --git a/gnu/packages/lisp-xyz.scm b/gnu/packages/lisp-xyz.scm
index 767f50c104..fb2b664f26 100644
--- a/gnu/packages/lisp-xyz.scm
+++ b/gnu/packages/lisp-xyz.scm
@@ -13395,3 +13395,32 @@ and decoder for Common Lisp.")
 
 (define-public ecl-qbase64
   (sbcl-package->ecl-package sbcl-qbase64))
+
+(define-public sbcl-livesupport
+  (let ((commit "71e6e412df9f3759ad8378fabb203913d82e228a")
+    (revision "1"))
+    (package
+      (name "sbcl-livesupport")
+      (version (git-version "0.0.0" revision commit))
+      (source
+       (origin
+         (method git-fetch)
+         (uri (git-reference
+               (url "https://github.com/cbaggers/livesupport")
+               (commit commit)))
+         (file-name (git-file-name name version))
+         (sha256
+          (base32 "1rvnl0mncylbx63608pz5llss7y92j7z3ydambk9mcnjg2mjaapg"))))
+      (build-system asdf-build-system/sbcl)
+      (home-page "https://github.com/cbaggers/livesupport")
+      (synopsis "Some helpers that make livecoding at little easier")
+      (description "A macro commonly used in livecoding to enable continuing when errors are raised. 
+Simply wrap around a chunk of code and it provides a restart called 'continue' which ignores the error and carrys on from the end of the body. 
+I usually wrap this around the code 'step' function in my main loop.")
+      (license license:bsd-2))))
+
+(define-public cl-livesupport
+  (sbcl-package->cl-source-package sbcl-livesupport))
+
+(define-public ecl-livesupport
+  (sbcl-package->ecl-package sbcl-livesupport))
-- 
2.28.0