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

From: Adam Kandur <[email-masked]>
Date: Wed, 5 Aug 2020 09:17:21 +0200 (CEST)

so, when i want to make a patch:
1) i "cd ~/path/to/guix"
2) make changes
3) git add gnu/packages/file_i_changed.scm (gnu/packages/lisp-xyz.scm for example)
4) git commit -m 'gnu: Add sbcl-livesupport'
5) git format-patch origin/master
6) for this one i attached file 0001-gnu-Add-sbcl-livesupport.patch

P.S.: my bad but i don't know how to use email with git. if anyone used tutanota.com please note how to do it
>From bb0cdfbbe60c782603abb5136e8da61685925920 Mon Sep 17 00:00:00 2001
From: Adam Kandur <[email-masked]>
Date: Wed, 5 Aug 2020 10:11:09 +0300
Subject: [PATCH] gnu: Add sbcl-livesupport

---
 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 767f50c104..74f1adee5b 100644
--- a/gnu/packages/lisp-xyz.scm
+++ b/gnu/packages/lisp-xyz.scm
@@ -13395,3 +13395,31 @@ 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.")
+      (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