[bug#42689] [PATCH] gnu: Add sbcl-livesupport

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

[-- Attachment #1: Type: text/plain, Size: 2 bytes --]




[-- Attachment #2: 0001-gnu-Add-sbcl-livesupport.patch --]
[-- Type: text/x-patch, Size: 1850 bytes --]

From 1aeb04ad466937b50acd1a2540e50f59446b6d8c Mon Sep 17 00:00:00 2001
From: Adam Kandur <rndd@tuta.io>
Date: Wed, 12 Aug 2020 09:52:05 +0300
Subject: [PATCH] gnu: Add sbcl-livesupport.

* gnu/packages/lisp-xyz.scm (sbcl-livesupport): New variable.
---
 gnu/packages/lisp-xyz.scm | 28 ++++++++++++++++++++++++++++
 1 file changed, 28 insertions(+)

diff --git a/gnu/packages/lisp-xyz.scm b/gnu/packages/lisp-xyz.scm
index b8216b0..f5a0ab7 100644
--- a/gnu/packages/lisp-xyz.scm
+++ b/gnu/packages/lisp-xyz.scm
@@ -13509,3 +13509,31 @@ for an example.")
 
 (define-public ecl-hu.dwim.defclass-star
   (sbcl-package->ecl-package sbcl-hu.dwim.defclass-star))
+
+(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.")
+      (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