[PATCH] Add guile-g-wrap

[PATCH] Add guile-g-wrap

[Amirouche Boubekki]

[-- Warning: decoded text below may be mangled, UTF-8 assumed --]
[-- Attachment #1: 0001-gnu-Add-guile-g-wrap.patch --]
[-- Type: text/x-diff; name=0001-gnu-Add-guile-g-wrap.patch, Size: 1844 bytes --]

From 06e95ffcac39db58a104826fb081fa7fa4b8d4f5 Mon Sep 17 00:00:00 2001
From: Amirouche BOUBEKKI <amirouche@hypermove.net>
Date: Fri, 11 Dec 2015 17:04:06 +0100
Subject: [PATCH] gnu: Add guile-g-wrap.

* gnu/packages/guile.scm (guile-g-wrap): New variable.
---
 gnu/packages/guile.scm | 28 ++++++++++++++++++++++++++++
 1 file changed, 28 insertions(+)

diff --git a/gnu/packages/guile.scm b/gnu/packages/guile.scm
index a4203f0..e9fc20e 100644
--- a/gnu/packages/guile.scm
+++ b/gnu/packages/guile.scm
@@ -841,4 +841,32 @@ capabilities.")
     (home-page "http://dthompson.us/pages/software/sly.html")
     (license gpl3+)))
 
+(define-public guile-g-wrap
+  (package
+    (name "guile-g-wrap")
+    (version "1.9.15")
+    (source (origin
+              (method url-fetch)
+              (uri (string-append "http://savannah.nongnu.org/download/g-wrap/g-wrap-"
+                                  version ".tar.gz"))
+              (sha256
+               (base32
+                "0ak0bha37dfpj9kmyw1r8fj8nva639aw5xr66wr5gd3l1rqf5xhg"))))
+    (build-system gnu-build-system)
+    (native-inputs
+     `(("pkg-config" ,pkg-config)))
+    (propagated-inputs
+     `(("guile" ,guile-2.0)
+       ("guile-lib" ,guile-lib)))
+    (inputs
+     `(("libffi" ,libffi)))
+    (synopsis "Tool for generating function wrappers for C functions")
+    (description "G-Wrap is a tool and guile library for generating function
+wrappers for inter-language calls.  It currently only supports generating Guile
+wrappers for C functions.  Given a definition of the types and prototypes for
+a given C interface, G-Wrap will automatically generate the C code that
+provides access to that interface and its types from the Scheme level.")
+    (home-page "http://www.nongnu.org/g-wrap/index.html")
+    (license lgpl2.1+)))
+
 ;;; guile.scm ends here
-- 
2.5.0

Re: [PATCH] Add guile-g-wrap

[Ludovic Courtès]

Amirouche Boubekki <amirouche@hypermove.net> skribis:

> From 06e95ffcac39db58a104826fb081fa7fa4b8d4f5 Mon Sep 17 00:00:00 2001
> From: Amirouche BOUBEKKI <amirouche@hypermove.net>
> Date: Fri, 11 Dec 2015 17:04:06 +0100
> Subject: [PATCH] gnu: Add guile-g-wrap.
>
> * gnu/packages/guile.scm (guile-g-wrap): New variable.

Thanks, applied.

I took the freedom to make some changes: changed the name to ‘g-wrap’
(on the grounds that it’s not just a Guile library, but also a
standalone command), use mirror://savannah, and clarified the synopsis.

Let me know what you think!

I did a --rounds=2 build and it went fine.

Ludo’.