guix_mirror_bot pushed a commit to branch master
in repository guix.

commit 3e801b3f4ed20fced6edeb35feb3f992636924f7
Author: forgoty <[email protected]>
AuthorDate: Tue Jan 20 22:29:12 2026 +0100

    gnu: Add libretro-nestopia.
    
    * gnu/packages/emulators.scm (libretro-nestopia): New variable.
    
    Closes: guix/guix#5785
    Change-Id: I25d44dea48a1b01354ee83eb7b39a9b4ecd9aa9e
    Signed-off-by: 宋文武 <[email protected]>
---
 gnu/packages/emulators.scm | 39 +++++++++++++++++++++++++++++++++++++++
 1 file changed, 39 insertions(+)

diff --git a/gnu/packages/emulators.scm b/gnu/packages/emulators.scm
index 0086ac0dd9..ab10959dff 100644
--- a/gnu/packages/emulators.scm
+++ b/gnu/packages/emulators.scm
@@ -26,6 +26,7 @@
 ;;; Copyright © 2025 Andrew Wong <[email protected]>
 ;;; Copyright © 2025 Anderson Torres <[email protected]>
 ;;; Copyright © 2025 Laura Kirsch <[email protected]>
+;;; Copyright © 2026 Nikita Alkhovik <[email protected]>
 ;;;
 ;;; This file is part of GNU Guix.
 ;;;
@@ -4382,6 +4383,44 @@ of the Nestopia emulator.")
     (license (list license:gpl2+        ;this project
                    license:lgpl2.1+)))) ;nes_ntsc source files
 
+(define-public libretro-nestopia
+  (let ((commit "473d3072be67fa2542ca833c274ef6682cf0f0bc")
+        (revision "0"))
+    (package
+      (inherit jg-nestopia)
+      (name "libretro-nestopia")
+      (version (git-version "2.0" ;from libretro/libretro_core_options.h
+                            revision commit))
+      (source
+       (origin
+         (method git-fetch)
+         (uri (git-reference
+               (url "https://github.com/libretro/nestopia";)
+               (commit commit)))
+         (file-name (git-file-name name version))
+         (sha256
+          (base32 "01gfwm6ig9ih4yw34fw4hdg6qsyzyjx3v4rvzb0bwk31453v9vhx"))))
+      (arguments
+       (list
+        #:tests? #f ;no test suite
+        #:phases
+        #~(modify-phases %standard-phases
+            (add-after 'unpack 'change-to-build-dir
+              (lambda _
+                (chdir "libretro")))
+            (delete 'configure)
+            (replace 'install
+              (lambda _
+                (let ((out (string-append #$output "/lib/libretro")))
+                  (mkdir-p out)
+                  (install-file "nestopia_libretro.so" out)))))))
+      (synopsis "Libretro port of Nestopia NES/Famicom emulator")
+      (description
+       "This is the libretro port of the Nestopia emulator, based on the de
+facto upstream Nestopia JG fork, which lives at:
+https://gitlab.com/jgemu/nestopia.  The libretro port contains an additional
+overclocking feature."))))
+
 (define-public jg-cega
   (package
     (name "jg-cega")

Reply via email to