From owner-svn-ports-head@FreeBSD.ORG Sun Oct 5 13:29:47 2014 Return-Path: Delivered-To: svn-ports-head@freebsd.org Received: from mx1.freebsd.org (mx1.freebsd.org [IPv6:2001:1900:2254:206a::19:1]) (using TLSv1.2 with cipher AECDH-AES256-SHA (256/256 bits)) (No client certificate requested) by hub.freebsd.org (Postfix) with ESMTPS id DFB683DF; Sun, 5 Oct 2014 13:29:47 +0000 (UTC) Received: from svn.freebsd.org (svn.freebsd.org [IPv6:2001:1900:2254:2068::e6a:0]) (using TLSv1.2 with cipher ECDHE-RSA-AES256-GCM-SHA384 (256/256 bits)) (Client did not present a certificate) by mx1.freebsd.org (Postfix) with ESMTPS id C99E37DA; Sun, 5 Oct 2014 13:29:47 +0000 (UTC) Received: from svn.freebsd.org ([127.0.1.70]) by svn.freebsd.org (8.14.9/8.14.9) with ESMTP id s95DTlMV091480; Sun, 5 Oct 2014 13:29:47 GMT (envelope-from madpilot@FreeBSD.org) Received: (from madpilot@localhost) by svn.freebsd.org (8.14.9/8.14.9/Submit) id s95DTfIc091429; Sun, 5 Oct 2014 13:29:41 GMT (envelope-from madpilot@FreeBSD.org) Message-Id: <201410051329.s95DTfIc091429@svn.freebsd.org> X-Authentication-Warning: svn.freebsd.org: madpilot set sender to madpilot@FreeBSD.org using -f From: Guido Falsi Date: Sun, 5 Oct 2014 13:29:41 +0000 (UTC) To: ports-committers@freebsd.org, svn-ports-all@freebsd.org, svn-ports-head@freebsd.org Subject: svn commit: r370066 - in head/lang: . slib slib-guile slib-guile/files slib-guile2 slib-guile2/files slib/files X-SVN-Group: ports-head MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit X-BeenThere: svn-ports-head@freebsd.org X-Mailman-Version: 2.1.18-1 Precedence: list List-Id: SVN commit messages for the ports tree for head List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , X-List-Received-Date: Sun, 05 Oct 2014 13:29:48 -0000 Author: madpilot Date: Sun Oct 5 13:29:40 2014 New Revision: 370066 URL: https://svnweb.freebsd.org/changeset/ports/370066 QAT: https://qat.redports.org/buildarchive/r370066/ Log: - Update slib and slib-guile to 3b4 - Fix build for lang/slib with new texinfo [1] - Convert slib-guile @exec/@unexec directives to post install/deinstall scripts - Add new port slib-guile2 based on slib-guile - Remove dirrms MFH: 2014Q4 Added: head/lang/slib-guile/files/ head/lang/slib-guile/files/pkg-deinstall.in (contents, props changed) head/lang/slib-guile/files/pkg-install.in (contents, props changed) head/lang/slib-guile2/ - copied from r370008, head/lang/slib-guile/ head/lang/slib-guile2/files/ head/lang/slib-guile2/files/pkg-deinstall.in (contents, props changed) head/lang/slib-guile2/files/pkg-install.in (contents, props changed) head/lang/slib/files/ head/lang/slib/files/patch-color.txi (contents, props changed) head/lang/slib/files/patch-colornam.txi (contents, props changed) head/lang/slib/files/patch-dbutil.txi (contents, props changed) head/lang/slib/files/patch-determ.txi (contents, props changed) head/lang/slib/files/patch-dirs.txi (contents, props changed) head/lang/slib/files/patch-glob.txi (contents, props changed) head/lang/slib/files/patch-grapheps.txi (contents, props changed) head/lang/slib/files/patch-phil-spc.txi (contents, props changed) head/lang/slib/files/patch-pnm.txi (contents, props changed) head/lang/slib/files/patch-random.txi (contents, props changed) head/lang/slib/files/patch-schmooz.texi (contents, props changed) head/lang/slib/files/patch-slib.texi (contents, props changed) head/lang/slib/files/patch-solid.txi (contents, props changed) head/lang/slib/files/patch-xml-parse.txi (contents, props changed) Deleted: head/lang/slib-guile/pkg-plist head/lang/slib-guile2/pkg-plist Modified: head/lang/Makefile head/lang/slib-guile/Makefile head/lang/slib-guile2/Makefile head/lang/slib/Makefile head/lang/slib/distinfo head/lang/slib/pkg-plist Modified: head/lang/Makefile ============================================================================== --- head/lang/Makefile Sun Oct 5 13:29:15 2014 (r370065) +++ head/lang/Makefile Sun Oct 5 13:29:40 2014 (r370066) @@ -289,6 +289,7 @@ SUBDIR += sketchy SUBDIR += slib SUBDIR += slib-guile + SUBDIR += slib-guile2 SUBDIR += slisp SUBDIR += smalltalk SUBDIR += smlnj Modified: head/lang/slib-guile/Makefile ============================================================================== --- head/lang/slib-guile/Makefile Sun Oct 5 13:29:15 2014 (r370065) +++ head/lang/slib-guile/Makefile Sun Oct 5 13:29:40 2014 (r370066) @@ -3,8 +3,7 @@ # $MCom: ports/lang/slib-guile/Makefile,v 1.3 2006/10/13 02:32:48 marcus Exp $ PORTNAME= slib -PORTVERSION= 3b3 # Keep this in sync with lang/slib -PORTREVISION= 1 +PORTVERSION= 3b4 # Keep this in sync with lang/slib CATEGORIES= lang scheme MASTER_SITES= # empty PKGNAMESUFFIX= -guile @@ -17,6 +16,7 @@ BUILD_DEPENDS= ${LOCALBASE}/share/slib/r guile:${PORTSDIR}/lang/guile RUN_DEPENDS:= ${BUILD_DEPENDS} +SUB_FILES+= pkg-install pkg-deinstall NO_BUILD= yes NO_INSTALL= yes Added: head/lang/slib-guile/files/pkg-deinstall.in ============================================================================== --- /dev/null 00:00:00 1970 (empty, because file is newly added) +++ head/lang/slib-guile/files/pkg-deinstall.in Sun Oct 5 13:29:40 2014 (r370066) @@ -0,0 +1,8 @@ +#!/bin/sh + +case "$2" in +"POST-DEINSTALL") + rm -f %%LOCALBASE%%/share/guile/1.8/slib + rm -f %%LOCALBASE%%/share/guile/1.8/slibcat + ;; +esac Added: head/lang/slib-guile/files/pkg-install.in ============================================================================== --- /dev/null 00:00:00 1970 (empty, because file is newly added) +++ head/lang/slib-guile/files/pkg-install.in Sun Oct 5 13:29:40 2014 (r370066) @@ -0,0 +1,8 @@ +#!/bin/sh + +case "$2" in +"POST-INSTALL") + ln -shf %%LOCALBASE%%/share/slib %%LOCALBASE%%/share/guile/1.8/slib + env GUILE_IMPLEMENTATION_PATH=%%LOCALBASE%%/share/guile/1.8 %%LOCALBASE%%/bin/guile -q -l %%LOCALBASE%%/share/slib/guile.init -c "(use-modules (ice-9 slib))(require 'new-catalog)" + ;; +esac Modified: head/lang/slib-guile2/Makefile ============================================================================== --- head/lang/slib-guile/Makefile Sat Oct 4 22:38:23 2014 (r370008) +++ head/lang/slib-guile2/Makefile Sun Oct 5 13:29:40 2014 (r370066) @@ -3,20 +3,20 @@ # $MCom: ports/lang/slib-guile/Makefile,v 1.3 2006/10/13 02:32:48 marcus Exp $ PORTNAME= slib -PORTVERSION= 3b3 # Keep this in sync with lang/slib -PORTREVISION= 1 +PORTVERSION= 3b4 # Keep this in sync with lang/slib CATEGORIES= lang scheme MASTER_SITES= # empty -PKGNAMESUFFIX= -guile +PKGNAMESUFFIX= -guile2 DISTFILES= # empty MAINTAINER= ports@FreeBSD.org COMMENT= SLIB installation for Guile BUILD_DEPENDS= ${LOCALBASE}/share/slib/require.scm:${PORTSDIR}/lang/slib \ - guile:${PORTSDIR}/lang/guile + guile:${PORTSDIR}/lang/guile2 RUN_DEPENDS:= ${BUILD_DEPENDS} +SUB_FILES+= pkg-install pkg-deinstall NO_BUILD= yes NO_INSTALL= yes Added: head/lang/slib-guile2/files/pkg-deinstall.in ============================================================================== --- /dev/null 00:00:00 1970 (empty, because file is newly added) +++ head/lang/slib-guile2/files/pkg-deinstall.in Sun Oct 5 13:29:40 2014 (r370066) @@ -0,0 +1,8 @@ +#!/bin/sh + +case "$2" in +"POST-DEINSTALL") + rm -f %%LOCALBASE%%/share/guile/2.0/slib + rm -f %%LOCALBASE%%/share/guile/2.0/slibcat + ;; +esac Added: head/lang/slib-guile2/files/pkg-install.in ============================================================================== --- /dev/null 00:00:00 1970 (empty, because file is newly added) +++ head/lang/slib-guile2/files/pkg-install.in Sun Oct 5 13:29:40 2014 (r370066) @@ -0,0 +1,8 @@ +#!/bin/sh + +case "$2" in +"POST-INSTALL") + ln -shf %%LOCALBASE%%/share/slib %%LOCALBASE%%/share/guile/2.0/slib + env GUILE_IMPLEMENTATION_PATH=%%LOCALBASE%%/share/guile/2.0 %%LOCALBASE%%/bin/guile -q -l %%LOCALBASE%%/share/slib/guile-2.init -c "(use-modules (ice-9 slib))(require 'new-catalog)" + ;; +esac Modified: head/lang/slib/Makefile ============================================================================== --- head/lang/slib/Makefile Sun Oct 5 13:29:15 2014 (r370065) +++ head/lang/slib/Makefile Sun Oct 5 13:29:40 2014 (r370066) @@ -2,7 +2,7 @@ # $FreeBSD$ PORTNAME= slib -PORTVERSION= 3b3 +PORTVERSION= 3b4 CATEGORIES= lang scheme MASTER_SITES= http://groups.csail.mit.edu/mac/ftpdir/scm/ \ http://groups.csail.mit.edu/mac/ftpdir/scm/OLD/ @@ -19,6 +19,7 @@ OPTIONS_DEFINE= DOCS post-patch: @${REINPLACE_CMD} -e 's|/usr/lib/slib|${PREFIX}/share/slib|' ${WRKSRC}/guile.init + @${TOUCH} ${WRKSRC}/*.txi do-install: @${MKDIR} ${STAGEDIR}${DATADIR} Modified: head/lang/slib/distinfo ============================================================================== --- head/lang/slib/distinfo Sun Oct 5 13:29:15 2014 (r370065) +++ head/lang/slib/distinfo Sun Oct 5 13:29:40 2014 (r370066) @@ -1,2 +1,2 @@ -SHA256 (slib-3b3.tar.gz) = 19219ae235c91b31256d6c9a489355f701cee7aa5947a1a01ee5b5c5ee8b3f04 -SIZE (slib-3b3.tar.gz) = 967740 +SHA256 (slib-3b4.tar.gz) = 9f7c50cb07ba996917aa1b15eca6392d0215ccbdfdf84f68486a23adc7f1d7a6 +SIZE (slib-3b4.tar.gz) = 974395 Added: head/lang/slib/files/patch-color.txi ============================================================================== --- /dev/null 00:00:00 1970 (empty, because file is newly added) +++ head/lang/slib/files/patch-color.txi Sun Oct 5 13:29:40 2014 (r370066) @@ -0,0 +1,84 @@ +--- color.txi.orig 2013-05-12 04:47:55 UTC ++++ color.txi +@@ -107,8 +107,9 @@ + @defun color:l*a*b* L* a* b* white-point + + Returns the L*a*b* color composed of @var{L*}, @var{a*}, @var{b*} with @var{white-point}. ++@end defun + +-@defunx color:l*a*b* L* a* b* ++@defun color:l*a*b* L* a* b* + Returns the L*a*b* color composed of @var{L*}, @var{a*}, @var{b*}. If the coordinates + do not encode a valid L*a*b* color, then an error is signaled. + @end defun +@@ -117,8 +118,9 @@ + @defun color->l*a*b* color white-point + + Returns the list of 3 numbers encoding @var{color} in L*a*b* with @var{white-point}. ++@end defun + +-@defunx color->l*a*b* color ++@defun color->l*a*b* color + Returns the list of 3 numbers encoding @var{color} in L*a*b*. + @end defun + +@@ -138,8 +140,9 @@ + @defun color:l*u*v* L* u* v* white-point + + Returns the L*u*v* color composed of @var{L*}, @var{u*}, @var{v*} with @var{white-point}. ++@end defun + +-@defunx color:l*u*v* L* u* v* ++@defun color:l*u*v* L* u* v* + Returns the L*u*v* color composed of @var{L*}, @var{u*}, @var{v*}. If the coordinates + do not encode a valid L*u*v* color, then an error is signaled. + @end defun +@@ -148,8 +151,9 @@ + @defun color->l*u*v* color white-point + + Returns the list of 3 numbers encoding @var{color} in L*u*v* with @var{white-point}. ++@end defun + +-@defunx color->l*u*v* color ++@defun color->l*u*v* color + Returns the list of 3 numbers encoding @var{color} in L*u*v*. + @end defun + +@@ -206,8 +210,9 @@ + @defun color:l*c*h L* C* h white-point + + Returns the L*C*h color composed of @var{L*}, @var{C*}, @var{h} with @var{white-point}. ++@end defun + +-@defunx color:l*c*h L* C* h ++@defun color:l*c*h L* C* h + Returns the L*C*h color composed of @var{L*}, @var{C*}, @var{h}. If the coordinates + do not encode a valid L*C*h color, then an error is signaled. + @end defun +@@ -216,8 +221,9 @@ + @defun color->l*c*h color white-point + + Returns the list of 3 numbers encoding @var{color} in L*C*h with @var{white-point}. ++@end defun + +-@defunx color->l*c*h color ++@defun color->l*c*h color + Returns the list of 3 numbers encoding @var{color} in L*C*h. + @end defun + +@@ -326,11 +332,13 @@ + @defun color:e-srgb 10 r g b + + Returns the e-sRGB10 color composed of integers @var{r}, @var{g}, @var{b}. ++@end defun + +-@defunx color:e-srgb 12 r g b ++@defun color:e-srgb 12 r g b + Returns the e-sRGB12 color composed of integers @var{r}, @var{g}, @var{b}. ++@end defun + +-@defunx color:e-srgb 16 r g b ++@defun color:e-srgb 16 r g b + Returns the e-sRGB16 color composed of integers @var{r}, @var{g}, @var{b}. + If the coordinates do not encode a valid e-sRGB color, then an error + is signaled. Added: head/lang/slib/files/patch-colornam.txi ============================================================================== --- /dev/null 00:00:00 1970 (empty, because file is newly added) +++ head/lang/slib/files/patch-colornam.txi Sun Oct 5 13:29:40 2014 (r370066) @@ -0,0 +1,14 @@ +--- colornam.txi.orig 2013-05-12 04:47:55 UTC ++++ colornam.txi +@@ -56,9 +56,10 @@ + @var{name} a table therein. The database will be opened as + @var{base-table-type}. @code{color-dictionary} returns the read-only table @var{name} in database + @var{name} if it exists; #f otherwise. ++@end defun + + +-@defunx color-dictionary name rdb ++@defun color-dictionary name rdb + + @var{rdb} must be an open relational database or a string naming a relational + database file; and the symbol @var{name} a table therein. @code{color-dictionary} returns the Added: head/lang/slib/files/patch-dbutil.txi ============================================================================== --- /dev/null 00:00:00 1970 (empty, because file is newly added) +++ head/lang/slib/files/patch-dbutil.txi Sun Oct 5 13:29:40 2014 (r370066) @@ -0,0 +1,14 @@ +--- dbutil.txi.orig 2013-05-12 04:47:55 UTC ++++ dbutil.txi +@@ -85,9 +85,10 @@ + + Returns an open relational database associated with @var{rdb}. The + database will be opened with base-table type @var{base-table-type}). ++@end defun + + +-@defunx open-database rdb ++@defun open-database rdb + Returns an open relational database associated with @var{rdb}. + @code{open-database} will attempt to deduce the correct base-table-type. + @end defun Added: head/lang/slib/files/patch-determ.txi ============================================================================== --- /dev/null 00:00:00 1970 (empty, because file is newly added) +++ head/lang/slib/files/patch-determ.txi Sun Oct 5 13:29:40 2014 (r370066) @@ -0,0 +1,18 @@ +--- determ.txi.orig 2013-05-12 04:47:55 UTC ++++ determ.txi +@@ -53,11 +53,13 @@ + @defun matrix:product m1 m2 + + Returns the product of matrices @var{m1} and @var{m2}. ++@end defun + +-@defunx matrix:product m1 z ++@defun matrix:product m1 z + Returns matrix @var{m1} times scalar @var{z}. ++@end defun + +-@defunx matrix:product z m1 ++@defun matrix:product z m1 + Returns matrix @var{m1} times scalar @var{z}. + @end defun + Added: head/lang/slib/files/patch-dirs.txi ============================================================================== --- /dev/null 00:00:00 1970 (empty, because file is newly added) +++ head/lang/slib/files/patch-dirs.txi Sun Oct 5 13:29:40 2014 (r370066) @@ -0,0 +1,21 @@ +--- dirs.txi.orig 2013-05-12 04:47:55 UTC ++++ dirs.txi +@@ -26,14 +26,15 @@ + each file in @var{directory}. The dynamic order in which @var{proc} is + applied to the filenames is unspecified. The value returned by + @samp{directory-for-each} is unspecified. ++@end defun + + +-@defunx directory-for-each proc directory pred ++@defun directory-for-each proc directory pred + Applies @var{proc} only to those filenames for which the procedure + @var{pred} returns a non-false value. ++@end defun + +- +-@defunx directory-for-each proc directory match ++@defun directory-for-each proc directory match + Applies @var{proc} only to those filenames for which + @code{(filename:match?? @var{match})} would return a non-false value + (@pxref{Filenames, , , slib, SLIB}). Added: head/lang/slib/files/patch-glob.txi ============================================================================== --- /dev/null 00:00:00 1970 (empty, because file is newly added) +++ head/lang/slib/files/patch-glob.txi Sun Oct 5 13:29:40 2014 (r370066) @@ -0,0 +1,24 @@ +--- glob.txi.orig 2013-05-12 04:47:55 UTC ++++ glob.txi +@@ -83,18 +83,16 @@ + @end example + + +-@defun call-with-tmpnam proc k +- +- +-@defunx call-with-tmpnam proc ++@defun call-with-tmpnam proc + Calls @var{proc} with @var{k} arguments, strings returned by successive calls to + @code{tmpnam}. + If @var{proc} returns, then any files named by the arguments to @var{proc} are + deleted automatically and the value(s) yielded by the @var{proc} is(are) + returned. @var{k} may be ommited, in which case it defaults to @code{1}. ++@end defun + + +-@defunx call-with-tmpnam proc suffix1 @dots{} ++@defun call-with-tmpnam proc suffix1 @dots{} + Calls @var{proc} with strings returned by successive calls to @code{tmpnam}, + each with the corresponding @var{suffix} string appended. + If @var{proc} returns, then any files named by the arguments to @var{proc} are Added: head/lang/slib/files/patch-grapheps.txi ============================================================================== --- /dev/null 00:00:00 1970 (empty, because file is newly added) +++ head/lang/slib/files/patch-grapheps.txi Sun Oct 5 13:29:40 2014 (r370066) @@ -0,0 +1,38 @@ +--- grapheps.txi.orig 2013-05-12 04:47:55 UTC ++++ grapheps.txi +@@ -251,11 +251,13 @@ + @defun set-linedash j k + + Lines are drawn @var{j}-on @var{k}-off. ++@end defun + +-@defunx set-linedash j ++@defun set-linedash j + Lines are drawn @var{j}-on @var{j}-off. ++@end defun + +-@defunx set-linedash ++@defun set-linedash + Turns off dashing. + @end defun + +@@ -432,15 +434,17 @@ + encapsulated PostScript graph of the function of one argument @var{func} + over the range @var{x1} to @var{x2}. If the optional integer argument @var{npts} is + supplied, it specifies the number of points to evaluate @var{func} at. ++@end defun + + +-@defunx plot x1 x2 npts func1 func2 @dots{} ++@defun plot x1 x2 npts func1 func2 @dots{} + Creates and displays an encapsulated PostScript graph of the + one-argument functions @var{func1}, @var{func2}, ... over the range + @var{x1} to @var{x2} at @var{npts} points. ++@end defun + + +-@defunx plot coords x-label y-label ++@defun plot coords x-label y-label + @var{coords} is a list or vector of coordinates, lists of x and y + coordinates. @var{x-label} and @var{y-label} are strings with which + to label the x and y axes. Added: head/lang/slib/files/patch-phil-spc.txi ============================================================================== --- /dev/null 00:00:00 1970 (empty, because file is newly added) +++ head/lang/slib/files/patch-phil-spc.txi Sun Oct 5 13:29:40 2014 (r370066) @@ -0,0 +1,25 @@ +--- phil-spc.txi.orig 2013-05-12 04:47:55 UTC ++++ phil-spc.txi +@@ -39,9 +39,10 @@ + Returns a list of @var{rank} integer coordinates corresponding to exact + non-negative integer @var{scalar}. The lists returned by @code{integer->hilbert-coordinates} for @var{scalar} arguments + 0 and 1 will differ in the first element. ++@end defun + + +-@defunx integer->hilbert-coordinates scalar rank k ++@defun integer->hilbert-coordinates scalar rank k + + @var{scalar} must be a nonnegative integer of no more than + @code{@var{rank}*@var{k}} bits. +@@ -80,8 +81,9 @@ + @defun integer->gray-code k + Converts @var{k} to a Gray code of the same @code{integer-length} as + @var{k}. ++@end defun + +-@defunx gray-code->integer k ++@defun gray-code->integer k + Converts the Gray code @var{k} to an integer of the same + @code{integer-length} as @var{k}. + Added: head/lang/slib/files/patch-pnm.txi ============================================================================== --- /dev/null 00:00:00 1970 (empty, because file is newly added) +++ head/lang/slib/files/patch-pnm.txi Sun Oct 5 13:29:40 2014 (r370066) @@ -0,0 +1,14 @@ +--- pnm.txi.orig 2013-05-12 04:47:55 UTC ++++ pnm.txi +@@ -48,9 +48,10 @@ + @cindex portable bitmap graphics + @var{array}. @var{array} must be the correct size and type for + @var{path}. @var{array} is returned. ++@end defun + + +-@defunx pnm:image-file->array path ++@defun pnm:image-file->array path + + @code{pnm:image-file->array} creates and returns an array with the + @dfn{portable bitmap graphics} file named by @var{path} read into it. Added: head/lang/slib/files/patch-random.txi ============================================================================== --- /dev/null 00:00:00 1970 (empty, because file is newly added) +++ head/lang/slib/files/patch-random.txi Sun Oct 5 13:29:40 2014 (r370066) @@ -0,0 +1,14 @@ +--- random.txi.orig 2013-05-12 04:47:55 UTC ++++ random.txi +@@ -32,9 +32,10 @@ + @defun copy-random-state state + + Returns a new copy of argument @var{state}. ++@end defun + + +-@defunx copy-random-state ++@defun copy-random-state + Returns a new copy of @code{*random-state*}. + @end defun + Added: head/lang/slib/files/patch-schmooz.texi ============================================================================== --- /dev/null 00:00:00 1970 (empty, because file is newly added) +++ head/lang/slib/files/patch-schmooz.texi Sun Oct 5 13:29:40 2014 (r370066) @@ -0,0 +1,13 @@ +--- schmooz.texi.orig 2001-10-15 04:34:18 UTC ++++ schmooz.texi +@@ -17,8 +17,9 @@ + top-level comments containing schmooz commands from @var{filename}.scm + and writes the converted Texinfo source to a file named + @var{filename}.txi. ++@end deffn + +-@deffnx Procedure schmooz filename@r{.texi} @dots{} ++@deffn Procedure schmooz filename@r{.texi} @dots{} + @deffnx Procedure schmooz filename@r{.tex} @dots{} + @deffnx Procedure schmooz filename@r{.txi} @dots{} + @var{Filename} should be a string naming an existing file containing Added: head/lang/slib/files/patch-slib.texi ============================================================================== --- /dev/null 00:00:00 1970 (empty, because file is newly added) +++ head/lang/slib/files/patch-slib.texi Sun Oct 5 13:29:40 2014 (r370066) @@ -0,0 +1,484 @@ +--- slib.texi.orig 2012-10-23 21:17:29 UTC ++++ slib.texi +@@ -812,11 +812,13 @@ + Displays the information of @code{(slib:report-version)} followed by + almost all the information neccessary for submitting a problem report. + An unspecified value is returned. ++@end defun + +-@defunx slib:report #t ++@defun slib:report #t + provides a more verbose listing. ++@end defun + +-@defunx slib:report filename ++@defun slib:report filename + Writes the verbose report to file @file{filename}. + + @example +@@ -940,8 +942,9 @@ + current position of the character in @var{port} which will next be + read or written. If the implementation does not support + file-position, then @code{#f} is returned. ++@end defun + +-@defunx file-position port k ++@defun file-position port k + @var{port} must be open to a file. @code{file-position} sets the + current position in @var{port} which will next be read or written. If + successful, @code{#t} is returned; otherwise @code{file-position} +@@ -3400,7 +3403,7 @@ + A character that specifies the conversion to be applied. + @end itemize + +-@subsubsection Exact Conversions ++Exact Conversions + + @table @asis + @item @samp{b}, @samp{B} +@@ -3426,7 +3429,7 @@ + digits @samp{0123456789ABCDEF}. + @end table + +-@subsubsection Inexact Conversions ++Inexact Conversions + + @table @asis + @item @samp{f} +@@ -3451,7 +3454,7 @@ + + @end table + +-@subsubsection Other Conversions ++Other Conversions + @table @asis + @item @samp{c} + Print a single character. The @samp{-} flag is the only one which can +@@ -4592,11 +4595,13 @@ + + @defun tzset + Returns the default time-zone. ++@end defun + +-@defunx tzset tz ++@defun tzset tz + Sets (and returns) the default time-zone to @var{tz}. ++@end defun + +-@defunx tzset TZ-string ++@defun tzset TZ-string + Sets (and returns) the default time-zone to that specified by + @var{TZ-string}. + +@@ -4670,11 +4675,13 @@ + + @defun gmtime caltime + Converts the calendar time @var{caltime} to UTC and returns it. ++@end defun + +-@defunx localtime caltime tz ++@defun localtime caltime tz + Returns @var{caltime} converted to UTC relative to timezone @var{tz}. ++@end defun + +-@defunx localtime caltime ++@defun localtime caltime + converts the calendar time @var{caltime} to a vector of integers + expressed relative to the user's time zone. @code{localtime} sets the + variable @var{*timezone*} with the difference between Coordinated +@@ -4686,12 +4693,14 @@ + @defun gmktime univtime + Converts a vector of integers in GMT Coordinated Universal Time (UTC) + format to a calendar time. ++@end defun + +-@defunx mktime univtime ++@defun mktime univtime + Converts a vector of integers in local Coordinated Universal Time (UTC) + format to a calendar time. ++@end defun + +-@defunx mktime univtime tz ++@defun mktime univtime tz + Converts a vector of integers in Coordinated Universal Time (UTC) format + (relative to time-zone @var{tz}) + to calendar time. +@@ -5096,8 +5105,9 @@ + corresponding to each bit of the non-negative integer @var{k}. #t is + coded for each 1; #f for 0. The @var{len} argument defaults to + @code{(integer-length @var{k})}. ++@end defun + +-@defunx list->integer list ++@defun list->integer list + @code{list->integer} returns an integer formed from the booleans in the + list @var{list}, which must be a list of booleans. A 1 bit is coded for + each #t; a 0 bit for #f. +@@ -5519,8 +5529,9 @@ + (cksum (in-vicinity (library-vicinity) "ratize.scm")) + @result{} 157103930 + @end example ++@end defun + +-@defunx cksum port ++@defun cksum port + Computes the checksum of the bytes read from @var{port} until the + end-of-file. + +@@ -5539,8 +5550,9 @@ + @defun crc16 file + + Computes the USB data-packet (16-bit) CRC of @var{file}. ++@end defun + +-@defunx crc16 port ++@defun crc16 port + Computes the USB data-packet (16-bit) CRC of the bytes read from + @var{port} until the end-of-file. + +@@ -5552,8 +5564,9 @@ + @defun crc5 file + + Computes the USB token (5-bit) CRC of @var{file}. ++@end defun + +-@defunx crc5 port ++@defun crc5 port + Computes the USB token (5-bit) CRC of the bytes read from + @var{port} until the end-of-file. + +@@ -5747,8 +5760,9 @@ + + @defun color? obj + Returns #t if @var{obj} is a color. ++@end defun + +-@defunx color? obj typ ++@defun color? obj typ + Returns #t if @var{obj} is a color of color-space @var{typ}. The symbol + @var{typ} must be one of: + +@@ -5961,14 +5975,16 @@ + Loads the Spectral Tristimulus Values + @cite{CIE 1964 Supplementary Standard Colorimetric Observer}, + defining @var{cie:x-bar}, @var{cie:y-bar}, and @var{cie:z-bar}. ++@end deftp + +-@deftpx {Feature} cie1931 ++@deftp {Feature} cie1931 + @ftindex cie1931 + Loads the Spectral Tristimulus Values + @cite{CIE 1931 Supplementary Standard Colorimetric Observer}, + defining @var{cie:x-bar}, @var{cie:y-bar}, and @var{cie:z-bar}. ++@end deftp + +-@deftpx {Feature} ciexyz ++@deftp {Feature} ciexyz + @ftindex ciexyz + Requires Spectral Tristimulus Values, defaulting to cie1931, + defining @var{cie:x-bar}, @var{cie:y-bar}, and @var{cie:z-bar}. +@@ -6037,8 +6053,9 @@ + computes the CIEXYZ(1931) values for the spectrum returned by @var{proc} + when called with arguments from 380e-9 to 780e-9, the wavelength in + meters. ++@end defun + +-@defunx spectrum->XYZ spectrum x1 x2 ++@defun spectrum->XYZ spectrum x1 x2 + @var{x1} and @var{x2} must be positive real numbers specifying the + wavelengths (in meters) corresponding to the zeroth and last elements of + vector or list @var{spectrum}. @code{spectrum->XYZ} returns the +@@ -6160,8 +6177,9 @@ + scales each chromaticity so it sums to 1 or less; and divides the + @var{Y} values by the maximum @var{Y} in the dataset, so all lie between + 0 and 1. ++@end defun + +-@defunx xyY:normalize-colors colors n ++@defun xyY:normalize-colors colors n + If @var{n} is positive real, then @code{xyY:normalize-colors} divides + the @var{Y} values by @var{n} times the maximum @var{Y} in the dataset. + +@@ -6206,8 +6224,9 @@ + + @defun L*a*b*:DE* lab1 lab2 + Returns the Euclidean distance between @var{lab1} and @var{lab2}. ++@end defun + +-@defunx CIE:DE* color1 color2 white-point ++@defun CIE:DE* color1 color2 white-point + @defunx CIE:DE* color1 color2 + Returns the Euclidean distance in L*a*b* space between @var{color1} and + @var{color2}. +@@ -6725,8 +6744,9 @@ + @var{sub-op2}, respectively. The argument @var{reduction} is a + procedure accepting 2 arguments which will be lists whose @code{car}s + are @var{sub-op1} and @var{sub-op2}. ++@end defun + +-@defunx cring:define-rule op sub-op1 'identity reduction ++@defun cring:define-rule op sub-op1 'identity reduction + Defines a rule for the case when the operation represented by symbol + @var{op} is applied to a list whose @code{car} is @var{sub-op1}, and + some other argument. @var{Reduction} will be called with the list whose +@@ -7211,8 +7231,9 @@ + returns the key-list identifying the lowest record higher than + @var{key1} @var{key2} @dots{} which is stored in the relational-table; + or false if no higher record is present. ++@end defop + +-@defopx {Operation} {relational-table} isam-next column-name ++@defop {Operation} {relational-table} isam-next column-name + The symbol @var{column-name} names a key field. In the list returned + by @code{isam-next}, that field, or a field to its left, will be + changed. This allows one to skip over less significant key fields. +@@ -7223,8 +7244,9 @@ + returns the key-list identifying the highest record less than + @var{key1} @var{key2} @dots{} which is stored in the relational-table; + or false if no lower record is present. ++@end defop + +-@defopx {Operation} {relational-table} isam-prev column-name ++@defop {Operation} {relational-table} isam-prev column-name + The symbol @var{column-name} names a key field. In the list returned + by @code{isam-next}, that field, or a field to its left, will be + changed. This allows one to skip over less significant key fields. +@@ -7264,8 +7286,9 @@ + names, or type names respectively for this table. These 4 methods are + different from the others in that the list is returned, rather than a + procedure to obtain the list. ++@end defop + +-@defopx {Operation} {relational-table} primary-limit ++@defop {Operation} {relational-table} primary-limit + Returns the number of primary keys fields in the relations in this + table. + @end defop +@@ -7398,16 +7421,19 @@ + supplied, @code{open-command-database} will attempt to deduce the correct + base-table-type. If the database can not be opened or if it lacks the + @code{*commands*} table, @code{#f} is returned. ++@end defun + +-@defunx open-command-database! filename ++@defun open-command-database! filename + @defunx open-command-database! filename base-table-type + Returns @emph{mutable} open enhanced relational database @dots{} ++@end defun + +-@defunx open-command-database database ++@defun open-command-database database + Returns @var{database} if it is an immutable relational database; #f + otherwise. ++@end defun + +-@defunx open-command-database! database ++@defun open-command-database! database + Returns @var{database} if it is a mutable relational database; #f + otherwise. + @end defun +@@ -7928,32 +7954,31 @@ + + Prints the names of all the tables in @var{database} and sets browse's + default to @var{database}. +- +-@deffnx {Procedure} browse ++@end deffn ++@deffn {Procedure} browse + + Prints the names of all the tables in the default database. +- +-@deffnx {Procedure} browse table-name ++@end deffn ++@deffn {Procedure} browse table-name + + For each record of the table named by the symbol @var{table-name}, + prints a line composed of all the field values. +- +-@deffnx {Procedure} browse pathname ++@end deffn ++@deffn {Procedure} browse pathname + + Opens the database named by the string @var{pathname}, prints the names + of all its tables, and sets browse's default to the database. +- +-@deffnx {Procedure} browse database table-name ++@end deffn ++@deffn {Procedure} browse database table-name + + Sets browse's default to @var{database} and prints the records of the + table named by the symbol @var{table-name}. +- +-@deffnx {Procedure} browse pathname table-name ++@end deffn ++@deffn {Procedure} browse pathname table-name + + Opens the database named by the string @var{pathname} and sets browse's + default to it; @code{browse} prints the records of the table named by + the symbol @var{table-name}. +- + @end deffn + + +@@ -8576,8 +8601,9 @@ + describing the columns of a new base table in this database, otherwise + returns @code{#f}. For the fields and layout of descriptor tables, + @xref{Catalog Representation}. ++@end defop + +-@defopx {Operation} {relational-database} create-table table-name table-desc-name ++@defop {Operation} {relational-database} create-table table-name table-desc-name + Returns a methods procedure for a new (open) relational table with + columns as described by @var{table-desc-name}, otherwise returns + @code{#f}. +@@ -9900,14 +9926,16 @@ + @defun list-of?? predicate + Returns a predicate which returns true if its argument is a list every + element of which satisfies @var{predicate}. ++@end defun + +-@defunx list-of?? predicate low-bound high-bound ++@defun list-of?? predicate low-bound high-bound + @var{low-bound} and @var{high-bound} are non-negative integers. + @code{list-of??} returns a predicate which returns true if its argument + is a list of length between @var{low-bound} and @var{high-bound} + (inclusive); every element of which satisfies @var{predicate}. ++@end defun + +-@defunx list-of?? predicate bound ++@defun list-of?? predicate bound + @var{bound} is an integer. If @var{bound} is negative, @code{list-of??} + returns a predicate which returns true if its argument is a list of + length greater than @code{(- @var{bound})}; every element of which +@@ -10684,16 +10712,19 @@ + @deffn {Procedure} find-string-from-port? str in-port max-no-chars + Looks for a string @var{str} within the first @var{max-no-chars} chars + of the input port @var{in-port}. ++@end deffn + +-@deffnx {Procedure} find-string-from-port? str in-port ++@deffn {Procedure} find-string-from-port? str in-port + When called with two arguments, the search span is limited by the end of + the input stream. ++@end deffn + +-@deffnx {Procedure} find-string-from-port? str in-port char ++@deffn {Procedure} find-string-from-port? str in-port char + Searches up to the first occurrence of character @var{char} in + @var{str}. ++@end deffn + +-@deffnx {Procedure} find-string-from-port? str in-port proc ++@deffn {Procedure} find-string-from-port? str in-port proc + Searches up to the first occurrence of the procedure @var{proc} + returning non-false when called with a character (from @var{in-port}) + argument. +@@ -11635,12 +11666,14 @@ + @deffn {Procedure} trace-all file @dots{} + Traces (@pxref{Trace}) all procedures @code{define}d at top-level in + @file{file} @dots{}. ++@end deffn + +-@deffnx {Procedure} track-all file @dots{} ++@deffn {Procedure} track-all file @dots{} + Tracks (@pxref{Trace}) all procedures @code{define}d at top-level in + @file{file} @dots{}. ++@end deffn + +-@deffnx {Procedure} stack-all file @dots{} ++@deffn {Procedure} stack-all file @dots{} + Stacks (@pxref{Trace}) all procedures @code{define}d at top-level in + @file{file} @dots{}. + @end deffn +@@ -11676,8 +11709,9 @@ + @defun continue + Pops the topmost continuation off of the continuation stack and returns + an unspecified value to it. ++@end defun + +-@defunx continue arg1 @dots{} ++@defun continue arg1 @dots{} + Pops the topmost continuation off of the continuation stack and returns + @var{arg1} @dots{} to it. + @end defun +@@ -11685,7 +11719,9 @@ + @defmac break proc1 @dots{} + Redefines the top-level named procedures given as arguments so that + @code{breakpoint} is called before calling @var{proc1} @dots{}. +-@defmacx break ++@end defmac ++ ++@defmac break + With no arguments, makes sure that all the currently broken identifiers + are broken (even if those identifiers have been redefined) and returns a + list of the broken identifiers. +@@ -11693,7 +11729,9 @@ + + @defmac unbreak proc1 @dots{} + Turns breakpoints off for its arguments. +-@defmacx unbreak ++@end defmac ++ ++@defmac unbreak + With no arguments, unbreaks all currently broken identifiers and returns + a list of these formerly broken identifiers. + @end defmac +@@ -11768,7 +11806,9 @@ + + @defmac trace proc1 @dots{} + Traces the top-level named procedures given as arguments. +-@defmacx trace ++@end defmac ++ ++@defmac trace + With no arguments, makes sure that all the currently traced identifiers + are traced (even if those identifiers have been redefined) and returns a + list of the traced identifiers. +@@ -11776,7 +11816,8 @@ + + @defmac track proc1 @dots{} + Traces the top-level named procedures given as arguments. +-@defmacx track ++@end defmac ++@defmac track + With no arguments, makes sure that all the currently tracked identifiers + are tracked (even if those identifiers have been redefined) and returns + a list of the tracked identifiers. +@@ -11784,7 +11825,8 @@ + + @defmac stack proc1 @dots{} + Traces the top-level named procedures given as arguments. +-@defmacx stack ++@end defmac ++@defmac stack + With no arguments, makes sure that all the currently stacked identifiers + are stacked (even if those identifiers have been redefined) and returns + a list of the stacked identifiers. +@@ -11792,21 +11834,24 @@ + + @defmac untrace proc1 @dots{} + Turns tracing, tracking, and off for its arguments. +-@defmacx untrace ++@end defmac ++@defmac untrace + With no arguments, untraces all currently traced identifiers and returns + a list of these formerly traced identifiers. + @end defmac + + @defmac untrack proc1 @dots{} + Turns tracing, tracking, and off for its arguments. +-@defmacx untrack ++@end defmac ++@defmac untrack + With no arguments, untracks all currently tracked identifiers and returns + a list of these formerly tracked identifiers. + @end defmac + + @defmac unstack proc1 @dots{} + Turns tracing, stacking, and off for its arguments. +-@defmacx unstack ++@end defmac ++@defmac unstack + With no arguments, unstacks all currently stacked identifiers and returns + a list of these formerly stacked identifiers. + @end defmac Added: head/lang/slib/files/patch-solid.txi ============================================================================== --- /dev/null 00:00:00 1970 (empty, because file is newly added) +++ head/lang/slib/files/patch-solid.txi Sun Oct 5 13:29:40 2014 (r370066) @@ -0,0 +1,14 @@ +--- solid.txi.orig 2013-05-12 04:47:55 UTC ++++ solid.txi +@@ -544,9 +544,10 @@ + + @var{center} must be a list or vector of three numbers. Returns an upward + pointing metallic arrow centered at @var{center}. ++@end defun + + +-@defunx solid:arrow ++@defun solid:arrow + Returns an upward pointing metallic arrow centered at the origin. + @end defun + Added: head/lang/slib/files/patch-xml-parse.txi ============================================================================== --- /dev/null 00:00:00 1970 (empty, because file is newly added) +++ head/lang/slib/files/patch-xml-parse.txi Sun Oct 5 13:29:40 2014 (r370066) @@ -0,0 +1,14 @@ +--- xml-parse.txi.orig 2013-05-12 04:47:55 UTC ++++ xml-parse.txi +@@ -108,9 +108,10 @@ + @var{inc-charset}. The reading stops at the first character which is not a member + of the set. This character is left on the stream. All the read + characters are returned in a string. ++@end defun + + +-@defunx ssax:next-token-of pred port ++@defun ssax:next-token-of pred port + + Reads characters from the @var{port} for which @var{pred} (a procedure of + one argument) returns non-#f. The reading stops at the first Modified: head/lang/slib/pkg-plist ============================================================================== --- head/lang/slib/pkg-plist Sun Oct 5 13:29:15 2014 (r370065) +++ head/lang/slib/pkg-plist Sun Oct 5 13:29:40 2014 (r370066) @@ -48,6 +48,7 @@ %%DATADIR%%/elk.init %%DATADIR%%/eval.scm %%DATADIR%%/factor.scm +%%DATADIR%%/fluid-let.scm %%DATADIR%%/fluidlet.scm %%DATADIR%%/format.scm %%DATADIR%%/formatst.scm @@ -58,6 +59,7 @@ %%DATADIR%%/glob.scm %%DATADIR%%/grapheps.ps %%DATADIR%%/grapheps.scm +%%DATADIR%%/guile-2.init %%DATADIR%%/guile.init %%DATADIR%%/hash.scm %%DATADIR%%/hashtab.scm @@ -179,7 +181,7 @@ %%DATADIR%%/vet.scm %%DATADIR%%/vscm.init %%DATADIR%%/withfile.scm -%%DATADIR%%/wttest.scm +%%DATADIR%%/wttree-test.scm %%DATADIR%%/wttree.scm %%DATADIR%%/xml-parse.scm %%DATADIR%%/yasyn.scm @@ -187,5 +189,3 @@ %%PORTDOCS%%%%DOCSDIR%%/ChangeLog %%PORTDOCS%%%%DOCSDIR%%/FAQ %%PORTDOCS%%%%DOCSDIR%%/README -%%PORTDOCS%%@dirrm %%DOCSDIR%% -@dirrm %%DATADIR%%