From mboxrd@z Thu Jan 1 00:00:00 1970 Received: from eggs.gnu.org ([2001:4830:134:3::10]:54873) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1dZCNt-000579-PL for guix-patches@gnu.org; Sun, 23 Jul 2017 04:37:07 -0400 Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1dZCNq-0001NL-L8 for guix-patches@gnu.org; Sun, 23 Jul 2017 04:37:05 -0400 Received: from debbugs.gnu.org ([208.118.235.43]:50187) by eggs.gnu.org with esmtps (TLS1.0:RSA_AES_128_CBC_SHA1:16) (Exim 4.71) (envelope-from ) id 1dZCNq-0001NA-Gz for guix-patches@gnu.org; Sun, 23 Jul 2017 04:37:02 -0400 Subject: [bug#25728] [PATCH 2/2] gnu: Add colorforth. Resent-Message-ID: Date: Sun, 23 Jul 2017 08:35:46 +0000 From: ng0 Message-ID: <20170723083546.zmq3ypz7nttsdnko@abyayala> References: <871suvu8yu.fsf@elephly.net> <20170415152843.2vyk7uhycuny5rov@abyayala> <20170415160053.qqqpga27hqsdhet3@abyayala> <87d1a17e94.fsf@elephly.net> <20170618115947.jo22jym5bm6semng@abyayala> <87shix4d40.fsf@elephly.net> <20170628094810.nt4svpdksevrh5gr@abyayala> <877ez6hkbk.fsf@elephly.net> <8760eqhk11.fsf@elephly.net> <874luahjw4.fsf@elephly.net> MIME-Version: 1.0 Content-Type: multipart/signed; micalg=pgp-sha512; protocol="application/pgp-signature"; boundary="lwm7t3hnac7fx57g" Content-Disposition: inline In-Reply-To: <874luahjw4.fsf@elephly.net> List-Id: List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: guix-patches-bounces+kyle=kyleam.com@gnu.org Sender: "Guix-patches" To: Ricardo Wurmus Cc: 25728@debbugs.gnu.org, Konstantin Tcholokachvili --lwm7t3hnac7fx57g Content-Type: text/plain; charset=utf-8 Content-Disposition: inline Content-Transfer-Encoding: quoted-printable Ricardo Wurmus transcribed 4.0K bytes: >=20 > Ricardo Wurmus writes: >=20 > > Ricardo Wurmus writes: > > > >> It won=E2=80=99t work when it=E2=80=99s in the store because we cannot= write to the > >> store. Even after copying it out of the store and changing permissions > >> it would simply crash. This could be a problem with my Libreboot > >> machine, but the first problem is bad enough. > >> > >> If the software cannot be used when it is installed to the store then I > >> don=E2=80=99t think it should be in the store at all. I think we shou= ld drop > >> this patch as the package is not actually usable. I can confirm the crashes on coreboot. Last October (patch date) is a while back so I can't be sure if my memory of colorforth working on vendor BIOS is correct. > >> What do you think? I have another theory: We both don't know how this is supposed to be used and the example on the github page is not helping. I CC'd the author of the software. Konstantin, do you know if we are doing = anything obviously wrong in what we've tried in this bug/qa thread? > > The alternative is to also install a wrapper script to =E2=80=9Cbin=E2= =80=9D that > > essentially does this: > > > > #!/bin/sh > > qemu-system-i386 -snapshot -boot a -fda $prefix/share/colorforth/cf= 2012.img > > > > It still crashes for me but at least it doesn=E2=80=99t complain about = store > > permissions. If you can get this to run on your computer then please > > send a final patch that incorporates all of these suggestions. > > Otherwise I think it may not be worth spending more time on a toy > > package like this. > > > > What do you think? >=20 > FWIW here=E2=80=99s the latest version of the diff: >=20 > --8<---------------cut here---------------start------------->8--- > diff --git a/gnu/packages/forth.scm b/gnu/packages/forth.scm > index 6d66faf5d..4ab8f20a9 100644 > --- a/gnu/packages/forth.scm > +++ b/gnu/packages/forth.scm > @@ -1,5 +1,5 @@ > ;;; GNU Guix --- Functional package management for GNU > -;;; Copyright =C2=A9 2016 ng0 > +;;; Copyright =C2=A9 2016, 2017 ng0 > ;;; Copyright =C2=A9 2016 Sou Bunnbu > ;;; > ;;; This file is part of GNU Guix. > @@ -21,7 +21,9 @@ > #:use-module ((guix licenses) #:prefix license:) > #:use-module (guix packages) > #:use-module (guix download) > + #:use-module (guix git-download) > #:use-module (guix build-system gnu) > + #:use-module (gnu packages assembly) > #:use-module (gnu packages m4)) > =20 > (define-public gforth > @@ -58,3 +60,42 @@ and history. A generic virtual machine environment, v= mgen, is also > included.") > (home-page "https://www.gnu.org/software/gforth/") > (license license:gpl3+))) > + > +(define-public colorforth > + (let ((commit "b518ff966955f0b196e7bb8f85337284fa23e29e") > + (revision "1")) > + (package > + (name "colorforth") > + (version (string-append "0.0.0-" revision "." (string-take commit = 7))) > + (source (origin > + (method git-fetch) > + (uri (git-reference > + (url "https://github.com/narke/colorForth.git") > + (commit commit))) > + (sha256 > + (base32 > + "1q5szb9yi3nspbvnq0js6w24sb936ahjk828il760p0xpj5dsl45"= )))) > + (arguments > + `(#:tests? #f > + #:phases > + (modify-phases %standard-phases > + (delete 'configure) ; No configure script > + (replace 'install ; No install target > + (lambda* (#:key outputs #:allow-other-keys) > + (install-file "cf2012.img" > + (string-append (assoc-ref outputs "out") > + "/share/colorforth/")) > + #t))))) > + (native-inputs > + `(("nasm" ,nasm))) > + (build-system gnu-build-system) > + (home-page "https://github.com/narke/colorForth") > + (synopsis "Native 32-bit colorForth for PCs, Bochs and Qemu") > + (description > + "Colorforth is a @code{colorForth} implementation written in x86 > +assembly. It is a dialect of Forth that uses color to replace punctatio= n, > +includes its own operating system and produces extremely compact program= s. > +Applications compile from pre-parsed source. Colorforth applications ca= n be > +run using @code{Bochs} and @code{Qemu}. It is adapted from > +@url{http://sourceforge.net/projects/colorforth, colorforth}.") > + (license license:public-domain)))) > --8<---------------cut here---------------end--------------->8--- >=20 >=20 > --=20 > Ricardo > =20 > GPG: BCA6 89B6 3655 3801 C3C6 2150 197A 5888 235F ACAC > https://elephly.net >=20 >=20 --=20 ng0 GnuPG: A88C8ADD129828D7EAC02E52E22F9BBFEE348588 GnuPG: https://n0is.noblogs.org/my-keys https://www.infotropique.org https://krosos.org --lwm7t3hnac7fx57g Content-Type: application/pgp-signature; name="signature.asc" -----BEGIN PGP SIGNATURE----- iQIzBAABCgAdFiEEqIyK3RKYKNfqwC5S4i+bv+40hYgFAll0X+IACgkQ4i+bv+40 hYi8Hg/+Pg73ZA/o1Vfw2cHU9xWiI0E68zVaHYUh7G6MUBfUpOEzsueWqQvvc+Dn KxYfG04WononZ5+qtYJio2B2/9Z7b5D5ho946x2o0rjETriXGbck/3MtC9xYvlYo eQ8BmlZ1nzoS0zLaYCj4v+MzMv5OhiuOxREn2WsAymkMX9n2h6yd7HpFz8+TmG6Q 1IG1DTVQ9300fkuxkX+NAHW+ZhQ+R/26PMdloga73xtxOhIiwecvar3WaYBeV9Cp 5gZmVdyf9GBRKArATTFB6/FaUO4lbkYS+i+IKDoDfxNQdO+lJb8OsPHTPt/NhZa1 pWWxB2UNtJpUlmCSKEP8lphaH12WLCFCzz3o8gZn46jkyTAYX1Aiy3g82oWXNkmU 9kNF4RJXdKn8p0h44xU7kgv/8zE2MbOOA/YnpRVum4a7qywbiPe2WG0Cmx2afkhK m3GDa5EDlXdQu2LnIrafJ6TIOEhM5nMJMwBwXCPXbnbR6/9frKOXpMcqvKtQ26Ek rT5srJ3NwKROBRJXQusTu87iIN/3G6WiTfTF4Ce/ejKu6dxbtuWedwmqVC+Y+7JP Zb5lyn3FsYSrYaV+U17HtFpJiMGSmKv9YO0aQBmwA3rh9O5PvIjLLsseoGRDsH8B BzCSAfw6Z1LGpGwsZUCMzyfyyVQH69qkHinn1wIiEQ8ucTaNvg4= =3gz+ -----END PGP SIGNATURE----- --lwm7t3hnac7fx57g--