svn commit: r370066 - in head/lang: . slib slib-guile slib-guile/files slib-guile2 slib-guile2/files slib/files
Guido Falsi
madpilot at FreeBSD.org
Sun Oct 5 13:29:48 UTC 2014
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 at 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}.
++ at end defun
+
+- at defunx color:l*a*b* L* a* b*
++ at 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}.
++ at end defun
+
+- at defunx color->l*a*b* color
++ at 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}.
++ at end defun
+
+- at defunx color:l*u*v* L* u* v*
++ at 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}.
++ at end defun
+
+- at defunx color->l*u*v* color
++ at 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}.
++ at end defun
+
+- at defunx color:l*c*h L* C* h
++ at 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}.
++ at end defun
+
+- at defunx color->l*c*h color
++ at 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}.
++ at end defun
+
+- at defunx color:e-srgb 12 r g b
++ at defun color:e-srgb 12 r g b
+ Returns the e-sRGB12 color composed of integers @var{r}, @var{g}, @var{b}.
++ at end defun
+
+- at defunx color:e-srgb 16 r g b
++ at 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.
++ at end defun
+
+
+- at defunx color-dictionary name rdb
++ at 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}).
++ at end defun
+
+
+- at defunx open-database rdb
++ at 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}.
++ at end defun
+
+- at defunx matrix:product m1 z
++ at defun matrix:product m1 z
+ Returns matrix @var{m1} times scalar @var{z}.
++ at end defun
+
+- at defunx matrix:product z m1
++ at 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.
++ at end defun
+
+
+- at defunx directory-for-each proc directory pred
++ at 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.
++ at end defun
+
+-
+- at defunx directory-for-each proc directory match
++ at 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
+
+
+- at defun call-with-tmpnam proc k
+-
+-
+- at defunx call-with-tmpnam proc
++ at 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}.
++ at end defun
+
+
+- at defunx call-with-tmpnam proc suffix1 @dots{}
++ at 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.
++ at end defun
+
+- at defunx set-linedash j
++ at defun set-linedash j
+ Lines are drawn @var{j}-on @var{j}-off.
++ at end defun
+
+- at defunx set-linedash
++ at 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.
++ at end defun
+
+
+- at defunx plot x1 x2 npts func1 func2 @dots{}
++ at 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.
++ at end defun
+
+
+- at defunx plot coords x-label y-label
++ at 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.
++ at end defun
+
+
+- at defunx integer->hilbert-coordinates scalar rank k
++ at 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}.
++ at end defun
+
+- at defunx gray-code->integer k
++ at 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.
++ at end defun
+
+
+- at defunx pnm:image-file->array path
++ at 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}.
++ at end defun
+
+
+- at defunx copy-random-state
++ at 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.
++ at end deffn
+
+- at deffnx Procedure schmooz filename at r{.texi} @dots{}
++ at deffn Procedure schmooz filename at r{.texi} @dots{}
+ @deffnx Procedure schmooz filename at r{.tex} @dots{}
+ @deffnx Procedure schmooz filename at 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.
++ at end defun
+
+- at defunx slib:report #t
++ at defun slib:report #t
+ provides a more verbose listing.
++ at end defun
+
+- at defunx slib:report filename
++ at 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.
++ at end defun
+
+- at defunx file-position port k
++ at 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
+
+- at subsubsection Exact Conversions
++Exact Conversions
+
+ @table @asis
+ @item @samp{b}, @samp{B}
+@@ -3426,7 +3429,7 @@
+ digits @samp{0123456789ABCDEF}.
+ @end table
+
+- at subsubsection Inexact Conversions
++Inexact Conversions
+
+ @table @asis
+ @item @samp{f}
+@@ -3451,7 +3454,7 @@
+
+ @end table
+
+- at 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.
++ at end defun
+
+- at defunx tzset tz
++ at defun tzset tz
+ Sets (and returns) the default time-zone to @var{tz}.
++ at end defun
+
+- at defunx tzset TZ-string
++ at 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.
++ at end defun
+
+- at defunx localtime caltime tz
++ at defun localtime caltime tz
+ Returns @var{caltime} converted to UTC relative to timezone @var{tz}.
++ at end defun
+
+- at defunx localtime caltime
++ at 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.
++ at end defun
+
+- at defunx mktime univtime
++ at defun mktime univtime
+ Converts a vector of integers in local Coordinated Universal Time (UTC)
+ format to a calendar time.
++ at end defun
+
+- at defunx mktime univtime tz
++ at 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})}.
++ at end defun
+
+- at defunx list->integer list
++ at 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
++ at end defun
+
+- at defunx cksum port
++ at 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}.
++ at end defun
+
+- at defunx crc16 port
++ at 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}.
++ at end defun
+
+- at defunx crc5 port
++ at 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.
++ at end defun
+
+- at defunx color? obj typ
++ at 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}.
++ at end deftp
+
+- at deftpx {Feature} cie1931
++ at 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}.
++ at end deftp
+
+- at deftpx {Feature} ciexyz
++ at 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.
++ at end defun
+
+- at defunx spectrum->XYZ spectrum x1 x2
++ at 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.
++ at end defun
+
+- at defunx xyY:normalize-colors colors n
++ at 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}.
++ at end defun
+
+- at defunx CIE:DE* color1 color2 white-point
++ at 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}.
++ at end defun
+
+- at defunx cring:define-rule op sub-op1 'identity reduction
++ at 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.
++ at end defop
+
+- at defopx {Operation} {relational-table} isam-next column-name
++ at 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.
++ at end defop
+
+- at defopx {Operation} {relational-table} isam-prev column-name
++ at 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.
++ at end defop
+
+- at defopx {Operation} {relational-table} primary-limit
++ at 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.
++ at end defun
+
+- at defunx open-command-database! filename
++ at defun open-command-database! filename
+ @defunx open-command-database! filename base-table-type
+ Returns @emph{mutable} open enhanced relational database @dots{}
++ at end defun
+
+- at defunx open-command-database database
++ at defun open-command-database database
+ Returns @var{database} if it is an immutable relational database; #f
+ otherwise.
++ at end defun
+
+- at defunx open-command-database! database
++ at 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}.
+-
+- at deffnx {Procedure} browse
++ at end deffn
++ at deffn {Procedure} browse
+
+ Prints the names of all the tables in the default database.
+-
+- at deffnx {Procedure} browse table-name
++ at end deffn
++ at 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.
+-
+- at deffnx {Procedure} browse pathname
++ at end deffn
++ at 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.
+-
+- at deffnx {Procedure} browse database table-name
++ at end deffn
++ at 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}.
+-
+- at deffnx {Procedure} browse pathname table-name
++ at end deffn
++ at 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}.
++ at end defop
+
+- at defopx {Operation} {relational-database} create-table table-name table-desc-name
++ at 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}.
++ at end defun
+
+- at defunx list-of?? predicate low-bound high-bound
++ at 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}.
++ at end defun
+
+- at defunx list-of?? predicate bound
++ at 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}.
++ at end deffn
+
+- at deffnx {Procedure} find-string-from-port? str in-port
++ at 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.
++ at end deffn
+
+- at deffnx {Procedure} find-string-from-port? str in-port char
++ at deffn {Procedure} find-string-from-port? str in-port char
+ Searches up to the first occurrence of character @var{char} in
+ @var{str}.
++ at end deffn
+
+- at deffnx {Procedure} find-string-from-port? str in-port proc
++ at 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{}.
++ at end deffn
+
+- at deffnx {Procedure} track-all file @dots{}
++ at deffn {Procedure} track-all file @dots{}
+ Tracks (@pxref{Trace}) all procedures @code{define}d at top-level in
+ @file{file} @dots{}.
++ at end deffn
+
+- at deffnx {Procedure} stack-all file @dots{}
++ at 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.
++ at end defun
+
+- at defunx continue arg1 @dots{}
++ at 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{}.
+- at defmacx break
++ at end defmac
++
++ at 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.
+- at defmacx unbreak
++ at end defmac
++
++ at 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.
+- at defmacx trace
++ at end defmac
++
++ at 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.
+- at defmacx track
++ at end defmac
++ at 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.
+- at defmacx stack
++ at end defmac
++ at 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.
+- at defmacx untrace
++ at end defmac
++ at 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.
+- at defmacx untrack
++ at end defmac
++ at 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.
+- at defmacx unstack
++ at end defmac
++ at 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}.
++ at end defun
+
+
+- at defunx solid:arrow
++ at 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.
++ at end defun
+
+
+- at defunx ssax:next-token-of pred port
++ at 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%%
- at dirrm %%DATADIR%%
More information about the svn-ports-head
mailing list