~ruther/guix-local

e29ce7be9a448933417640257980a8b346ef2689 — Andreas Enge 8 months ago 7705745
gnu: Remove emilua.

* gnu/packages/lua.scm (emilua): Delete variable.

Fixes: guix/guix#1625
Change-Id: I9672ef3ce1ddb10bdfea847867b48891dbb17098
1 files changed, 0 insertions(+), 98 deletions(-)

M gnu/packages/lua.scm
M gnu/packages/lua.scm => gnu/packages/lua.scm +0 -98
@@ 1309,104 1309,6 @@ multiple local rocks trees.")
(define-public luarocks
  (make-luarocks "luarocks" lua))

(define-public emilua
  (package
    (name "emilua")
    (version "0.4.3")
    (source (origin
              (method git-fetch)
              (uri (git-reference
                    (url "https://gitlab.com/emilua/emilua.git")
                    (commit (string-append "v" version))))
              (file-name (git-file-name name version))
              (sha256
               (base32
                "1dwag2pyqc0g86rris4w4fzafmz9a6kiqd47vdq7hl3a1lyi74mx"))))
    (build-system meson-build-system)
    (arguments
     (list
      #:phases
      #~(modify-phases %standard-phases
          (add-after 'unpack 'patch
            (lambda* (#:key inputs #:allow-other-keys)
              (substitute* "src/emilua_gperf.awk"
                (("/usr/bin/env") (which "env")))
              (substitute* "src/system.cpp"
                (("P_PIDFD") "P_PID"))

              (copy-recursively
               (assoc-ref inputs "emilua-http")
               "emilua-http")
              (copy-recursively
               (assoc-ref inputs "trial-protocol")
               "trial-protocol")

              (with-directory-excursion "subprojects"
                (symlink "../emilua-http" "emilua-http")
                (copy-file "packagefiles/emilua-http/meson.build"
                           "emilua-http/meson.build")
                (symlink "../trial-protocol" "trial-protocol")
                (copy-file "packagefiles/trial.protocol/meson.build"
                           "trial-protocol/meson.build")))))
      #:configure-flags
      #~(list "-Denable_http=true"
              "-Denable_file_io=true"
              "-Denable_io_uring=true"
              ;; TODO: Linux namespaces are disabled for now due to conflict
              ;; with some packages in guix.
              "-Denable_linux_namespaces=false"
              "-Denable_manpages=false"
              "-Dversion_suffix=-guix1")))
    (native-inputs
     (list luajit-lua52-openresty
           re2c
           gperf
           xxd
           pkg-config))
    (inputs
     `(("emilua-http"
        ,(origin
           (method git-fetch)
           (uri (git-reference
                 (url "https://github.com/BoostGSoC14/boost.http")
                 (commit "93ae527c89ffc517862e1f5f54c8a257278f1195")))
           (sha256
            (base32
             "0jm7fw0cjd3s9zkkvyh6mcj6z32hcy7l9bszv74l92qk15ivvp9h"))))
       ("trial-protocol"
        ,(origin
           (method git-fetch)
           (uri (git-reference
                 (url "https://github.com/breese/trial.protocol")
                 (commit "79149f604a49b8dfec57857ca28aaf508069b669")))
           (sha256
            (base32
             "0k42i5b4v3zz5x0r3dssiymgmn2x8zg4fzdksya9aggxgigippsx"))))
       ("boost" ,boost)
       ("boost-static" ,boost-static)
       ("fmt" ,fmt-8)
       ("gcc" ,gcc-12)
       ("luajit-lua52-openresty" ,luajit-lua52-openresty)
       ("ncurses" ,ncurses)
       ("serd" ,serd)
       ("sord" ,sord)
       ("libcap" ,libcap)
       ("liburing" ,liburing)
       ("openssl" ,openssl)))
    (native-search-paths
     (list
      (search-path-specification
       (variable "EMILUA_PATH")
       (files
        (list (string-append "lib/emilua-" (version-major+minor version)))))))
    (home-page "https://gitlab.com/emilua/emilua")
    (synopsis "Lua execution engine")
    (description
     "Emilua is a LuaJIT-based Lua execution engine that supports async IO,
fibers and actor-inspired threading.  The experimental builtin HTTP module is
enabled.")
    (license license:boost1.0)))

(define-public fennel
  (package
    (name "fennel")