From d5fdc31b60a312330fa23039ad8c9a4b153667f8 Mon Sep 17 00:00:00 2001
From: TakeV <takev@disroot.org>
Date: Mon, 4 Mar 2024 13:58:09 -0500
Subject: [PATCH] gnu: Add cyclone.

* gnu/packages/scheme.scm (cyclone): New variable.

Change-Id: Icf3890ded917b728177c2831231e87b52d996532
---
 gnu/packages/scheme.scm | 23 +++++++++++++++++++++++
 1 file changed, 23 insertions(+)

diff --git a/gnu/packages/scheme.scm b/gnu/packages/scheme.scm
index 7931ac1cc1..997906aa02 100644
--- a/gnu/packages/scheme.scm
+++ b/gnu/packages/scheme.scm
@@ -1310,3 +1310,26 @@ application.")
     (description "Bootstrap the generate the cyclone scheme compiler")
     (license expat)))
 
+(define-public cyclone
+  (package
+    ;; the bootstrapped compiler and final compiler share most build reqs
+    (inherit cyclone-bootstrap)
+    (name "cyclone")
+    (version "0.36.0")
+    (source
+     (origin
+       (method git-fetch)
+       (uri (git-reference
+             (url "https://github.com/justinethier/cyclone.git")
+             (commit "v0.36.0")))
+       (file-name (git-file-name name version))
+       (sha256
+        (base32 "0qz5sdcnqkvw78gx86k3g1f0di5aqagdxqvzc35j50h1q5kj67z6"))))
+    (native-inputs (list cyclone-bootstrap))
+    (home-page "http://justinethier.github.io/cyclone/")
+    (synopsis "Fast R7RS scheme which compiles to C")
+    (description
+     "A brand-new compiler that allows practical application
+development using R7RS Scheme. We provide modern features and a stable
+system capable of generating fast native binaries.")
+    (license expat)))