From mboxrd@z Thu Jan 1 00:00:00 1970 From: Jan Nieuwenhuizen Subject: [PATCH] gnu: Add sicp. Date: Sun, 15 May 2016 10:29:09 +0200 Message-ID: <87d1onafmy.fsf@drakenvlieg.flower> Mime-Version: 1.0 Content-Type: multipart/mixed; boundary="=-=-=" Return-path: Received: from eggs.gnu.org ([2001:4830:134:3::10]:55955) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1b1rVU-0005wm-H6 for guix-devel@gnu.org; Sun, 15 May 2016 04:34:37 -0400 Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1b1rVQ-0000BC-6O for guix-devel@gnu.org; Sun, 15 May 2016 04:34:35 -0400 List-Id: "Development of GNU Guix and the GNU System distribution." List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: guix-devel-bounces+gcggd-guix-devel=m.gmane.org@gnu.org Sender: "Guix-devel" To: guix-devel@gnu.org --=-=-= Content-Type: text/plain Hi, Too lazy to get up and go for my book shelf, I was presently surprised that SICP is available in info; and even more surprised it hasn't been packaged yet. Happy hacking! Greetings, Jan --=-=-= Content-Type: text/x-diff; charset=utf-8 Content-Disposition: inline; filename=0001-gnu-Add-sicp.patch Content-Transfer-Encoding: quoted-printable >From 85c7f3d9ba64989b2fbdba9ee0a0da6c635b1d3c Mon Sep 17 00:00:00 2001 From: Jan Nieuwenhuizen Date: Sun, 15 May 2016 09:57:05 +0200 Subject: [PATCH] gnu: Add sicp. * gnu/packages/sicp.scm: New file. * gnu/local.mk (GNU_SYSTEM_MODULES): Add it. --- gnu/local.mk | 1 + gnu/packages/sicp.scm | 80 +++++++++++++++++++++++++++++++++++++++++++++++= ++++ 2 files changed, 81 insertions(+) create mode 100644 gnu/packages/sicp.scm diff --git a/gnu/local.mk b/gnu/local.mk index acb9790..06d6782 100644 --- a/gnu/local.mk +++ b/gnu/local.mk @@ -304,6 +304,7 @@ GNU_SYSTEM_MODULES =3D \ gnu/packages/serialization.scm \ gnu/packages/serveez.scm \ gnu/packages/shishi.scm \ + gnu/packages/sicp.scm \ gnu/packages/skarnet.scm \ gnu/packages/skribilo.scm \ gnu/packages/slang.scm \ diff --git a/gnu/packages/sicp.scm b/gnu/packages/sicp.scm new file mode 100644 index 0000000..35f7ad1 --- /dev/null +++ b/gnu/packages/sicp.scm @@ -0,0 +1,80 @@ +;;; GNU Guix --- Functional package management for GNU +;;; Copyright =C2=A9 2016 Jan Nieuwenhuizen +;;; +;;; This file is part of GNU Guix. +;;; +;;; GNU Guix is free software; you can redistribute it and/or modify it +;;; under the terms of the GNU General Public License as published by +;;; the Free Software Foundation; either version 3 of the License, or (at +;;; your option) any later version. +;;; +;;; GNU Guix is distributed in the hope that it will be useful, but +;;; WITHOUT ANY WARRANTY; without even the implied warranty of +;;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the +;;; GNU General Public License for more details. +;;; +;;; You should have received a copy of the GNU General Public License +;;; along with GNU Guix. If not, see . + +(define-module (gnu packages sicp) + #:use-module (gnu packages base) + #:use-module (gnu packages compression) + #:use-module (gnu packages texinfo) + + #:use-module (guix build-system trivial) + #:use-module (guix git-download) + #:use-module (guix licenses) + #:use-module (guix packages)) + +(define-public sicp + (package + (name "sicp") + (version "2016-02-20") + (source + (origin + (method git-fetch) + (uri (git-reference + (url "https://github.com/sarabander/sicp") + (commit "5b52db566968d28a89fbbaf338d207f01cc81cac"))) + (sha256 + (base32 + "10h6h7szwlfbshwh18bnl2hvyddj5i7106l79s145l0sjjv15cxb")))) + (build-system trivial-build-system) + (native-inputs `(("gzip" ,gzip) + ("source" ,source) + ("texinfo" ,texinfo))) + (arguments + `(#:modules ((guix build utils) + (srfi srfi-1) + (srfi srfi-26)) + #:builder + (let ((gzip (assoc-ref %build-inputs "gzip")) + (source (assoc-ref %build-inputs "source")) + (texinfo (assoc-ref %build-inputs "texinfo")) + (info-dir (string-append %output "/share/info"))) + (use-modules (guix build utils) + (srfi srfi-1) + (srfi srfi-26)) + (setenv "PATH" (string-append gzip "/bin" + ":" texinfo "/bin")) + (mkdir-p info-dir) + (and + (system* "makeinfo" + "--output" (string-append info-dir "/sicp.inf= o") + (string-append source "/sicp-pocket.texi")) + (every zero? (map + (cut system* "gzip" <>) + (find-files info-dir))))))) + (home-page "http://sarabander.github.io/sicp") + (synopsis "Structure and Interpretation of Computer Programs") + (description "Structure and Interpretation of Computer Programs (SICP)= is +a textbook aiming to teach the principles of computer programming. + +Using Scheme, a dialect of the Lisp programming language, the book explains +core computer science concepts such as abstraction in programming, +metalinguistic abstraction, recursion, interpreters, and modular programmi= ng. + +It was first published in 1985 by MIT Press and written by Massachusetts +Institute of Technology (MIT) professors Harold Abelson and Gerald Jay +Sussman, with Julie Sussman.") + (license cc-by-sa4.0))) --=20 2.7.3 --=-=-= Content-Type: text/plain; charset=utf-8 Content-Transfer-Encoding: quoted-printable --=20 Jan Nieuwenhuizen | GNU LilyPond http://lilypond.org Freelance IT http://JoyofSource.com | Avatar=C2=AE http://AvatarAcademy.nl= =20=20 --=-=-=--