public inbox for gentoo-commits@lists.gentoo.org
 help / color / mirror / Atom feed
* [gentoo-commits] repo/gentoo:master commit in: dev-lisp/gcl/, dev-lisp/gcl/files/
@ 2016-02-17 17:39 Andrey Grozin
  0 siblings, 0 replies; 5+ messages in thread
From: Andrey Grozin @ 2016-02-17 17:39 UTC (permalink / raw
  To: gentoo-commits

commit:     537acbec9ddd8856a4c226b5c032e3bafcf3da31
Author:     Andrey Grozin <grozin <AT> gentoo <DOT> org>
AuthorDate: Wed Feb 17 17:29:52 2016 +0000
Commit:     Andrey Grozin <grozin <AT> gentoo <DOT> org>
CommitDate: Wed Feb 17 17:29:52 2016 +0000
URL:        https://gitweb.gentoo.org/repo/gentoo.git/commit/?id=537acbec

dev-lisp/gcl: 2.6.12 now uilds with gcc-5

Bug: 574652

Package-Manager: portage-2.2.27

 dev-lisp/gcl/files/gcl-2.6.12-gcc5.patch | 8 ++++++++
 dev-lisp/gcl/gcl-2.6.12.ebuild           | 4 +++-
 2 files changed, 11 insertions(+), 1 deletion(-)

diff --git a/dev-lisp/gcl/files/gcl-2.6.12-gcc5.patch b/dev-lisp/gcl/files/gcl-2.6.12-gcc5.patch
new file mode 100644
index 0000000..07d3892
--- /dev/null
+++ b/dev-lisp/gcl/files/gcl-2.6.12-gcc5.patch
@@ -0,0 +1,8 @@
+diff -r -U1 gcl.orig/makefile gcl/makefile
+--- gcl.orig/makefile	2014-10-23 23:29:00.000000000 +0200
++++ gcl/makefile	2016-02-17 18:10:29.871808118 +0100
+@@ -267,3 +267,3 @@
+ 	$(AWK) 'BEGIN {print "#include \"include.h\"";print "#include \"cmponly.h\"";print "---"} {a=$$1;gsub("\\.\\.\\.","",a);print "\"#define " $$1 "\" " a}' $< |\
+-	$(CC) -E -I./$(HDIR) - |\
++	$(CC) -E -P -I./$(HDIR) - |\
+ 	$(AWK) '/^\-\-\-$$/ {i=1;next} {if (!i) next} {gsub("\"","");print}' >$@

diff --git a/dev-lisp/gcl/gcl-2.6.12.ebuild b/dev-lisp/gcl/gcl-2.6.12.ebuild
index 11e8275..959c269 100644
--- a/dev-lisp/gcl/gcl-2.6.12.ebuild
+++ b/dev-lisp/gcl/gcl-2.6.12.ebuild
@@ -1,4 +1,4 @@
-# Copyright 1999-2014 Gentoo Foundation
+# Copyright 1999-2016 Gentoo Foundation
 # Distributed under the terms of the GNU General Public License v2
 # $Id$
 
@@ -38,6 +38,7 @@ src_prepare() {
 	chmod a+x add-defs add-defs1 config.guess config.sub configure install.sh
 	chmod a+x bin/info bin/info1 gcl-tk/gcltksrv.in gcl-tk/ngcltksrv mp/gcclab
 	chmod a+x o/egrep-def utils/replace xbin/*
+	epatch "${FILESDIR}"/${P}-gcc5.patch
 
 	# fedora patches
 	epatch "${WORKDIR}"/fedora/fd-leak.patch
@@ -62,6 +63,7 @@ src_prepare() {
 src_configure() {
 	strip-flags
 	filter-flags -fstack-protector -fstack-protector-all
+	append-cflags $(test-flags-CC -fgnu89-inline)
 
 	local tcl=""
 	if use tk; then


^ permalink raw reply related	[flat|nested] 5+ messages in thread

* [gentoo-commits] repo/gentoo:master commit in: dev-lisp/gcl/, dev-lisp/gcl/files/
@ 2021-03-28  9:46 Andrey Grozin
  0 siblings, 0 replies; 5+ messages in thread
From: Andrey Grozin @ 2021-03-28  9:46 UTC (permalink / raw
  To: gentoo-commits

commit:     3895f4701cb1e4c6bd287a3995ff1ca0db22a866
Author:     Andrey Grozin <grozin <AT> gentoo <DOT> org>
AuthorDate: Sun Mar 28 09:45:51 2021 +0000
Commit:     Andrey Grozin <grozin <AT> gentoo <DOT> org>
CommitDate: Sun Mar 28 09:45:51 2021 +0000
URL:        https://gitweb.gentoo.org/repo/gentoo.git/commit/?id=3895f470

dev-lisp/gcl: clean old

Package-Manager: Portage-3.0.17, Repoman-3.0.2
Signed-off-by: Andrey Grozin <grozin <AT> gentoo.org>

 dev-lisp/gcl/Manifest                              |   1 -
 dev-lisp/gcl/files/gcl-2.6.13_pre98-makefile.patch |  21 ----
 dev-lisp/gcl/gcl-2.6.13_pre98.ebuild               | 124 ---------------------
 3 files changed, 146 deletions(-)

diff --git a/dev-lisp/gcl/Manifest b/dev-lisp/gcl/Manifest
index 3efb0a3b090..bcf2e7c5913 100644
--- a/dev-lisp/gcl/Manifest
+++ b/dev-lisp/gcl/Manifest
@@ -3,4 +3,3 @@ DIST gcl-2.6.10.tar.gz 5490689 BLAKE2B 46af0cf8a810a82fe2bc2bd46ca1cbe17b74c71eb
 DIST gcl-2.6.12-fedora.tar.bz2 680471 BLAKE2B 0ad96ce0a09bb73ee77456373eb7e50b2325a4f2e042c21120a1c33b2dec2aa10f5485bb1b02e8eb8e77aaaea6e141189d676217f9d139615911d8a77ea5818a SHA512 7640f8370754c889e2db9d047c4476195f949f4d97eafc7ef81761c1a548e24125d6d93381227b55f1840c3d127770995e88bf66f83c6952e121f5fa004e7f1a
 DIST gcl-2.6.12.tar.gz 7031837 BLAKE2B afd3f81dd8a712d92883a96399a2e0621b0d38a349904707846bd694892510012fde27f94ec36664c249659a480e7f92c412b3790ecb74247a91ba0cb44aa420 SHA512 e82b5bdded6f846de4ea35a83bc8294043ba6d4fe03ff421f8753e78add1e5e87124782f672cd38ad89bbec1ca7c5ff69fe2621be1552b209516b58b6c97fd20
 DIST gcl-2.6.13_pre99.tar.xz 10030460 BLAKE2B 8750d641062bcad5a124173013d38403f37ad352c7c436e89d4e329d997200be399a100dcefc4ce484e3f85f46e2dd90ee02947e5e728e001782e973c4122b0e SHA512 a3ad2bd639157ca2a80b534e87c169f6e07002a1b9ca8039483cff336af764123dec9e749da045b656b990e0a97c70881c798420ec4bd0e4494f43d0d040e413
-DIST gcl-Version_2_6_13pre98.tar.gz 6654514 BLAKE2B 26dcfc01bc0d783b5c45561dc975765f573fd75c2da09786e3a305cf91273684ff6f609ecf659365203ba404e7c8aa5ec97ae661190d32ba31e75d19d1ba0050 SHA512 0d074ed27e04d506ea414e58a70bb284c57f681314c8e68281fcc927e964a3489d9ff2fd9099d282e9da1c75888d758cf5b4f7350da6e7ba8cc90eb1667e1eb9

diff --git a/dev-lisp/gcl/files/gcl-2.6.13_pre98-makefile.patch b/dev-lisp/gcl/files/gcl-2.6.13_pre98-makefile.patch
deleted file mode 100644
index f14443ea016..00000000000
--- a/dev-lisp/gcl/files/gcl-2.6.13_pre98-makefile.patch
+++ /dev/null
@@ -1,21 +0,0 @@
-diff -r -U2 gcl.orig/makefile gcl/makefile
---- gcl.orig/makefile	2021-01-11 22:07:14.000000000 +0700
-+++ gcl/makefile	2021-03-27 18:06:12.014870205 +0700
-@@ -189,5 +189,5 @@
- 	mkdir -p $(DESTDIR)$(prefix)/bin
- 	mkdir -p $(DESTDIR)$(prefix)/share
--	cp -a man $(DESTDIR)$(prefix)/share/
-+#	cp -a man $(DESTDIR)$(prefix)/share/
- 	mkdir -p $(DESTDIR)$(INSTALL_LIB_DIR)
- 	MINSTALL_LIB_DIR=`echo $(INSTALL_LIB_DIR) | sed -e 'sX^\([a-z]\):X/\1Xg'` ; \
-@@ -213,7 +213,7 @@
- #	(cd $(DESTDIR)$(INSTALL_LIB_DIR)/gcl-tk/demos ; \
- #	echo '(load "../tkl.o")(TK::GET-AUTOLOADS (directory "*.lisp"))' | ../../$(PORTDIR)/$(FLISP)$(EXE)) ; fi
--	if test "$(EMACS_SITE_LISP)" != "" ; then (cd elisp ; $(MAKE) install DESTDIR=$(DESTDIR)) ; fi
--	if test "$(INFO_DIR)" != "unknown"; then (cd info ; $(MAKE) install DESTDIR=$(DESTDIR)) ; fi
--	if test "$(INFO_DIR)" != "unknown"; then (cd xgcl-2 ; $(MAKE) install DESTDIR=$(DESTDIR)) ; fi
-+#	if test "$(EMACS_SITE_LISP)" != "" ; then (cd elisp ; $(MAKE) install DESTDIR=$(DESTDIR)) ; fi
-+#	if test "$(INFO_DIR)" != "unknown"; then (cd info ; $(MAKE) install DESTDIR=$(DESTDIR)) ; fi
-+#	if test "$(INFO_DIR)" != "unknown"; then (cd xgcl-2 ; $(MAKE) install DESTDIR=$(DESTDIR)) ; fi
- 	if gcc --version | grep -i mingw >/dev/null 2>&1 ; then cp COPYING.LIB-2.0 readme-bin.mingw $(prefix) ; fi
- 	if gcc --version | grep -i mingw >/dev/null 2>&1 ; then cp gcl.ico $(prefix)/bin ; fi

diff --git a/dev-lisp/gcl/gcl-2.6.13_pre98.ebuild b/dev-lisp/gcl/gcl-2.6.13_pre98.ebuild
deleted file mode 100644
index ed7082d4268..00000000000
--- a/dev-lisp/gcl/gcl-2.6.13_pre98.ebuild
+++ /dev/null
@@ -1,124 +0,0 @@
-# Copyright 1999-2021 Gentoo Authors
-# Distributed under the terms of the GNU General Public License v2
-
-EAPI=7
-inherit elisp-common eutils flag-o-matic
-
-MY_P="${PN}-Version_2_6_13pre98"
-DESCRIPTION="GNU Common Lisp"
-HOMEPAGE="https://www.gnu.org/software/gcl/gcl.html"
-SRC_URI="http://git.savannah.gnu.org/cgit/gcl.git/snapshot/${MY_P}.tar.gz"
-
-LICENSE="LGPL-2 GPL-2"
-SLOT="0"
-KEYWORDS="~amd64 ~arm ~ppc ~ppc64 ~x86"
-IUSE="+ansi athena emacs +readline tk X"
-
-# See bug #205803
-RESTRICT="strip"
-
-RDEPEND="emacs? ( app-editors/emacs:= )
-	readline? ( sys-libs/readline:= )
-	athena? ( x11-libs/libXaw )
-	dev-libs/gmp
-	tk? ( dev-lang/tk:= )
-	X? ( x11-libs/libXt x11-libs/libXext x11-libs/libXmu x11-libs/libXaw )
-	virtual/latex-base"
-DEPEND="${RDEPEND}
-	virtual/texi2dvi
-	app-text/texi2html
-	>=sys-devel/autoconf-2.52"
-
-S="${WORKDIR}"/${PN}
-
-src_unpack() {
-	tar --strip-components=1 -xaf "${DISTDIR}/${MY_P}.tar.gz" || die
-}
-
-src_prepare() {
-	find . -type f -perm /0111 | xargs chmod a-x
-	chmod a+x add-defs add-defs1 config.guess config.sub configure install.sh
-	chmod a+x bin/info bin/info1 gcl-tk/gcltksrv.in gcl-tk/ngcltksrv mp/gcclab
-	chmod a+x o/egrep-def utils/replace xbin/*
-
-	eapply "${FILESDIR}"/${PN}-2.6.13_pre98-makefile.patch
-	eapply_user
-
-	sed -e 's|"-fomit-frame-pointer"|""|' -i configure
-}
-
-src_configure() {
-	strip-flags
-	filter-flags -fstack-protector -fstack-protector-all
-	# breaks linking on multiple defined syms
-	#append-cflags $(test-flags-CC -fgnu89-inline)
-
-	local tcl=""
-	if use tk; then
-		tcl="--enable-tclconfig=/usr/lib --enable-tkconfig=/usr/lib"
-	fi
-
-	econf --enable-dynsysgmp \
-		--disable-xdr \
-		--enable-emacsdir=/usr/share/emacs/site-lisp/gcl \
-		$(use_enable readline) \
-		$(use_enable ansi) \
-		$(use_enable athena xgcl) \
-		$(use_with X x) \
-		${tcl}
-}
-
-src_compile() {
-	emake -j1
-	if use athena; then
-		pushd xgcl-2 > /dev/null
-		pdflatex dwdoc.tex
-		popd > /dev/null
-	fi
-}
-
-src_test() {
-	local make_ansi_tests_clean="rm -f test.out *.fasl *.o *.so *~ *.fn *.x86f *.fasl *.ufsl"
-	if use ansi; then
-		cd ansi-tests
-
-		( make clean && make test-unixport ) \
-			|| die "make ansi-tests failed!"
-
-		cat "${FILESDIR}/bootstrap-gcl" \
-			| ../unixport/saved_ansi_gcl
-
-		cat "${FILESDIR}/bootstrap-gcl" \
-			|sed s/bootstrapped_ansi_gcl/bootstrapped_r_ansi_gcl/g \
-			| ./bootstrapped_ansi_gcl
-
-		( ${make_ansi_tests_clean} && \
-			echo "(load \"gclload.lsp\")" \
-			| ./bootstrapped_r_ansi_gcl ) \
-			|| die "Phase 2, bootstraped compiler failed in tests"
-	fi
-}
-
-src_install() {
-	emake DESTDIR="${D}" install
-
-	rm elisp/add-defaults.el
-	dodoc readme ChangeLog doc/* info/*.pdf
-	doman man/man1/gcl.1
-	dodoc -r info/gcl-si info/gcl-tk
-
-	if use emacs; then
-		elisp-site-file-install "${FILESDIR}"/64${PN}-gentoo.el
-		elisp-install ${PN} elisp/*.el
-	fi
-
-	use athena && dodoc xgcl-2/*.pdf
-}
-
-pkg_postinst() {
-	use emacs && elisp-site-regen
-}
-
-pkg_postrm() {
-	use emacs && elisp-site-regen
-}


^ permalink raw reply related	[flat|nested] 5+ messages in thread

* [gentoo-commits] repo/gentoo:master commit in: dev-lisp/gcl/, dev-lisp/gcl/files/
@ 2022-04-01  6:26 Ulrich Müller
  0 siblings, 0 replies; 5+ messages in thread
From: Ulrich Müller @ 2022-04-01  6:26 UTC (permalink / raw
  To: gentoo-commits

commit:     da08bdc69914300b0a94cf2dd1cf51f1e8885c30
Author:     Ulrich Müller <ulm <AT> gentoo <DOT> org>
AuthorDate: Fri Apr  1 05:57:30 2022 +0000
Commit:     Ulrich Müller <ulm <AT> gentoo <DOT> org>
CommitDate: Fri Apr  1 06:25:50 2022 +0000
URL:        https://gitweb.gentoo.org/repo/gentoo.git/commit/?id=da08bdc6

dev-lisp/gcl: Remove old

Signed-off-by: Ulrich Müller <ulm <AT> gentoo.org>

 dev-lisp/gcl/Manifest                    |   2 -
 dev-lisp/gcl/files/gcl-2.6.12-gcc5.patch |   8 --
 dev-lisp/gcl/gcl-2.6.12.ebuild           | 147 -------------------------------
 3 files changed, 157 deletions(-)

diff --git a/dev-lisp/gcl/Manifest b/dev-lisp/gcl/Manifest
index bcf2e7c59136..38004af63fd9 100644
--- a/dev-lisp/gcl/Manifest
+++ b/dev-lisp/gcl/Manifest
@@ -1,5 +1,3 @@
 DIST gcl-2.6.10-fedora.tar.bz2 695718 BLAKE2B 151cac372f74a971ffb31191a3614d0f7bafca141258af9e1955185f8ed119cbcd3797f2d9bbe5eb5f82e76af4fd0d3e0cf155cd35f305a2c028e40b340b78cf SHA512 3e0ffaec859783443a8941a29302c7a17c9538ef2177d449ad34e24292c174de7bb8760a6d327e08f012773032f0d0a5230b79c7e4b4f5bad8354bf10a28af4c
 DIST gcl-2.6.10.tar.gz 5490689 BLAKE2B 46af0cf8a810a82fe2bc2bd46ca1cbe17b74c71eb4af6a06032040900dcad4dd4338883cd9225f0945ae425eba788ac84db9a0ed454779edd86c74a1bb48a947 SHA512 bbaacce712f15130550bcdf7e53edf4df9ab955e84ec701087034115df1c1e657d956853d5db85d7e88709981f9b7fd4c9df7acf6c8588a8ccf5f05e4e666aed
-DIST gcl-2.6.12-fedora.tar.bz2 680471 BLAKE2B 0ad96ce0a09bb73ee77456373eb7e50b2325a4f2e042c21120a1c33b2dec2aa10f5485bb1b02e8eb8e77aaaea6e141189d676217f9d139615911d8a77ea5818a SHA512 7640f8370754c889e2db9d047c4476195f949f4d97eafc7ef81761c1a548e24125d6d93381227b55f1840c3d127770995e88bf66f83c6952e121f5fa004e7f1a
-DIST gcl-2.6.12.tar.gz 7031837 BLAKE2B afd3f81dd8a712d92883a96399a2e0621b0d38a349904707846bd694892510012fde27f94ec36664c249659a480e7f92c412b3790ecb74247a91ba0cb44aa420 SHA512 e82b5bdded6f846de4ea35a83bc8294043ba6d4fe03ff421f8753e78add1e5e87124782f672cd38ad89bbec1ca7c5ff69fe2621be1552b209516b58b6c97fd20
 DIST gcl-2.6.13_pre99.tar.xz 10030460 BLAKE2B 8750d641062bcad5a124173013d38403f37ad352c7c436e89d4e329d997200be399a100dcefc4ce484e3f85f46e2dd90ee02947e5e728e001782e973c4122b0e SHA512 a3ad2bd639157ca2a80b534e87c169f6e07002a1b9ca8039483cff336af764123dec9e749da045b656b990e0a97c70881c798420ec4bd0e4494f43d0d040e413

diff --git a/dev-lisp/gcl/files/gcl-2.6.12-gcc5.patch b/dev-lisp/gcl/files/gcl-2.6.12-gcc5.patch
deleted file mode 100644
index 07d3892eb0b6..000000000000
--- a/dev-lisp/gcl/files/gcl-2.6.12-gcc5.patch
+++ /dev/null
@@ -1,8 +0,0 @@
-diff -r -U1 gcl.orig/makefile gcl/makefile
---- gcl.orig/makefile	2014-10-23 23:29:00.000000000 +0200
-+++ gcl/makefile	2016-02-17 18:10:29.871808118 +0100
-@@ -267,3 +267,3 @@
- 	$(AWK) 'BEGIN {print "#include \"include.h\"";print "#include \"cmponly.h\"";print "---"} {a=$$1;gsub("\\.\\.\\.","",a);print "\"#define " $$1 "\" " a}' $< |\
--	$(CC) -E -I./$(HDIR) - |\
-+	$(CC) -E -P -I./$(HDIR) - |\
- 	$(AWK) '/^\-\-\-$$/ {i=1;next} {if (!i) next} {gsub("\"","");print}' >$@

diff --git a/dev-lisp/gcl/gcl-2.6.12.ebuild b/dev-lisp/gcl/gcl-2.6.12.ebuild
deleted file mode 100644
index 37a0306ac5f1..000000000000
--- a/dev-lisp/gcl/gcl-2.6.12.ebuild
+++ /dev/null
@@ -1,147 +0,0 @@
-# Copyright 1999-2022 Gentoo Authors
-# Distributed under the terms of the GNU General Public License v2
-
-EAPI=5
-inherit elisp-common epatch flag-o-matic
-
-DESCRIPTION="GNU Common Lisp"
-HOMEPAGE="https://www.gnu.org/software/gcl/gcl.html"
-SRC_URI="mirror://gnu/${PN}/${P}.tar.gz https://dev.gentoo.org/~grozin/${P}-fedora.tar.bz2"
-S="${WORKDIR}"/${PN}
-
-LICENSE="LGPL-2 GPL-2"
-SLOT="0"
-KEYWORDS="~amd64 ~arm ~ppc ppc64 ~x86"
-IUSE="+ansi athena emacs +readline tk X"
-
-# See bug #205803
-RESTRICT="strip"
-
-RDEPEND="emacs? ( >=app-editors/emacs-23.1:* )
-	readline? ( sys-libs/readline:= )
-	athena? ( x11-libs/libXaw )
-	>=dev-libs/gmp-4.1:=
-	tk? ( dev-lang/tk:= )
-	X? ( x11-libs/libXt x11-libs/libXext x11-libs/libXmu x11-libs/libXaw )
-	virtual/latex-base"
-DEPEND="${RDEPEND}
-	virtual/texi2dvi
-	>=app-text/texi2html-1.64
-	>=sys-devel/autoconf-2.52"
-
-src_prepare() {
-	mv "${WORKDIR}"/fedora/info/* info/
-	cp -p /usr/share/texmf-dist/tex/texinfo/texinfo.tex info/
-	find . -type f -perm /0111 | xargs chmod a-x
-	chmod a+x add-defs add-defs1 config.guess config.sub configure install.sh
-	chmod a+x bin/info bin/info1 gcl-tk/gcltksrv.in gcl-tk/ngcltksrv mp/gcclab
-	chmod a+x o/egrep-def utils/replace xbin/*
-	epatch "${FILESDIR}"/${P}-gcc5.patch
-
-	# fedora patches
-	epatch "${WORKDIR}"/fedora/fd-leak.patch
-	epatch "${WORKDIR}"/fedora/latex.patch
-	epatch "${WORKDIR}"/fedora/texinfo.patch
-	epatch "${WORKDIR}"/fedora/elisp.patch
-	epatch "${WORKDIR}"/fedora/selinux.patch
-	epatch "${WORKDIR}"/fedora/rename.patch
-	epatch "${WORKDIR}"/fedora/getcwd.patch
-	epatch "${WORKDIR}"/fedora/plt.patch
-	epatch "${WORKDIR}"/fedora/ellipsis.patch
-	epatch "${WORKDIR}"/fedora/infrastructure.patch
-	epatch "${WORKDIR}"/fedora/extension.patch
-	epatch "${WORKDIR}"/fedora/unrandomize.patch
-	epatch "${WORKDIR}"/fedora/asm-signal-h.patch
-	epatch "${WORKDIR}"/fedora/largefile.patch
-	epatch "${WORKDIR}"/fedora/arm.patch
-
-	epatch_user
-
-	sed -e 's|"-fomit-frame-pointer"|""|' -i configure
-}
-
-src_configure() {
-	strip-flags
-	filter-flags -fstack-protector -fstack-protector-all
-	append-cflags $(test-flags-CC -fgnu89-inline)
-
-	local tcl=""
-	if use tk; then
-		tcl="--enable-tclconfig=/usr/lib --enable-tkconfig=/usr/lib"
-	fi
-
-	econf --enable-dynsysgmp \
-		--disable-xdr \
-		--enable-emacsdir=/usr/share/emacs/site-lisp/gcl \
-		--enable-infodir=/usr/share/info \
-		$(use_enable readline) \
-		$(use_enable ansi) \
-		$(use_enable athena xgcl) \
-		$(use_with X x) \
-		${tcl}
-}
-
-src_compile() {
-	emake -j1
-	VARTEXFONTS="${T}"/fonts emake -C info gcl.info
-	if use athena; then
-		pushd xgcl-2 > /dev/null
-		pdflatex dwdoc.tex
-		popd > /dev/null
-	fi
-}
-
-src_test() {
-	local make_ansi_tests_clean="rm -f test.out *.fasl *.o *.so *~ *.fn *.x86f *.fasl *.ufsl"
-	if use ansi; then
-		cd ansi-tests
-
-		( make clean && make test-unixport ) \
-			|| die "make ansi-tests failed!"
-
-		cat "${FILESDIR}/bootstrap-gcl" \
-			| ../unixport/saved_ansi_gcl
-
-		cat "${FILESDIR}/bootstrap-gcl" \
-			|sed s/bootstrapped_ansi_gcl/bootstrapped_r_ansi_gcl/g \
-			| ./bootstrapped_ansi_gcl
-
-		( ${make_ansi_tests_clean} && \
-			echo "(load \"gclload.lsp\")" \
-			| ./bootstrapped_r_ansi_gcl ) \
-			|| die "Phase 2, bootstraped compiler failed in tests"
-	fi
-}
-
-src_install() {
-	emake DESTDIR="${D}" install
-	rm -rf "${D}"usr/share/doc
-	rm -rf "${D}"usr/share/emacs
-
-	rm elisp/add-defaults.el
-	dodoc readme* RELEASE* ChangeLog* doc/*
-	doman man/man1/gcl.1
-	doinfo info/*.info*
-	dohtml -r info/gcl-si info/gcl-tk
-
-	if use emacs; then
-		elisp-site-file-install "${FILESDIR}"/64${PN}-gentoo.el
-		elisp-install ${PN} elisp/*.el
-	fi
-
-	dodoc info/gcl-{si,tk}.pdf
-	docompress -x /usr/share/doc/${PF}/gcl-{si,tk}.pdf
-
-	if use athena; then
-		dodoc xgcl-2/dwdoc.pdf
-		docompress -x /usr/share/doc/${PF}/dwdoc.pdf
-	fi
-}
-
-pkg_postinst() {
-	use emacs && elisp-site-regen
-}
-
-pkg_postrm() {
-	use emacs && elisp-site-regen
-}


^ permalink raw reply related	[flat|nested] 5+ messages in thread

* [gentoo-commits] repo/gentoo:master commit in: dev-lisp/gcl/, dev-lisp/gcl/files/
@ 2022-04-17 20:12 Ulrich Müller
  0 siblings, 0 replies; 5+ messages in thread
From: Ulrich Müller @ 2022-04-17 20:12 UTC (permalink / raw
  To: gentoo-commits

commit:     e45260b7eaec7480f56578a66e59fed830132c1d
Author:     Ulrich Müller <ulm <AT> gentoo <DOT> org>
AuthorDate: Sun Apr 17 20:09:27 2022 +0000
Commit:     Ulrich Müller <ulm <AT> gentoo <DOT> org>
CommitDate: Sun Apr 17 20:12:24 2022 +0000
URL:        https://gitweb.gentoo.org/repo/gentoo.git/commit/?id=e45260b7

dev-lisp/gcl: Remove old

Signed-off-by: Ulrich Müller <ulm <AT> gentoo.org>

 dev-lisp/gcl/Manifest                     |   2 -
 dev-lisp/gcl/files/gcl-gmp-6.patch        |   8 --
 dev-lisp/gcl/files/gcl-readline-6.3.patch |  18 ----
 dev-lisp/gcl/files/gcl-tcl-8.6.patch      | 103 ---------------------
 dev-lisp/gcl/gcl-2.6.10.ebuild            | 149 ------------------------------
 5 files changed, 280 deletions(-)

diff --git a/dev-lisp/gcl/Manifest b/dev-lisp/gcl/Manifest
index 38004af63fd9..f52fb79b7298 100644
--- a/dev-lisp/gcl/Manifest
+++ b/dev-lisp/gcl/Manifest
@@ -1,3 +1 @@
-DIST gcl-2.6.10-fedora.tar.bz2 695718 BLAKE2B 151cac372f74a971ffb31191a3614d0f7bafca141258af9e1955185f8ed119cbcd3797f2d9bbe5eb5f82e76af4fd0d3e0cf155cd35f305a2c028e40b340b78cf SHA512 3e0ffaec859783443a8941a29302c7a17c9538ef2177d449ad34e24292c174de7bb8760a6d327e08f012773032f0d0a5230b79c7e4b4f5bad8354bf10a28af4c
-DIST gcl-2.6.10.tar.gz 5490689 BLAKE2B 46af0cf8a810a82fe2bc2bd46ca1cbe17b74c71eb4af6a06032040900dcad4dd4338883cd9225f0945ae425eba788ac84db9a0ed454779edd86c74a1bb48a947 SHA512 bbaacce712f15130550bcdf7e53edf4df9ab955e84ec701087034115df1c1e657d956853d5db85d7e88709981f9b7fd4c9df7acf6c8588a8ccf5f05e4e666aed
 DIST gcl-2.6.13_pre99.tar.xz 10030460 BLAKE2B 8750d641062bcad5a124173013d38403f37ad352c7c436e89d4e329d997200be399a100dcefc4ce484e3f85f46e2dd90ee02947e5e728e001782e973c4122b0e SHA512 a3ad2bd639157ca2a80b534e87c169f6e07002a1b9ca8039483cff336af764123dec9e749da045b656b990e0a97c70881c798420ec4bd0e4494f43d0d040e413

diff --git a/dev-lisp/gcl/files/gcl-gmp-6.patch b/dev-lisp/gcl/files/gcl-gmp-6.patch
deleted file mode 100644
index f66638478af1..000000000000
--- a/dev-lisp/gcl/files/gcl-gmp-6.patch
+++ /dev/null
@@ -1,8 +0,0 @@
-diff -r -U1 gcl.orig/configure gcl/configure
---- gcl.orig/configure	2013-11-11 21:55:48.000000000 +0700
-+++ gcl/configure	2014-03-30 17:25:04.874994142 +0700
-@@ -5027,3 +5027,3 @@
- 				    int main() {
--				    #if __GNU_MP_VERSION == 4 || __GNU_MP_VERSION == 5
-+				    #if __GNU_MP_VERSION == 4 || __GNU_MP_VERSION == 5 || __GNU_MP_VERSION == 6
- 					return 0;

diff --git a/dev-lisp/gcl/files/gcl-readline-6.3.patch b/dev-lisp/gcl/files/gcl-readline-6.3.patch
deleted file mode 100644
index 063c772f1051..000000000000
--- a/dev-lisp/gcl/files/gcl-readline-6.3.patch
+++ /dev/null
@@ -1,18 +0,0 @@
-diff -r -U1 gcl.orig/o/gcl_readline.d gcl/o/gcl_readline.d
---- gcl.orig/o/gcl_readline.d	2013-11-11 21:55:48.000000000 +0700
-+++ gcl/o/gcl_readline.d	2014-03-30 18:29:42.131967005 +0700
-@@ -53,2 +53,9 @@
- 
-+/* Deprecated CPPFunction disappeared in libreadline-6.3 */
-+#if defined(_RL_FUNCTION_TYPEDEF)
-+#define RL_COMPLETION_FUNC_T rl_completion_func_t
-+#else
-+#define RL_COMPLETION_FUNC_T CPPFunction
-+#endif
-+
- int readline_on = 0;		/* On (1) or off (0) */
-@@ -471,3 +478,3 @@
- #ifdef RL_COMPLETION
--  rl_attempted_completion_function = (CPPFunction *)rl_completion;
-+  rl_attempted_completion_function = (RL_COMPLETION_FUNC_T *)rl_completion;
- #endif		

diff --git a/dev-lisp/gcl/files/gcl-tcl-8.6.patch b/dev-lisp/gcl/files/gcl-tcl-8.6.patch
deleted file mode 100644
index cfbf82e32899..000000000000
--- a/dev-lisp/gcl/files/gcl-tcl-8.6.patch
+++ /dev/null
@@ -1,103 +0,0 @@
-diff --git a/gcl/gcl-tk/tkMain.c b/gcl/gcl-tk/tkMain.c
-index 74475cc..21c6c59 100755
---- a/gcl/gcl-tk/tkMain.c
-+++ b/gcl/gcl-tk/tkMain.c
-@@ -42,6 +42,11 @@
- #if (TK_MINOR_VERSION==0 && TK_MAJOR_VERSION==4)
- #define TkCreateMainWindow Tk_CreateMainWindow
- #endif
-+#if TCL_MAJOR_VERSION >= 8
-+#define INTERP_RESULT(interp) Tcl_GetStringResult(interp)
-+#else
-+#define INTERP_RESULT(interp) (interp)->result
-+#endif
- 
- 
- /*-------------------------------------------------------------------*/
-@@ -276,7 +281,7 @@ TkX_Wish (argc, argv)
- 
-     if (Tk_ParseArgv(interp, (Tk_Window) NULL, &argc, (void *)argv, argTable, 0)
- 	    != TCL_OK) {
--	fprintf(stderr, "%s\n", interp->result);
-+	fprintf(stderr, "%s\n", INTERP_RESULT(interp));
- 	exit(1);
-     }
-     if (name == NULL) {
-@@ -309,7 +314,7 @@ TkX_Wish (argc, argv)
- 
- /*     mainWindow = TkCreateMainWindow(interp, display, name/\*  , "Tk" *\/);  */
- /*     if (mainWindow == NULL) { */
--/* 	fprintf(stderr, "%s\n", interp->result); */
-+/* 	fprintf(stderr, "%s\n", INTERP_RESULT(interp)); */
- /* 	exit(1); */
- /*     } */
- /* #ifndef __MINGW32__     */
-@@ -362,7 +367,7 @@ TkX_Wish (argc, argv)
-     Tcl_FindExecutable ( argv[0] ); 
- #else
-     if (Tcl_AppInit(interp) != TCL_OK) {
--	fprintf(stderr, "Tcl_AppInit failed: %s\n", interp->result);
-+	fprintf(stderr, "Tcl_AppInit failed: %s\n", INTERP_RESULT(interp));
-     }
- #endif
-     /*
-@@ -372,7 +377,7 @@ TkX_Wish (argc, argv)
-     if (geometry != NULL) {
- 	code = Tcl_VarEval(interp, "wm geometry . ", geometry, (char *) NULL);
- 	if (code != TCL_OK) {
--	    fprintf(stderr, "%s\n", interp->result);
-+	    fprintf(stderr, "%s\n", INTERP_RESULT(interp));
- 	}
-     }
- 
-@@ -402,13 +407,13 @@ TkX_Wish (argc, argv)
-     
- 	    fullName = Tcl_TildeSubst(interp, tcl_RcFileName, &buffer);
- 	    if (fullName == NULL) {
--		fprintf(stderr, "%s\n", interp->result);
-+		fprintf(stderr, "%s\n", INTERP_RESULT(interp));
- 	    } else {
- 		f = fopen(fullName, "r");
- 		if (f != NULL) {
- 		    code = Tcl_EvalFile(interp, fullName);
- 		    if (code != TCL_OK) {
--			fprintf(stderr, "%s\n", interp->result);
-+			fprintf(stderr, "%s\n", INTERP_RESULT(interp));
- 		    }
- 		    fclose(f);
- 		}
-@@ -443,7 +448,7 @@ TkX_Wish (argc, argv)
- error:
-     msg = Tcl_GetVar(interp, "errorInfo", TCL_GLOBAL_ONLY);
-     if (msg == NULL) {
--	msg = interp->result;
-+	msg = INTERP_RESULT(interp);
-     }
-     dfprintf(stderr, "%s\n", msg);
-     Tcl_Eval(interp, errorExitCmd);
-@@ -566,13 +571,13 @@ StdinProc(clientData, mask)
- 	      || code)
- 	    {
- 	      char buf[4];
--	      char *p = buf;
-+	      char *p = buf, *string;
- 	      /*header */
- 	      *p++ = (code ? '1' : '0');
- 	      bcopy(msg->msg_id,p,3);
- 	      /* end header */
--	      if(sock_write_str2(dsfd, m_reply, buf, 4 ,
--				 interp->result, strlen(interp->result))
-+	      string = INTERP_RESULT(interp);
-+	      if(sock_write_str2(dsfd, m_reply, buf, 4, string, strlen(string))
- 		 < 0)
- 		{		/* what do we want to do if the write failed */}
- 	      
-@@ -752,7 +757,7 @@ guiBindCallback(char *szNameCmdProc, char *szTclObject, char *szModifier,char* a
-   code = Tcl_Eval(interp, szCmd);
-   if (code != TCL_OK)
-     {
--      dfprintf(stderr, "TCL Error int bind : %s\n", interp->result);
-+      dfprintf(stderr, "TCL Error int bind : %s\n", INTERP_RESULT(interp));
- 
-     }
-   return code;

diff --git a/dev-lisp/gcl/gcl-2.6.10.ebuild b/dev-lisp/gcl/gcl-2.6.10.ebuild
deleted file mode 100644
index 47a5f441a32c..000000000000
--- a/dev-lisp/gcl/gcl-2.6.10.ebuild
+++ /dev/null
@@ -1,149 +0,0 @@
-# Copyright 1999-2022 Gentoo Authors
-# Distributed under the terms of the GNU General Public License v2
-
-EAPI=5
-
-inherit elisp-common epatch flag-o-matic
-
-DESCRIPTION="GNU Common Lisp"
-HOMEPAGE="https://www.gnu.org/software/gcl/gcl.html"
-SRC_URI="mirror://gnu/${PN}/${P}.tar.gz https://dev.gentoo.org/~grozin/${P}-fedora.tar.bz2"
-S="${WORKDIR}"/${PN}
-
-LICENSE="LGPL-2 GPL-2"
-SLOT="0"
-KEYWORDS="amd64 ~arm x86"
-IUSE="+ansi athena emacs +readline tk X"
-
-# See bug #205803
-RESTRICT="strip"
-
-RDEPEND="emacs? ( >=app-editors/emacs-23.1:* )
-	readline? ( sys-libs/readline:= )
-	athena? ( x11-libs/libXaw )
-	>=dev-libs/gmp-4.1:=
-	tk? ( dev-lang/tk:= )
-	X? ( x11-libs/libXt x11-libs/libXext x11-libs/libXmu x11-libs/libXaw )
-	virtual/latex-base"
-DEPEND="${RDEPEND}
-	virtual/texi2dvi
-	>=app-text/texi2html-1.64
-	>=sys-devel/autoconf-2.52"
-
-src_prepare() {
-	mv "${WORKDIR}"/fedora/info/* info/
-	cp -p /usr/share/texmf-dist/tex/texinfo/texinfo.tex info/
-	find . -type f -perm /0111 | xargs chmod a-x
-	chmod a+x add-defs add-defs1 config.guess config.sub configure install.sh
-	chmod a+x bin/info bin/info1 gcl-tk/gcltksrv.in gcl-tk/ngcltksrv mp/gcclab
-	chmod a+x o/egrep-def utils/replace xbin/*
-
-	# fedora patches
-	epatch "${WORKDIR}"/fedora/fd-leak.patch
-	epatch "${WORKDIR}"/fedora/latex.patch
-	epatch "${WORKDIR}"/fedora/texinfo.patch
-	epatch "${WORKDIR}"/fedora/elisp.patch
-	epatch "${WORKDIR}"/fedora/rename.patch
-	epatch "${WORKDIR}"/fedora/getcwd.patch
-	epatch "${WORKDIR}"/fedora/infrastructure.patch
-	epatch "${WORKDIR}"/fedora/extension.patch
-	epatch "${WORKDIR}"/fedora/unrandomize.patch
-	epatch "${WORKDIR}"/fedora/asm-signal-h.patch
-	epatch "${WORKDIR}"/fedora/plt.patch
-	epatch "${WORKDIR}"/fedora/ellipsis.patch
-	epatch "${WORKDIR}"/fedora/man.patch
-	epatch "${WORKDIR}"/fedora/reloc-type.patch
-	epatch "${WORKDIR}"/fedora/largefile.patch
-
-	epatch "${FILESDIR}"/${PN}-tcl-8.6.patch
-	epatch "${FILESDIR}"/${PN}-gmp-6.patch
-	epatch "${FILESDIR}"/${PN}-readline-6.3.patch
-
-	sed -e 's|"-fomit-frame-pointer"|""|' -i configure
-	sed -e 's|@EXT@||g' debian/in.gcl.1 > gcl.1
-}
-
-src_configure() {
-	strip-flags
-	filter-flags -fstack-protector -fstack-protector-all
-
-	local tcl=""
-	if use tk; then
-		tcl="--enable-tclconfig=/usr/lib --enable-tkconfig=/usr/lib"
-	fi
-
-	econf --enable-dynsysgmp \
-		--disable-xdr \
-		--enable-emacsdir=/usr/share/emacs/site-lisp/gcl \
-		--enable-infodir=/usr/share/info \
-		$(use_enable readline) \
-		$(use_enable ansi) \
-		$(use_enable athena xgcl) \
-		$(use_with X x) \
-		${tcl}
-}
-
-src_compile() {
-	emake -j1
-	VARTEXFONTS="${T}"/fonts emake -C info gcl.info
-	if use athena; then
-		pushd xgcl-2 > /dev/null
-		pdflatex dwdoc.tex
-		popd > /dev/null
-	fi
-}
-
-src_test() {
-	local make_ansi_tests_clean="rm -f test.out *.fasl *.o *.so *~ *.fn *.x86f *.fasl *.ufsl"
-	if use ansi; then
-		cd ansi-tests
-
-		( make clean && make test-unixport ) \
-			|| die "make ansi-tests failed!"
-
-		cat "${FILESDIR}/bootstrap-gcl" \
-			| ../unixport/saved_ansi_gcl
-
-		cat "${FILESDIR}/bootstrap-gcl" \
-			|sed s/bootstrapped_ansi_gcl/bootstrapped_r_ansi_gcl/g \
-			| ./bootstrapped_ansi_gcl
-
-		( ${make_ansi_tests_clean} && \
-			echo "(load \"gclload.lsp\")" \
-			| ./bootstrapped_r_ansi_gcl ) \
-			|| die "Phase 2, bootstraped compiler failed in tests"
-	fi
-}
-
-src_install() {
-	emake DESTDIR="${D}" install
-	mv "${D}"usr/share/doc/*.dvi .
-	rm -rf "${D}"usr/share/doc
-	rm -rf "${D}"usr/share/emacs
-	rm -rf "${D}"usr/lib/gcl-*/info
-
-	rm doc/makefile elisp/add-defaults.el
-	dodoc readme* RELEASE* ChangeLog* doc/*
-	doman gcl.1
-	doinfo info/*.info*
-	dohtml -r info/gcl-si info/gcl-tk
-
-	if use emacs; then
-		elisp-site-file-install "${FILESDIR}"/64${PN}-gentoo.el
-		elisp-install ${PN} elisp/*.el
-	fi
-
-	docompress -x /usr/share/doc/${PF}/*.dvi
-	if use athena; then
-		dodoc xgcl-2/*.pdf
-		docompress -x /usr/share/doc/${PF}/*.pdf
-	fi
-}
-
-pkg_postinst() {
-	use emacs && elisp-site-regen
-}
-
-pkg_postrm() {
-	use emacs && elisp-site-regen
-}


^ permalink raw reply related	[flat|nested] 5+ messages in thread

* [gentoo-commits] repo/gentoo:master commit in: dev-lisp/gcl/, dev-lisp/gcl/files/
@ 2023-07-23  6:36 Andrey Grozin
  0 siblings, 0 replies; 5+ messages in thread
From: Andrey Grozin @ 2023-07-23  6:36 UTC (permalink / raw
  To: gentoo-commits

commit:     1df41789e42bd69a62b605805fd9adcce7ae3863
Author:     Andrey Grozin <grozin <AT> gentoo <DOT> org>
AuthorDate: Sun Jul 23 06:36:27 2023 +0000
Commit:     Andrey Grozin <grozin <AT> gentoo <DOT> org>
CommitDate: Sun Jul 23 06:36:27 2023 +0000
URL:        https://gitweb.gentoo.org/repo/gentoo.git/commit/?id=1df41789

dev-lisp/gcl: move a long patch to dev.gentoo.org

Signed-off-by: Andrey Grozin <grozin <AT> gentoo.org>

 dev-lisp/gcl/Manifest                             |   1 +
 dev-lisp/gcl/files/gcl-2.6.15_pre3-spelling.patch | 766 ----------------------
 dev-lisp/gcl/gcl-2.6.15_pre3.ebuild               |   5 +-
 3 files changed, 4 insertions(+), 768 deletions(-)

diff --git a/dev-lisp/gcl/Manifest b/dev-lisp/gcl/Manifest
index c209f0003839..8e40b0012d2f 100644
--- a/dev-lisp/gcl/Manifest
+++ b/dev-lisp/gcl/Manifest
@@ -1,3 +1,4 @@
 DIST gcl-2.6.13_pre99.tar.xz 10030460 BLAKE2B 8750d641062bcad5a124173013d38403f37ad352c7c436e89d4e329d997200be399a100dcefc4ce484e3f85f46e2dd90ee02947e5e728e001782e973c4122b0e SHA512 a3ad2bd639157ca2a80b534e87c169f6e07002a1b9ca8039483cff336af764123dec9e749da045b656b990e0a97c70881c798420ec4bd0e4494f43d0d040e413
 DIST gcl-2.6.14.tar.gz 11725385 BLAKE2B 3e6a7fc359f94897d1062f5e5e31a0ae36f5d24ca0155fd22044cb967f1fd6a0303572dafe25b1a7abbc936db4e8caa93d0e50b1779886e2ba40e148fa868b8f SHA512 1a69f5e8195783c88b618a613253da1089b13e390dd259056df52f1ed95cf0c99358c34d3782c8eb297c07fda74deb7db359e6b9bf94590ee7fc34e94742eb14
+DIST gcl-2.6.15_pre3-spelling.patch.gz 10530 BLAKE2B ce2f4a2a568467c77ef58d6063df4596220a0826e18158e0f3308dc6c4a89451910a2c54a179131a4d0cb5362e7b20ba33691d2a80c02dc81e826d664298c29b SHA512 f72cf9c6607603f548220ee169fdbaf9151ea41f2be03209c258a261c6274b97c78b02e8258b2a2550ff9fcd8ab144a334789f274deedf0fe9f050a10bd54a67
 DIST gcl-Version_2_6_15pre3.tar.gz 11433299 BLAKE2B cee392674f465477d37bcdf724651f88e08b90a74ca3e79a561b99f0e61227332dbee77ed688cda7525341421df262a0a58c325576d6e8a5daaa1122ae36c6e4 SHA512 bf05c3f4ecad74a9e29b25969d3f82d39c9715bfa98c1b734b279a7886e60076ecb5896723fe1888255c4eecf4e5eda60696d25ad6a8e17eb55088b2a37ad3ce

diff --git a/dev-lisp/gcl/files/gcl-2.6.15_pre3-spelling.patch b/dev-lisp/gcl/files/gcl-2.6.15_pre3-spelling.patch
deleted file mode 100644
index 1994429e8b63..000000000000
--- a/dev-lisp/gcl/files/gcl-2.6.15_pre3-spelling.patch
+++ /dev/null
@@ -1,766 +0,0 @@
-diff -r -U3 ../gcl-Version_2_6_15pre3.orig/gcl/ansi-tests/ensure-directories-exist.lsp gcl/ansi-tests/ensure-directories-exist.lsp
---- ../gcl-Version_2_6_15pre3.orig/gcl/ansi-tests/ensure-directories-exist.lsp	2023-02-14 20:20:46.000000000 +0700
-+++ gcl/ansi-tests/ensure-directories-exist.lsp	2023-07-22 20:42:36.142346806 +0700
-@@ -108,7 +108,7 @@
- 
- ;;; Case where directory shouldn't exist
- 
--;; The directort ansi-tests/scratch must not exist before this
-+;; The directory ansi-tests/scratch must not exist before this
- ;; test is run
- (deftest ensure-directories-exist.8
-   (let* ((subdir (make-pathname :directory '(:relative "scratch")
-diff -r -U3 ../gcl-Version_2_6_15pre3.orig/gcl/ansi-tests/iteration.lsp gcl/ansi-tests/iteration.lsp
---- ../gcl-Version_2_6_15pre3.orig/gcl/ansi-tests/iteration.lsp	2023-02-14 20:20:46.000000000 +0700
-+++ gcl/ansi-tests/iteration.lsp	2023-07-22 20:42:36.142346806 +0700
-@@ -121,7 +121,7 @@
- 	(%f))))
-   45)
- 
--;;; Confirm that the variables in succesive iterations are
-+;;; Confirm that the variables in successive iterations are
- ;;; identical
- (deftest do.15
-   (mapcar #'funcall
-@@ -240,7 +240,7 @@
- 	(%f))))
-   45)
- 
--;;; Confirm that the variables in succesive iterations are
-+;;; Confirm that the variables in successive iterations are
- ;;; identical
- (deftest do*.15
-   (mapcar #'funcall
-diff -r -U3 ../gcl-Version_2_6_15pre3.orig/gcl/ansi-tests/loop1.lsp gcl/ansi-tests/loop1.lsp
---- ../gcl-Version_2_6_15pre3.orig/gcl/ansi-tests/loop1.lsp	2023-02-14 20:20:46.000000000 +0700
-+++ gcl/ansi-tests/loop1.lsp	2023-07-22 20:42:36.142346806 +0700
-@@ -211,7 +211,7 @@
-   (loop for x from 1 to 5 do nil finally (return x))
-   5)
- 
--;;; Test that the index variable acheives the exclusive
-+;;; Test that the index variable achieves the exclusive
- ;;; upper bound, but does not exceed it.
- (deftest loop.1.41
-   (loop for x from 1 below 5 do nil finally (return x))
-@@ -224,4 +224,4 @@
- (deftest loop.1.43
-   (loop for x from 10 above 0 do nil finally (return x))
-   1)
--|#
-\ В конце файла нет новой строки
-+|#
-diff -r -U3 ../gcl-Version_2_6_15pre3.orig/gcl/info/chap-10.texi gcl/info/chap-10.texi
---- ../gcl-Version_2_6_15pre3.orig/gcl/info/chap-10.texi	2023-02-14 20:20:46.000000000 +0700
-+++ gcl/info/chap-10.texi	2023-07-22 20:42:36.142346806 +0700
-@@ -996,7 +996,7 @@
- 
- @b{setf} of @b{get} may be used to associate a new @i{object}
- with an existing indicator already on the @i{symbol}'s @i{property list},
--or to create a new assocation if none exists.
-+or to create a new association if none exists.
- 
- If there are multiple @i{properties}_1 with that @i{property indicator},
- @b{setf} of @b{get} associates the @i{new-value} 
-diff -r -U3 ../gcl-Version_2_6_15pre3.orig/gcl/info/chap-14.texi gcl/info/chap-14.texi
---- ../gcl-Version_2_6_15pre3.orig/gcl/info/chap-14.texi	2023-02-14 20:20:46.000000000 +0700
-+++ gcl/info/chap-14.texi	2023-07-22 20:42:36.143346806 +0700
-@@ -160,7 +160,7 @@
- @w{  assoc  assoc-if-not  rassoc   rassoc-if-not  }
- 
- @noindent
--@w{  Figure 14--4: Some defined names related to assocation lists.}
-+@w{  Figure 14--4: Some defined names related to association lists.}
- 
- @end group
- @end format
-@@ -3046,7 +3046,7 @@
- 
- @b{setf} of @b{getf} may be used to associate a new @i{object}
- with an existing indicator in the @i{property list} held by @i{place},
--or to create a new assocation if none exists.
-+or to create a new association if none exists.
- 
- If there are multiple @i{properties}_1 with that @i{property indicator},
- @b{setf} of @b{getf} associates the @i{new-value} 
-diff -r -U3 ../gcl-Version_2_6_15pre3.orig/gcl/info/chap-19.texi gcl/info/chap-19.texi
---- ../gcl-Version_2_6_15pre3.orig/gcl/info/chap-19.texi	2023-02-14 20:20:46.000000000 +0700
-+++ gcl/info/chap-19.texi	2023-07-22 20:42:36.143346806 +0700
-@@ -2119,7 +2119,7 @@
- 
- @b{translate-logical-pathname} might perform additional translations,
-     typically to provide translation of file types to local naming
--    conventions, to accomodate physical file systems with limited length
-+    conventions, to accommodate physical file systems with limited length
-     names, or to deal with special character requirements such as
-     translating hyphens to underscores or uppercase letters to lowercase.
-     Any such additional translations are @i{implementation-defined}.  Some
-diff -r -U3 ../gcl-Version_2_6_15pre3.orig/gcl/info/chap-21.texi gcl/info/chap-21.texi
---- ../gcl-Version_2_6_15pre3.orig/gcl/info/chap-21.texi	2023-02-14 20:20:46.000000000 +0700
-+++ gcl/info/chap-21.texi	2023-07-22 20:42:36.143346806 +0700
-@@ -867,9 +867,9 @@
- @subsubheading  Examples::
- 
- @example
--;; Note that the stream must accomodate at least the specified type,
--;; but might accomodate other types.  Further note that even if it does
--;; accomodate exactly the specified type, the type might be specified in
-+;; Note that the stream must accommodate at least the specified type,
-+;; but might accommodate other types.  Further note that even if it does
-+;; accommodate exactly the specified type, the type might be specified in
- ;; any of several ways.
-  (with-open-file (s "test" :element-type '(integer 0 1)
-                            :if-exists :error
-@@ -2180,7 +2180,7 @@
- to define.  A given @i{implementation} might not be able to support all of these options 
- in exactly the manner stated.  An @i{implementation} is required to recognize all of 
- these option keywords and to try to do something ``reasonable'' in the context of the 
--host @i{file system}.  Where necessary to accomodate the @i{file system},
-+host @i{file system}.  Where necessary to accommodate the @i{file system},
- an @i{implementation} deviate slightly from the semantics specified here without 
- being disqualified for consideration as a @i{conforming implementation}.
- If it is utterly impossible for an @i{implementation} to handle some option
-diff -r -U3 ../gcl-Version_2_6_15pre3.orig/gcl/info/chap-26.texi gcl/info/chap-26.texi
---- ../gcl-Version_2_6_15pre3.orig/gcl/info/chap-26.texi	2023-02-14 20:20:46.000000000 +0700
-+++ gcl/info/chap-26.texi	2023-07-22 20:42:36.144346806 +0700
-@@ -2218,7 +2218,7 @@
-   and that is one of:
-       the @i{symbol} @t{:default} 
-          (denoting an @i{implementation-dependent} default 
--          @i{external file format} that can accomodate at least
-+          @i{external file format} that can accommodate at least
-           the @i{base characters}),
-       some other @i{object} defined by the @i{implementation} to be
-       an @i{external file format designator}
-diff -r -U3 ../gcl-Version_2_6_15pre3.orig/gcl/info/chap-5.texi gcl/info/chap-5.texi
---- ../gcl-Version_2_6_15pre3.orig/gcl/info/chap-5.texi	2023-02-14 20:20:46.000000000 +0700
-+++ gcl/info/chap-5.texi	2023-07-22 20:42:36.145346806 +0700
-@@ -3595,7 +3595,7 @@
- @subsubheading  Description::
- 
- The value of @b{eql} is @i{true} of two objects, @i{x} and
--@i{y}, in the folowing cases:
-+@i{y}, in the following cases:
- @table @asis
- 
- @item 1.  
-diff -r -U3 ../gcl-Version_2_6_15pre3.orig/gcl/info/chap-9.texi gcl/info/chap-9.texi
---- ../gcl-Version_2_6_15pre3.orig/gcl/info/chap-9.texi	2023-02-14 20:20:46.000000000 +0700
-+++ gcl/info/chap-9.texi	2023-07-22 20:42:36.145346806 +0700
-@@ -681,7 +681,7 @@
- 
- A @i{restart} can be ``associated with'' a @i{condition} explicitly
- by @b{with-condition-restarts}, or implicitly by @b{restart-case}.
--Such an assocation has @i{dynamic extent}.
-+Such an association has @i{dynamic extent}.
- 
- A single @i{restart} may be associated with several @i{conditions} 
- at the same time.
-@@ -2075,7 +2075,7 @@
- differences between @b{break} and @b{cerror}.
- 
- The user interface aspects of @b{break} and @b{cerror} are
--permitted to vary more widely, in order to accomodate the interface
-+permitted to vary more widely, in order to accommodate the interface
- needs of the @i{implementation}. For example, it is permissible for a
- @i{Lisp read-eval-print loop} to be entered by @b{break} rather
- than the conventional debugger.
-@@ -3464,7 +3464,7 @@
- to @b{invoke-restart}.
- 
- By default, @b{invoke-restart-interactively} passes no arguments and
--all arguments must be optional in order to accomodate interactive
-+all arguments must be optional in order to accommodate interactive
- restarting.  However, the arguments need not be optional if the
- @t{:interactive} 
- keyword has been used to inform @b{invoke-restart-interactively}
-diff -r -U3 ../gcl-Version_2_6_15pre3.orig/gcl/info/compile.texi gcl/info/compile.texi
---- ../gcl-Version_2_6_15pre3.orig/gcl/info/compile.texi	2023-02-14 20:20:46.000000000 +0700
-+++ gcl/info/compile.texi	2023-07-22 20:42:36.146346806 +0700
-@@ -260,22 +260,22 @@
- 
- 
- @defvar *DEFAULT-SYSTEM-P*
--Pakcage:COMPILER
-+Package:COMPILER
- Specifies the default setting of :SYSTEM-P used by COMPILE.  Defaults to NIL.
- @end defvar
- 
- @defvar *DEFAULT-C-FILE*
--Pakcage:COMPILER
-+Package:COMPILER
- Specifies the default setting of :C-FILE used by COMPILE.  Defaults to NIL.
- @end defvar
- 
- @defvar *DEFAULT-H-FILE*
--Pakcage:COMPILER
-+Package:COMPILER
- Specifies the default setting of :H-FILE used by COMPILE.  Defaults to NIL.
- @end defvar
- 
- @defvar *DEFAULT-DATA-FILE*
--Pakcage:COMPILER
-+Package:COMPILER
- Specifies the default setting of :DATA-FILE used by COMPILE.  Defaults to NIL.
- @end defvar
- 
-diff -r -U3 ../gcl-Version_2_6_15pre3.orig/gcl/info/gcl/eql.html gcl/info/gcl/eql.html
---- ../gcl-Version_2_6_15pre3.orig/gcl/info/gcl/eql.html	2023-02-14 20:20:46.000000000 +0700
-+++ gcl/info/gcl/eql.html	2023-07-22 20:42:36.147346806 +0700
-@@ -57,7 +57,7 @@
- <span id="Description_003a_003a-87"></span><h4 class="subsubheading">Description::</h4>
- 
- <p>The value of <b>eql</b> is <i>true</i> of two objects, <i>x</i> and
--<i>y</i>, in the folowing cases:
-+<i>y</i>, in the following cases:
- </p><dl compact="compact">
- <dt>1.</dt>
- <dd><p>If <i>x</i> and <i>y</i> are <b>eq</b>.
-diff -r -U3 ../gcl-Version_2_6_15pre3.orig/gcl/info/gcl/get.html gcl/info/gcl/get.html
---- ../gcl-Version_2_6_15pre3.orig/gcl/info/gcl/get.html	2023-02-14 20:20:46.000000000 +0700
-+++ gcl/info/gcl/get.html	2023-07-22 20:42:36.147346806 +0700
-@@ -78,7 +78,7 @@
- </p>
- <p><b>setf</b> of <b>get</b> may be used to associate a new <i>object</i>
- with an existing indicator already on the <i>symbol</i>&rsquo;s <i>property list</i>,
--or to create a new assocation if none exists.
-+or to create a new association if none exists.
- </p>
- <p>If there are multiple <i>properties</i>_1 with that <i>property indicator</i>,
- <b>setf</b> of <b>get</b> associates the <i>new-value</i> 
-diff -r -U3 ../gcl-Version_2_6_15pre3.orig/gcl/info/gcl/intersection.html gcl/info/gcl/intersection.html
---- ../gcl-Version_2_6_15pre3.orig/gcl/info/gcl/intersection.html	2023-02-14 20:20:46.000000000 +0700
-+++ gcl/info/gcl/intersection.html	2023-07-22 20:42:36.147346806 +0700
-@@ -99,7 +99,7 @@
- If <tt>:key</tt> is not supplied or <b>nil</b>, the <i>list-1</i> and
- <i>list-2</i> elements are used.
- </p>
--<p>For every pair that <i>satifies the test</i>,
-+<p>For every pair that <i>satisfies the test</i>,
- exactly one of the two elements of the pair will be put in the result.
- No element from either <i>list</i> appears in the result that does not 
- <i>satisfy the test</i> for
-diff -r -U3 ../gcl-Version_2_6_15pre3.orig/gcl/info/gcl-si/Compilation.html gcl/info/gcl-si/Compilation.html
---- ../gcl-Version_2_6_15pre3.orig/gcl/info/gcl-si/Compilation.html	2023-02-14 20:20:46.000000000 +0700
-+++ gcl/info/gcl-si/Compilation.html	2023-07-22 20:42:36.147346806 +0700
-@@ -312,32 +312,32 @@
- address range.  By default, the range is set to begin at the starting
- address of the .text section, and to end at the current end of the
- running core.  These default values can be restored by calling
--GPROF-SET with both argments set to 0.
-+GPROF-SET with both arguments set to 0.
- </p>
- </dd></dl>
- 
- 
- <dl>
- <dt id="index-_002aDEFAULT_002dSYSTEM_002dP_002a">Variable: <strong>*DEFAULT-SYSTEM-P*</strong></dt>
--<dd><p>Pakcage:COMPILER
-+<dd><p>Package:COMPILER
- Specifies the default setting of :SYSTEM-P used by COMPILE.  Defaults to NIL.
- </p></dd></dl>
- 
- <dl>
- <dt id="index-_002aDEFAULT_002dC_002dFILE_002a">Variable: <strong>*DEFAULT-C-FILE*</strong></dt>
--<dd><p>Pakcage:COMPILER
-+<dd><p>Package:COMPILER
- Specifies the default setting of :C-FILE used by COMPILE.  Defaults to NIL.
- </p></dd></dl>
- 
- <dl>
- <dt id="index-_002aDEFAULT_002dH_002dFILE_002a">Variable: <strong>*DEFAULT-H-FILE*</strong></dt>
--<dd><p>Pakcage:COMPILER
-+<dd><p>Package:COMPILER
- Specifies the default setting of :H-FILE used by COMPILE.  Defaults to NIL.
- </p></dd></dl>
- 
- <dl>
- <dt id="index-_002aDEFAULT_002dDATA_002dFILE_002a">Variable: <strong>*DEFAULT-DATA-FILE*</strong></dt>
--<dd><p>Pakcage:COMPILER
-+<dd><p>Package:COMPILER
- Specifies the default setting of :DATA-FILE used by COMPILE.  Defaults to NIL.
- </p></dd></dl>
- 
-diff -r -U3 ../gcl-Version_2_6_15pre3.orig/gcl/info/gcl-si/User-Interface.html gcl/info/gcl-si/User-Interface.html
---- ../gcl-Version_2_6_15pre3.orig/gcl/info/gcl-si/User-Interface.html	2023-02-14 20:20:46.000000000 +0700
-+++ gcl/info/gcl-si/User-Interface.html	2023-07-22 20:42:36.147346806 +0700
-@@ -114,7 +114,7 @@
- <dl>
- <dt id="index-_002aBREAK_002dENABLE_002a">Variable: <strong>*BREAK-ENABLE*</strong></dt>
- <dd><p>Package:LISP
--GCL specific:  When an error occurrs, control enters to the break loop only
-+GCL specific:  When an error occurs, control enters to the break loop only
- if the value of this variable is non-NIL.
- </p>
- 
-diff -r -U3 ../gcl-Version_2_6_15pre3.orig/gcl/info/gcl-si.info gcl/info/gcl-si.info
---- ../gcl-Version_2_6_15pre3.orig/gcl/info/gcl-si.info	2023-02-14 20:20:46.000000000 +0700
-+++ gcl/info/gcl-si.info	2023-07-22 20:42:36.147346806 +0700
-@@ -4228,19 +4228,19 @@
-      restored by calling GPROF-SET with both argments set to 0.
- 
-  -- Variable: *DEFAULT-SYSTEM-P*
--     Pakcage:COMPILER Specifies the default setting of :SYSTEM-P used by
-+     Package:COMPILER Specifies the default setting of :SYSTEM-P used by
-      COMPILE. Defaults to NIL.
- 
-  -- Variable: *DEFAULT-C-FILE*
--     Pakcage:COMPILER Specifies the default setting of :C-FILE used by
-+     Package:COMPILER Specifies the default setting of :C-FILE used by
-      COMPILE. Defaults to NIL.
- 
-  -- Variable: *DEFAULT-H-FILE*
--     Pakcage:COMPILER Specifies the default setting of :H-FILE used by
-+     Package:COMPILER Specifies the default setting of :H-FILE used by
-      COMPILE. Defaults to NIL.
- 
-  -- Variable: *DEFAULT-DATA-FILE*
--     Pakcage:COMPILER Specifies the default setting of :DATA-FILE used
-+     Package:COMPILER Specifies the default setting of :DATA-FILE used
-      by COMPILE. Defaults to NIL.
- 
-  -- Variable: *FEATURES*
-diff -r -U3 ../gcl-Version_2_6_15pre3.orig/gcl/info/si-defs.texi gcl/info/si-defs.texi
---- ../gcl-Version_2_6_15pre3.orig/gcl/info/si-defs.texi	2023-02-14 20:20:46.000000000 +0700
-+++ gcl/info/si-defs.texi	2023-07-22 20:42:36.147346806 +0700
-@@ -507,7 +507,7 @@
- @defun TOP-LEVEL ()
- Package:SI
- 
--GCL specific: Starts the standard top-level listner of GCL.  When the GCL
-+GCL specific: Starts the standard top-level listener of GCL.  When the GCL
- process is invoked, it calls SI:TOP-LEVEL by (FUNCALL 'SI:TOP-LEVEL).
-      To change the top-level of GCL, redefine SI:TOP-LEVEL and save the core
- imange in a file.  When the saved imange is invoked, it will start the
-@@ -926,7 +926,7 @@
- Package: SI
- Match regexp PATTERN in STRING starting in string starting at START
- and ending at END.  Return -1 if match not found, otherwise
--return the start index  of the first matchs.  The variable
-+return the start index  of the first matches.  The variable
- *MATCH-DATA* will be set to a fixnum array of sufficient size to hold
- the matches, to be obtained with match-beginning and match-end.
- If it already contains such an array, then the contents of it will
-diff -r -U3 ../gcl-Version_2_6_15pre3.orig/gcl/readme gcl/readme
---- ../gcl-Version_2_6_15pre3.orig/gcl/readme	2023-02-14 20:20:46.000000000 +0700
-+++ gcl/readme	2023-07-22 20:42:36.147346806 +0700
-@@ -160,7 +160,7 @@
- and provides some other benefits.   It will be in a future release.
- We will need people willing to beta test and isolate any bugs.
- 
--Additonal work planned or desired:
-+Additional work planned or desired:
- 
-   * Clean up distribution and installation.  Make it easier to link in
- C code such as Novak's window stuff.   Faslink is not portable (since
-diff -r -U3 ../gcl-Version_2_6_15pre3.orig/gcl/RELEASE-2.5.1 gcl/RELEASE-2.5.1
---- ../gcl-Version_2_6_15pre3.orig/gcl/RELEASE-2.5.1	2023-02-14 20:20:46.000000000 +0700
-+++ gcl/RELEASE-2.5.1	2023-07-22 20:42:36.142346806 +0700
-@@ -133,6 +133,6 @@
- 	1) Full ANSI compliance
- 	2) Native optimized blas support
- 	3) Integrate MPI support
--	4) GCL as a suported GCC front end.
-+	4) GCL as a supported GCC front end.
- 	5) Performance/memory optimization
- 
-diff -r -U3 ../gcl-Version_2_6_15pre3.orig/gcl/xgcl-2/gcl_sysinit.lsp gcl/xgcl-2/gcl_sysinit.lsp
---- ../gcl-Version_2_6_15pre3.orig/gcl/xgcl-2/gcl_sysinit.lsp	2023-02-14 20:20:46.000000000 +0700
-+++ gcl/xgcl-2/gcl_sysinit.lsp	2023-07-22 20:42:36.148346806 +0700
-@@ -61,7 +61,7 @@
- 
- ;; invoke this to initialize maxima.
- 
--;; make this if you dont want the invocation done automatically.
-+;; make this if you don't want the invocation done automatically.
- ;(defentry user::user-init () "user_init")
- 
- 
-diff -r -U3 ../gcl-Version_2_6_15pre3.orig/gcl/xgcl-2/gcl_Xakcl.example.lsp gcl/xgcl-2/gcl_Xakcl.example.lsp
---- ../gcl-Version_2_6_15pre3.orig/gcl/xgcl-2/gcl_Xakcl.example.lsp	2023-02-14 20:20:46.000000000 +0700
-+++ gcl/xgcl-2/gcl_Xakcl.example.lsp	2023-07-22 20:42:36.148346806 +0700
-@@ -227,7 +227,7 @@
- ;;the drawing goes so fast that you can't see the text invert, so the
- ;;function wiats for for about .2 seconds.  but it would be better to
- ;;keep the text inverted until the button is released this is done by
--;;setting the quit window to have buton release events as well and
-+;;setting the quit window to have button release events as well and
- ;;handling it appropriately
- 
- 			(dotimes (i 1500))
-diff -r -U3 ../gcl-Version_2_6_15pre3.orig/gcl/xgcl-2/gcl_Xinit.lsp gcl/xgcl-2/gcl_Xinit.lsp
---- ../gcl-Version_2_6_15pre3.orig/gcl/xgcl-2/gcl_Xinit.lsp	2023-02-14 20:20:46.000000000 +0700
-+++ gcl/xgcl-2/gcl_Xinit.lsp	2023-07-22 20:42:36.148346806 +0700
-@@ -27,10 +27,10 @@
- ;;large extent.  it would be beneficial to use a X 11 version 4, manual
- ;;in order to look up functions.  the only unique functions of Xakcl are those
- ;;that involove manipulating C structs. all functions involved in creating
--;;a C struct in X starts with a 'make' followed by the structure name.  all
-+;;a C struct in X starts with a 'make' followed by the structure name.  All
- ;;functions involved in getting a field of a C struct strats with the
- ;;name of the C struct followed by the name of the field.  the
--;;parameters it excepts is the variable contaning the structure.  all
-+;;parameters it excepts is the variable containing the structure.  All
- ;;functions to set a field of a C struct starts with 'set' followed by
- ;;the C struct name followed by the field name.  these functions accept
- ;;as parameter, the variable containing the struct and the value to be
-@@ -102,8 +102,8 @@
- 
- 
- ;;;;;;;;;;;;;;;;;;;;;;
--;;this is an example of creating a window.  this function takes care of
--;;positioning, size and other attirbutes of the window.
-+;;This is an example of creating a window.  This function takes care of
-+;;positioning, size and other attributes of the window.
- 
- (defun open-window(&key (pos-x  *pos-x* ) (pos-y  *pos-y*) (win-width *win-width*) 
- 			(win-height *win-height* ) 
-@@ -134,7 +134,7 @@
-     (Xmapwindow *default-display* a-window)
- 
- ;;the X server needs to have the output buffer sent to it before it can
--;;process requests.  this is acomplished with XFlush or functions that
-+;;process requests.  this is accomplished with XFlush or functions that
- ;;read and manipulate the event queue.  remember to do this after
- ;;operations that won't be calling an eventhandling function
- 
-diff -r -U3 ../gcl-Version_2_6_15pre3.orig/gcl/xgcl-2/Xakcl.paper gcl/xgcl-2/Xakcl.paper
---- ../gcl-Version_2_6_15pre3.orig/gcl/xgcl-2/Xakcl.paper	2023-02-14 20:20:46.000000000 +0700
-+++ gcl/xgcl-2/Xakcl.paper	2023-07-22 20:42:36.148346806 +0700
-@@ -23,7 +23,7 @@
- 		B. Creating and Using Windows
- 
- 			1. Creating Windows 
--			2. Controling Window attributes
-+			2. Controlling Window attributes
- 			3. Getting Window Geometry
- 
- 		C. How to Use the Graphics Context
-@@ -64,11 +64,11 @@
- 	Xakcl is the basic Xwindows library for Akcl lisp (the C
- header files for the library correspond to Xlib.h, Xutil.h, and X.h).
- Since Xakcl supports only the basic Xwindows library, Xakcl
--programming is intended to be a low level programming aproach to
-+programming is intended to be a low level programming approach to
- graphics.  As a consequence, any Xwindows program written in C can
- also be written in Xakcl, with little cost in performance.  The
--primitive operations range from controling minute details in color, to
--creating pixmaps, and configuring windows.  Thus a programer using
-+primitive operations range from controlling minute details in color, to
-+creating pixmaps, and configuring windows.  Thus a programmer using
- xakcl can exploit both the extensibility of Xwindows graphics
- capabilities and the ease of lisp programming.
- 
-@@ -80,12 +80,12 @@
- not required.  All X functions in Xakcl begin with the letter 'X' ,
- unless otherwise mentioned.  The Syntax and names of Xakcl functions
- are kept as closely to the X library functions as possible, so that a
--user of the Xwindows' C libary will have no trouble in learning how to
-+user of the Xwindows' C library will have no trouble in learning how to
- use Xakcl.  Of course this also makes translation of X programs in C,
- into Lisp easier.  For an introduction to X programming in C 'Xlib
- Programming Manual for version 11' by Adrian Nye is suggested.  Also,
- any reference manual on the X library would be helpful, since the
--names of Xakcl functions are identical to those of the C libararies'
-+names of Xakcl functions are identical to those of the C libraries'
- functions.
- 
- 
-@@ -107,7 +107,7 @@
- 
- 
- In the X windows system, a display on which graphics is being
--done must be specified.  The display is initilized by calling the X
-+done must be specified.  The display is initialised by calling the X
- function XOpenDisplay.  For example,
- 
- 
-@@ -123,7 +123,7 @@
- 
- 	Creating many displays could be useful for applications with
- many different windows, but there is a performance cost.  It usually
--takes the X serever some time to return a display ID.
-+takes the X server some time to return a display ID.
- 
- 
- 
-@@ -144,7 +144,7 @@
- 
- 
- The default screen is the screen on which graphics will be
--drawn, and the root window, is the window that the X serever creates
-+drawn, and the root window, is the window that the X server creates
- from which all other windows are created.  This is the window that is
- created with the call to xstart, and resides in the background.
- 
-@@ -187,7 +187,7 @@
- the graphics context, as well as the color and the way lines join (if
- they join at a rounded edge or at an angle.)  For now, only the
- creation of the graphics context will be of concern.  XDefaultGC will
--get a default grapics context.  For example:
-+get a default graphics context.  For example:
- 
- 
- (setq *default-GC* (XDefaultGC  *default-display*  *default-screen*))
-@@ -211,7 +211,7 @@
- this case, Black in the GC to draw the string.  Also, XDrawImageString
- could be used.  This routine, X draws the string in the foreground
- pixel and fills the background with the background pixel.  If the
--foregorund and background pixels were switched than the string would
-+foreground and background pixels were switched than the string would
- be white letters on a black background.  This is an example of
- highlighting text.
- 
-@@ -226,7 +226,7 @@
- black pixel created by XBlackPixel is an example of a pixel value.  A
- colormap may or may not have the exact color that is being requested.
- The closest pixel value is given to the user.  In order to get a set
--of specific colors it is necesary to create a unique colormap, however
-+of specific colors it is necessary to create a unique colormap, however
- for most applications, the default colormap will do.  An example of
- creating a default colormap is shown below.
- 
-@@ -296,7 +296,7 @@
- 
- 	Like all Xwindows structures in Xakcl, XSizeHints can be
- created using the function make followed by the type name of the
--struture (note however that unlike Xsizehints, the graphics context is
-+structure (note however that unlike Xsizehints, the graphics context is
- created using the X function XCreateGC.  The reason is that X provides
- a means of creating this structure, while the 'make' facility is
- provided to make C's struct in lisp).  The fields in the structure is
-@@ -319,7 +319,7 @@
- the display, the window being managed, the window name, and the icon
- name.  XSetStandardProperties also expects three other parameters, an
- icon_pixmap, which will represent the window when it is iconized, and
--two arguments coressponding to resource information. Both these
-+two arguments corresponding to resource information. Both these
- featrues are beyond the scope of this paper (see 'Xlib Programming
- Manual for version 11' for more information).  After
- XSetStandardProperties tells the window manager what to do, the window
-@@ -329,7 +329,7 @@
- (Xmapwindow *default-display* a-window)
- 
- 	The above function will map the window.  Only one last
--function needs to be caled for a window to appear on the screen.  This
-+function needs to be called for a window to appear on the screen.  This
- function is XFlush.  This function, or another function that affects
- the event queue (discussed later) must be called whenever there is a
- drawing request for the X server.
-@@ -344,8 +344,8 @@
- to change window attributes.  The attributes could be changed directly
- by calling XChangeWindowAttributes with one of the parameters being a
- C structure, with the new information, and another parameter to
--specifiy which attribute is being changed.  This could be clumbersome
--and inefficeint in lisp, but fortunately X usually provides a
-+specify which attribute is being changed.  This could be clumbersome
-+and inefficient in lisp, but fortunately X usually provides a
- functional way of doing a task.  Some functions for changing the
- window attributes are listed.  Like most functions in X the names are
- self descriptive of the function.
-@@ -362,10 +362,10 @@
- 
- 
- 	As can be seen, the regularity in nameing conventions of X
--routines.  Only the function XSelectInput will be discussd in this
-+routines.  Only the function XSelectInput will be discussed in this
- report (see section E).  The list shown is meant to demonstrate how X
--names functions, and how X can provid for functional equivalents for
--most operations.  (Ofcourse any function that is not provided by X can
-+names functions, and how X can provide for functional equivalents for
-+most operations.  (Of course any function that is not provided by X can
- be written in lisp using primitive operations like
- XChangeWindowAttributes.  The same applies for all objects in X.)
- 
-@@ -386,16 +386,16 @@
- 	*height-return* *border-width-return* *depth-return*) 
- 
- 	The values that are returned by XGetGeometry is pointed to by
--the parameters that are denoted by teh word 'return'.  A root of a
-+the parameters that are denoted by the word 'return'.  A root of a
- window can be extracted, along with it's position, and size. Its
- border width can also be returned, along with it's depth ( a depth
- tells X how many colors can be drawn for a drawble).  This functions
--also demonstrates how poitners are used in Xakcl to return multiple
-+also demonstrates how pointers are used in Xakcl to return multiple
- values.  It is necessary to allocate an area of memory in order to
- write into that memory locations.  The functions int-array and
- char-array will create a C array of integers and characters
- respectively.  A pointer to the array is returned. XGetGemoetry
--expects pointers to integers so it is necessary to alocate integer
-+expects pointers to integers so it is necessary to allocate integer
- arrays of one element.  For example:
- 
- 
-@@ -449,7 +449,7 @@
- 	XSetForeground and XSetBackground sets the foreground and
- background pixel as mentioned in section A.  In order to Allocate a
- pixel besides black and white, a call to XAllocNamedColor must be
--done.  XAllocNamedColor needs two Xcolor structrues, so they must be
-+done.  XAllocNamedColor needs two Xcolor structures, so they must be
- created as well. For example:
- 
- (setq pixel-xcolor (make-Xcolor))	
-@@ -457,7 +457,7 @@
- (XAllocNamedColor display colormap  (get-c-string color) pixel-xcolor exact-rgb)
- 
- 	The above function will return a pixel value in the structure
--pixel-color.  this informaion can be extracted with (Xcolor-pixel
-+pixel-color.  this information can be extracted with (Xcolor-pixel
- pixel-xcolor).  XAllocNamedColo also expects a colormap (the default
- colormap will do), a display, and a String specifying the color (for a
- list of colors see the file rgb.txt in /usr/lib/X11). Thus the
-@@ -466,8 +466,8 @@
- 
- (Xsetforeground display GC (Xcolor-pixel  pixel-xcolor))
- 
--	Similair to Xsetforeground, XSetBackGround will cause all
--drawings needing the background color to use the sepcified pixel
-+	Similar to Xsetforeground, XSetBackGround will cause all
-+drawings needing the background color to use the specified pixel
- value.
- 
- 
-@@ -486,7 +486,7 @@
- cap-style and join-style are constants.  The default styles are
- LineSolid, CapButt, and JoinMitter.  This will make lines appear
- solid.  They will join at a sharp angle and the lines will end in a
--flat edge.  See any X refernce manual for the complete options on the
-+flat edge.  See any X reference manual for the complete options on the
- line styles.
- 
- 
-@@ -514,7 +514,7 @@
- 
- iv. XSetFunction
- 
--	Xwindows draws by applying bit operations on the pixel vlaues
-+	Xwindows draws by applying bit operations on the pixel values
- on the screen along with a mask that it creates called the plan_mask.
- Most often only the pixel already on the screen is manipulated.  This
- default logical operation is GXcopy (which is the default).  However
-@@ -528,9 +528,9 @@
- 	The above function will make X draw ghost images in mono color
- screens using the function Xor.  The pixel value on the screen is
- Xored with the pixel value of the plan_mask (which is derived from the
--foregroudn color).  On color screens the foregorund color must be set
-+foreground color).  On color screens the foreground color must be set
- to (logxor foreground-pixel background-pixel) in order for ghosting
--effects to occurr.  Below is the complete function for ghosting
-+effects to occur.  Below is the complete function for ghosting
- effects.
- 
- (Xsetforeground  *default-display* *default-GC* (logxor foreground-pixel background-pixel ))
-@@ -541,7 +541,7 @@
- 
- 	In the above function, the foreground-pixel and
- background-pixel must be extracted from the graphics context.  In
--order to get information from the graphcis context the function
-+order to get information from the graphics context the function
- XGetGCVlues must be used.  XGetGCVlues is an example of a X function
- that expects a structure, and a value mask.  Below are functions for
- extracted the foreground color from the graphics context.  Other
-@@ -591,7 +591,7 @@
- II. Drawing Rectangles
- 
- 	Drawing Rectangles is similar to drawing lines.  The only
--difference is that the size of the recatangle must be specified.
-+difference is that the size of the rectangle must be specified.
- 
- 
- 	 (XDrawRectangle *default-display* a-window *default-GC* 
-@@ -604,7 +604,7 @@
- 
- II. Drawing Arcs.
- 
--	Arcs can form enclosed areas such as elipses or cirlces or
-+	Arcs can form enclosed areas such as ellipses or circles or
- they could be a curved line.  The function XDrawArc will draw arcs.
- 
- 
-@@ -613,7 +613,7 @@
- 
- 	This function call will draw a circle.  The Arc will be
- bounded by a rectangle.  The points 100 100 correspond to the upper
--left edge of the recatangle. 10 and 10 specifies the width and height
-+left edge of the rectangle. 10 and 10 specifies the width and height
- respectively.  The starting and ending position of the arc must also
- be specified.  These two points are in sixty-fourths of a degrees.
- The first angle is relative to the three-o'clock position and the
-@@ -630,18 +630,18 @@
- 
- 	With the font loaded in the Graphics Context as shown in
- Section C, several functions can be called in order to draw text.
--Only XDrawString will be dicussed here, but the other functions are
-+Only XDrawString will be discussed here, but the other functions are
- similar.
- 
- (XDrawString  *default-display*   a-window  *default-GC*  10 15 (get-c-string "hello") 4)
- (Xflush *default-display*)
- 
- 	The above function will draw the string 'hello' at positions
--10, 15 with the font specified in the default grpahics context.
-+10, 15 with the font specified in the default graphics context.
- XDrawString also expects the length of the string (in this case 4),
- and the display.
- 
--	Often it is necesssary to the size of the string (the
-+	Often it is necessary to the size of the string (the
- rectangle that bounds the string). This can be done with a call to
- XTextExtents.
- 
-@@ -664,9 +664,9 @@
- while the descent tells how far below).  After a call to XTextExtents,
- the ascent will be have the maximum ascent of all the characters in
- the string.  Likewise the descent will have the maximum descent of all
--the characters.  The width will be the sum of the characer width of
-+the characters.  The width will be the sum of the character width of
- all the characters in the string (thus the width of the string in
--number of pixels).  From this information, the user shouldbe able to
-+number of pixels).  From this information, the user should be able to
- position text precisely on the screen.
- 
- 
-@@ -677,15 +677,15 @@
- 
- 	So far only request to the X server to do output on the screen
- have been discussed.  X also has a means of getting information about
--what is inputed by a user as well.  The inputs can range from moving
-+what is inputted by a user as well.  The inputs can range from moving
- or clicking the mouse to keys being pressed on the keyboard.  The
--input also encompases events like a window being uncovered or exposed
-+input also encompasses events like a window being uncovered or exposed
- by another window, or a window being resized.  
- 
- 
- I.  Setting the Input
- 
--	These inputs are called Events.  The Events themseleves only
-+	These inputs are called events.  The events themselves only
- have meaning when they pertain to a window.  In other words, events
- occur in windows.  Thus an attribute of the window must be set.  The
- function XSelectInput must be used.
-@@ -698,7 +698,7 @@
- seen this is specified using mask (for other mask see a Xlib manual or
- the file X.lsp or X.h).
- 
--	After Specifiying the input, all events that occur in that
-+	After specifying the input, all events that occur in that
- will go on the event queue.  The event queue is a queue of what events
- have occurred, the first one being on top.  The client can both get
- information form the queue and manipulate the queue.  
-@@ -762,12 +762,12 @@
- 
- 		F. Conclusion
- 
--	With the commands demonstarted in this tutorial, most
-+	With the commands demonstrated in this tutorial, most
- applications can be managed.  Windows can be created, and graphics
- operations can be performed.  For more complex applications a widget
- set can be created similar to the X Intrinsics library and the Athena
- Widget Set.  For a lisp like implementation of widgets and an advance
--aplications see the GWM application, in the GWM Manual by Colas
-+applications see the GWM application, in the GWM Manual by Colas
- Nahaboo.  GWM is a generic window manager, that is similar to Xakcl.
- It supports objects that are similar to Widgets in most C Xwindows
- libraries.

diff --git a/dev-lisp/gcl/gcl-2.6.15_pre3.ebuild b/dev-lisp/gcl/gcl-2.6.15_pre3.ebuild
index 89f3d4155137..830fff33537b 100644
--- a/dev-lisp/gcl/gcl-2.6.15_pre3.ebuild
+++ b/dev-lisp/gcl/gcl-2.6.15_pre3.ebuild
@@ -6,7 +6,8 @@ inherit elisp-common flag-o-matic
 
 DESCRIPTION="GNU Common Lisp"
 HOMEPAGE="https://www.gnu.org/software/gcl/gcl.html"
-SRC_URI="http://git.savannah.gnu.org/cgit/gcl.git/snapshot/${PN}-Version_2_6_15pre3.tar.gz"
+SRC_URI="http://git.savannah.gnu.org/cgit/gcl.git/snapshot/${PN}-Version_2_6_15pre3.tar.gz
+	https://dev.gentoo.org/~grozin/${PF}-spelling.patch.gz"
 
 LICENSE="LGPL-2+ GPL-2+"
 SLOT="0"
@@ -26,7 +27,7 @@ DEPEND="${RDEPEND}
 	app-text/texi2html
 	>=sys-devel/autoconf-2.52"
 
-PATCHES=( "${FILESDIR}"/${PF}-spelling.patch )
+PATCHES=( "${WORKDIR}"/${PF}-spelling.patch )
 S="${WORKDIR}"/${PN}-Version_2_6_15pre3/${PN}
 
 src_configure() {


^ permalink raw reply related	[flat|nested] 5+ messages in thread

end of thread, other threads:[~2023-07-23  6:36 UTC | newest]

Thread overview: 5+ messages (download: mbox.gz follow: Atom feed
-- links below jump to the message on this page --
2022-04-17 20:12 [gentoo-commits] repo/gentoo:master commit in: dev-lisp/gcl/, dev-lisp/gcl/files/ Ulrich Müller
  -- strict thread matches above, loose matches on Subject: below --
2023-07-23  6:36 Andrey Grozin
2022-04-01  6:26 Ulrich Müller
2021-03-28  9:46 Andrey Grozin
2016-02-17 17:39 Andrey Grozin

This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox