From: <cli...@li...> - 2005-07-13 03:18:06
|
Send clisp-cvs mailing list submissions to cli...@li... To subscribe or unsubscribe via the World Wide Web, visit https://lists.sourceforge.net/lists/listinfo/clisp-cvs or, via email, send a message with subject or body 'help' to cli...@li... You can reach the person managing the list at cli...@li... When replying, please edit your Subject line so it is more specific than "Re: Contents of clisp-cvs digest..." CLISP CVS commits for today Today's Topics: 1. clisp/doc Makefile,1.66,1.67 (Sam Steingold) 2. clisp/src spvw_garcol.d,1.97,1.98 (Sam Steingold) 3. clisp/src makemake.in,1.576,1.577 ChangeLog,1.4752,1.4753 (Sam Steingold) 4. clisp/doc man.xsl,1.2,1.3 (Sam Steingold) 5. clisp/doc clisp.xml.in,1.39,1.40 (Sam Steingold) 6. clisp/unix INSTALL,1.21,1.22 (Sam Steingold) 7. clisp/win32msvc INSTALL,1.17,1.18 (Sam Steingold) 8. clisp/modules/pari pari.lisp,1.11,1.12 (Sam Steingold) 9. clisp/src ChangeLog,1.4753,1.4754 (Sam Steingold) --__--__-- Message: 1 From: Sam Steingold <sd...@us...> To: cli...@li... Subject: clisp/doc Makefile,1.66,1.67 Date: Tue, 12 Jul 2005 14:38:23 +0000 Reply-To: cli...@li... Update of /cvsroot/clisp/clisp/doc In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv12723/doc Modified Files: Makefile Log Message: (clisp.html, clisp.1): depend on $(OLINK) Index: Makefile =================================================================== RCS file: /cvsroot/clisp/clisp/doc/Makefile,v retrieving revision 1.66 retrieving revision 1.67 diff -u -d -r1.66 -r1.67 --- Makefile 6 Jul 2005 16:36:36 -0000 1.66 +++ Makefile 12 Jul 2005 14:38:21 -0000 1.67 @@ -101,14 +101,14 @@ XMLOUT=xsltproc --timing --stringparam target.database.document -clisp.html: clisp.xml common.xsl pile.xsl tdb-pile.xml olink-pile.xml +clisp.html: clisp.xml common.xsl pile.xsl $(OLINK) $(XMLOUT) "olink-pile.xml" --stringparam current.docid "man" \ -o $@ pile.xsl $< _clisp.html: clisp.html sed $(SGML_UNCOMMENT) $< > $@ -clisp.1: clisp.xml common.xsl man.xsl tdb-pile.xml olink-pile.xml +clisp.1: clisp.xml common.xsl man.xsl $(OLINK) $(XMLOUT) "olink-pile.xml" --stringparam current.docid "man" \ -o $@ man.xsl $< --__--__-- Message: 2 From: Sam Steingold <sd...@us...> To: cli...@li... Subject: clisp/src spvw_garcol.d,1.97,1.98 Date: Tue, 12 Jul 2005 14:40:22 +0000 Reply-To: cli...@li... Update of /cvsroot/clisp/clisp/src In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv14385/src Modified Files: spvw_garcol.d Log Message: translated a message Index: spvw_garcol.d =================================================================== RCS file: /cvsroot/clisp/clisp/src/spvw_garcol.d,v retrieving revision 1.97 retrieving revision 1.98 diff -u -d -r1.97 -r1.98 --- spvw_garcol.d 30 May 2005 13:26:40 -0000 1.97 +++ spvw_garcol.d 12 Jul 2005 14:40:20 -0000 1.98 @@ -47,10 +47,10 @@ #if DEBUG_GC_MARK #define IF_DEBUG_GC_MARK(statement) statement #if defined(WIDE_SOFT) || defined(WIDE_AUXI) - # oint is defined as uint64. + /* oint is defined as uint64. */ #define PRIoint "ll" #else - # oint is defined as uintP. Assume pointer_bitsize == long_bitsize. + /* oint is defined as uintP. Assume pointer_bitsize == long_bitsize. */ #define PRIoint "l" #endif #else @@ -1358,7 +1358,7 @@ #elif (varobject_alignment==8) #define uintVLA uintL2 #else - #error "Unbekannter Wert von 'varobject_alignment'!" + #error "Unknown value for 'varobject_alignment'!" #endif #if defined(GNU) && (__GNUC__ < 3) && !defined(__cplusplus) # better for optimization #if defined(fast_dotimesL) && (intMsize==intLsize) --__--__-- Message: 3 From: Sam Steingold <sd...@us...> To: cli...@li... Subject: clisp/src makemake.in,1.576,1.577 ChangeLog,1.4752,1.4753 Date: Tue, 12 Jul 2005 14:43:36 +0000 Reply-To: cli...@li... Update of /cvsroot/clisp/clisp/src In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv16154/src Modified Files: makemake.in ChangeLog Log Message: (MSVCDIR): output sample values for all versions Index: makemake.in =================================================================== RCS file: /cvsroot/clisp/clisp/src/makemake.in,v retrieving revision 1.576 retrieving revision 1.577 diff -u -d -r1.576 -r1.577 --- makemake.in 7 Jul 2005 20:52:40 -0000 1.576 +++ makemake.in 12 Jul 2005 14:43:28 -0000 1.577 @@ -1937,14 +1937,10 @@ # echol "INLINE = /usr/lib/inline" # fi if [ $HSYS = win32msvc ] ; then - if [ $COMPILER = msvc4 ] ; then - echol "MSVCDIR = d:/msdev" - fi - if [ $COMPILER = msvc5 -o $COMPILER = msvc6 ] ; then - echol "#MSVCDIR = d:/devstudio/vc" - echol "#MSVCDIR = c:/msvs/vc98" - echol "#MSVCDIR = \"C:/Program Files/Microsoft Visual Studio/VC98\"" - fi + echol "#MSVCDIR = d:/msdev" + echol "#MSVCDIR = d:/devstudio/vc" + echol "#MSVCDIR = c:/msvs/vc98" + echol "#MSVCDIR = \"C:/Program Files/Microsoft Visual Studio/VC98\"" fi # echotab_to_HEXE command source target # outputs a `make' statement that executes "command source" and creates Index: ChangeLog =================================================================== RCS file: /cvsroot/clisp/clisp/src/ChangeLog,v retrieving revision 1.4752 retrieving revision 1.4753 diff -u -d -r1.4752 -r1.4753 --- ChangeLog 11 Jul 2005 23:18:58 -0000 1.4752 +++ ChangeLog 12 Jul 2005 14:43:29 -0000 1.4753 @@ -1,3 +1,8 @@ +2005-07-12 Sam Steingold <sd...@gn...> + + * makemake.in (MSVCDIR): output sample values for all versions + Reported by Ury Marshak <ur...@tw...> + 2005-07-11 Sam Steingold <sd...@gn...> * modules/bindings/win32/win32.lisp (SetStdHandle): added --__--__-- Message: 4 From: Sam Steingold <sd...@us...> To: cli...@li... Subject: clisp/doc man.xsl,1.2,1.3 Date: Tue, 12 Jul 2005 15:03:58 +0000 Reply-To: cli...@li... Update of /cvsroot/clisp/clisp/doc In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv26624/doc Modified Files: man.xsl Log Message: do not ignore ulinks, they are now transformed into a REFERENCES section Index: man.xsl =================================================================== RCS file: /cvsroot/clisp/clisp/doc/man.xsl,v retrieving revision 1.2 retrieving revision 1.3 diff -u -d -r1.2 -r1.3 --- man.xsl 13 Aug 2004 15:04:40 -0000 1.2 +++ man.xsl 12 Jul 2005 15:03:56 -0000 1.3 @@ -3,10 +3,6 @@ <xsl:import href="/usr/share/docbook-xsl/manpages/docbook.xsl"/> <!-- xsl:import href="common.xsl"/ --> -<xsl:template match="ulink"> <!-- ignore ulink --> - <xsl:apply-templates/> -</xsl:template> - <!-- here we just convert comments into < ! - - ... - - > for further processing with sed(1) (see Makefile) --> <xsl:template match="comment()"> --__--__-- Message: 5 From: Sam Steingold <sd...@us...> To: cli...@li... Subject: clisp/doc clisp.xml.in,1.39,1.40 Date: Tue, 12 Jul 2005 15:06:29 +0000 Reply-To: cli...@li... Update of /cvsroot/clisp/clisp/doc In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv27855/doc Modified Files: clisp.xml.in Log Message: (reference): tweak Index: clisp.xml.in =================================================================== RCS file: /cvsroot/clisp/clisp/doc/clisp.xml.in,v retrieving revision 1.39 retrieving revision 1.40 diff -u -d -r1.39 -r1.40 --- clisp.xml.in 23 May 2005 20:48:03 -0000 1.39 +++ clisp.xml.in 12 Jul 2005 15:06:26 -0000 1.40 @@ -441,11 +441,11 @@ </refsection> -<refsection id="reference"><title>Reference</title> +<refsection id="reference"><title>Language Reference</title> -<para id="ansi-cl">The language implemented mostly conforms to the - <olink targetdoc="impnotes" targetptr="ref-ansi">ANSI Common Lisp - standard</olink>.</para> +<para id="ansi-cl">The language implemented is &ansi-cl. + The implementation mostly conforms to the <olink targetdoc="impnotes" + targetptr="ref-ansi">ANSI Common Lisp standard</olink>.</para> </refsection> --__--__-- Message: 6 From: Sam Steingold <sd...@us...> To: cli...@li... Subject: clisp/unix INSTALL,1.21,1.22 Date: Tue, 12 Jul 2005 17:54:37 +0000 Reply-To: cli...@li... Update of /cvsroot/clisp/clisp/unix In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv8877/unix Modified Files: INSTALL Log Message: spelling Index: INSTALL =================================================================== RCS file: /cvsroot/clisp/clisp/unix/INSTALL,v retrieving revision 1.21 retrieving revision 1.22 diff -u -d -r1.21 -r1.22 --- INSTALL 8 Jul 2005 13:49:20 -0000 1.21 +++ INSTALL 12 Jul 2005 17:54:34 -0000 1.22 @@ -53,7 +53,7 @@ ./configure --with-libreadline-prefix=/sw \ --with-libsigsegv-prefix=/usr/local \ --with-libiconv-prefix=/home/user/my/prefix \ - --build my-buld-directory + --build my-build-directory 3. Choose the name of a directory in which to build CLISP. (This allows you to build CLISP with different compilers on the same --__--__-- Message: 7 From: Sam Steingold <sd...@us...> To: cli...@li... Subject: clisp/win32msvc INSTALL,1.17,1.18 Date: Tue, 12 Jul 2005 18:02:18 +0000 Reply-To: cli...@li... Update of /cvsroot/clisp/clisp/win32msvc In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv11903/win32msvc Modified Files: INSTALL Log Message: suggest mingw/msys or cygwin Index: INSTALL =================================================================== RCS file: /cvsroot/clisp/clisp/win32msvc/INSTALL,v retrieving revision 1.17 retrieving revision 1.18 diff -u -d -r1.17 -r1.18 --- INSTALL 6 Jul 2005 15:33:54 -0000 1.17 +++ INSTALL 12 Jul 2005 18:02:15 -0000 1.18 @@ -3,7 +3,7 @@ or MSVC7.0 development environment, using native system calls ============================================================= -0. Note! Binaries created with MSVC 7.0 with MFLAGS=-MD should not be +** Note! Binaries created with MSVC 7.0 with MFLAGS=-MD should not be distributed: They depend on a closed-source library 'msvcr70.dll' which is not normally part of a Woe32 installation. You cannot distribute 'msvcr70.dll' with the binaries - this would be a violation of the GPL and @@ -12,8 +12,22 @@ library on their system. Therefore it is not recommended. This problem does not occur with MSVC 6.0 and earlier. +** Note! The easiest way to get a native win32 version of CLISP is to use + -- cygwin <http://cywgin.com> or + -- mingw/msys <http://gnuwin32.sourceforge.net/>. + Either way, read ../unix/INSTALL, get libsigsegv, and do + $ ./configure --with-mingw --build build-mingw --with-module=... + $ cd build-mingw + $ make distrib + unzip the distribution in your preferred location, and run install.bat. + The GCC builds should be faster than the MSVC builds + because CLISP uses some GCC-specific assembly code. + +If you still want to use the MS C compiler, here are the steps: + 1. Build a few recommended libraries: libiconv and libsigsegv. - - GNU libsigsegv (highly recommended for C stack overflow detection), + - GNU libsigsegv (highly recommended for C stack overflow detection + and high-performance Generational GC), - GNU libiconv (for more character set conversions). 2. Unpack the source, start a console with a shell. @@ -37,9 +51,11 @@ vcvars32 nmake 3. Ensure unix-like command-line utilities used in the build: sed, grep, - touch, rm (more the better) are in the PATH. There are a few such packages - available, for example UnxUtils (http://unxutils.sourceforge.net/) or - cygwin (overkill for this particular case). + touch, rm (more the better) are in the PATH. + There are quite a few such packages available, for example + - UnxUtils <http://unxutils.sourceforge.net/>, + - GnuWin32 <http://gnuwin32.sourceforge.net/> or + - cygwin <http://cywgin.com> (overkill for this particular case). 4. Then build a few tools and libraries: @@ -71,8 +87,13 @@ copy win32msvc\makefile.msvc6 src\makefile - same, debug version: + for MSVC7.0: + + copy win32msvc\makefile.msvc7 src\makefile + + same, debug versions: + copy win32msvc\makefile.msvc5d src\makefile copy win32msvc\makefile.msvc6d src\makefile Check that environment variable MSVCDIR points to VC98 directory @@ -83,7 +104,7 @@ CLISP anymore, the makefiles do not make use of them. For actually using libsigsegv with CLISP, here is a way to go: a) Compile the library as per libsigsegv\README.woe32 - b) Copy sigsegv.lib and sigsegv.h to src + b) Copy sigsegv.lib and sigsegv.h to src c) Remove -DNO_SIGSEGV from CFLAGS in src\makefile d) Add sigsegv.lib to LIBS in src\makefile @@ -94,3 +115,4 @@ cd src make distrib + --__--__-- Message: 8 From: Sam Steingold <sd...@us...> To: cli...@li... Subject: clisp/modules/pari pari.lisp,1.11,1.12 Date: Tue, 12 Jul 2005 22:29:35 +0000 Reply-To: cli...@li... Update of /cvsroot/clisp/clisp/modules/pari In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv10982/modules/pari Modified Files: pari.lisp Log Message: updated obsolete names Index: pari.lisp =================================================================== RCS file: /cvsroot/clisp/clisp/modules/pari/pari.lisp,v retrieving revision 1.11 retrieving revision 1.12 diff -u -d -r1.11 -r1.12 --- pari.lisp 6 Jul 2005 15:18:41 -0000 1.11 +++ pari.lisp 12 Jul 2005 22:29:33 -0000 1.12 @@ -181,8 +181,9 @@ (def-c-var pari-2 (:name "gen_2") (:type pari-gen) (:read-only t)) (def-c-var pari-1/2 (:name "ghalf") (:type pari-gen) (:read-only t)) (def-c-var pari-i (:name "gi") (:type pari-gen) (:read-only t)) -(def-c-var pari-0 (:name "gzero") (:type pari-gen) (:read-only t)) +(def-c-var pari-0 (:name "gen_0") (:type pari-gen) (:read-only t)) (def-c-var pari--1 (:name "gen_m1") (:type pari-gen) (:read-only t)) +(def-c-var pari-nil (:name "gnil") (:type pari-gen) (:read-only t)) ;; extern GEN *polun,*polx; (def-c-var pari-poly-1 (:name "polun") (:type (c-ptr pari-gen)) (:read-only t)) @@ -367,7 +368,7 @@ ;;; <default> ::= <expression> ;;; <gp-name> defaults to <pari-name>, <type> defaults to pari-gen, ;;; <mode> defaults to :in, and <allocation> defaults to :none. -;;; This defines a foreign function pari-<name> with arguments and return +;;; This defines a foreign function <pari-name> with arguments and return ;;; type as specified. Moreover, if <gp-name> is non-nil, a function ;;; <name> is defined and <name> is exported from the PARI package. ;;; Arguments and return value are converted as necessary. @@ -532,11 +533,10 @@ ;;; /* anal.c */ -;; GEN lisexpr(char *t); +;; GEN readexpr(char *t); ;; GEN readexpr(char **c); -;; GEN lisseq(char *t); -(pari-call-out read-from-string "lisseq" ((str c-string :in :alloca)) nil) -;; GEN readseq(char **c); +;; GEN readseq(char *t); +(pari-call-out read-from-string "readseq" ((str c-string :in :alloca)) nil) ;; void switchin(char *name); ;; GEN switchout(char *name); @@ -569,9 +569,9 @@ (pari-call-out add-primes "addprimes" (primes) "addprimes") ;; GEN bezout(GEN a, GEN b, GEN *u, GEN *v); -;; GEN chinois(GEN x, GEN y); -(pari-call-out chinese-lift "chinois" (x y) "chinese") -;; GEN mpinvmod(GEN a, GEN m); +;; GEN chinese(GEN x, GEN y); +(pari-call-out chinese-lift "chinese" (x y)) +;; GEN Fp_inv(GEN a, GEN m); ;; GEN puissmodulo(GEN a, GEN n, GEN m); ;; GEN fibo(long n); (pari-call-out fibonacci "fibo" ((n long))) @@ -608,11 +608,10 @@ ;; GEN divisors(GEN n); (pari-call-out divisors "divisors" (n)) -;; GEN ellfacteur(GEN n1); ;; GEN classno(GEN x); (pari-call-out quadratic-class-number "classno" (x)) ;; GEN classno2(GEN x); -;; GEN classno3(GEN x); +;; GEN hclassno(GEN x); ;; GEN fundunit(GEN x); (pari-call-out quadratic-unit "fundunit" (x) "unit") ;; GEN regula(GEN x, long prec); @@ -702,7 +701,7 @@ ;; GEN ispsp(GEN x); ;; GEN issquarefree(GEN x); ;; GEN isfundamental(GEN x); -;; GEN mpsqrtmod(GEN a, GEN p, GEN *pr); +;; GEN Fp_sqrt(GEN a, GEN p, GEN *pr); ;; int millerrabin(GEN n, long k); ;; GEN pseudopremier(GEN n, GEN a); @@ -822,8 +821,8 @@ ;; GEN idealhermite(GEN nf, GEN x); (pari-call-out ideal-to-hnf "idealhermite" (nf x)) -;; GEN idealhermite2(GEN nf, GEN a, GEN b); -(pari-call-out ideal-2-generators-to-hnf "idealhermite2" (nf a b)) +;; GEN idealhnf0(GEN nf, GEN a, GEN b); +(pari-call-out ideal-2-generators-to-hnf "idealhnf0" (nf a b)) ;; GEN idealadd(GEN nf, GEN x, GEN y); (pari-call-out ideal-add "idealadd" (nf x y)) ;; GEN idealaddtoone(GEN nf, GEN x, GEN y); @@ -879,8 +878,8 @@ ;; GEN nfdiveuc(GEN nf, GEN a, GEN b); (pari-call-out nf-element-euclidean-divide "nfdiveuc" (nf a b)) -;; GEN nfdivres(GEN nf, GEN a, GEN b); -(pari-call-out nf-element-euclidean-divmod "nfdivres" (nf a b)) +;; GEN nfdivrem(GEN nf, GEN a, GEN b); +(pari-call-out nf-element-euclidean-divmod "nfdivrem" (nf a b)) ;; GEN nfmod(GEN nf, GEN a, GEN b); (pari-call-out nf-element-mod "nfmod" (nf a b)) ;; GEN element_div(GEN nf, GEN x, GEN y); @@ -950,7 +949,7 @@ ;; #define element_sqrmodpr(nf,x,prhall) (nfreducemodpr(nf,element_sqr(nf,x); ;; GEN prhall)) -;;; /* bibli1.c */ +;;; /* base1.c */ ;; GEN tayl(GEN x, long v, long precdl); (pari-call-out taylor-expansion "tayl" @@ -969,12 +968,11 @@ (pari-call-out laplace-transform "laplace" (x)) ;; GEN gprec(GEN x, long l); -(pari-call-out change-precision "gprec" (x (l long)) "prec") +(pari-call-out change-precision "gprec" (x (l long)) "precision") ;; GEN convol(GEN x, GEN y); (pari-call-out hadamard-product "convol" (x y)) ;; GEN ggrando(GEN x, long n); -;; GEN ggrandocp(GEN x, long n); -(pari-call-out pari-o "ggrandocp" (a (b long)) "o") +(pari-call-out pari-o "ggrando" (a (b long)) "O") ;; GEN gconvsp(GEN x); ;; GEN gconvpe(GEN x); @@ -1007,7 +1005,7 @@ ;; GEN lllgramallgen(GEN x, long all); ;; GEN binomial(GEN x, long k); -;(pari-call-out binomial-coefficient "binomial" (x k)) +(pari-call-out binomial-coefficient "binomial" (x k)) ;; GEN gscal(GEN x, GEN y); ;; GEN cyclo(long n); (pari-call-out cyclotomic-polynomial "cyclo" ((n long)) "polcyclo") @@ -1063,10 +1061,10 @@ (pari-call-out polymod-reverse "polymodrecip" (x) "modreverse") ;; GEN genrand(void); (pari-call-out pari-random "genrand" () "random") -;; GEN permute(long n, GEN x); -(pari-call-out permutation "permute" ((n long) x) "permutation") -;; GEN permuteInv(GEN x); -(pari-call-out permutation-number "permuteInv" (x) "permutation2num") +;; GEN numtoperm(long n, GEN x); +(pari-call-out permutation "numtoperm" ((n long) x)) +;; GEN permtonum(GEN x); +(pari-call-out permutation-number "permtonum" (x)) ;; long mymyrand(); @@ -1319,8 +1317,8 @@ ;; void pariflush(void); ;; #endif /* CLISP_MODULE */ -;; char* gen2str(GEN x); -(pari-call-out (write-to-string c-string :malloc-free) "gen2str" (x) nil) +;; char* GENtostr(GEN x); +(pari-call-out (write-to-string c-string :malloc-free) "GENtostr" (x) nil) ;; void fprintferr(char* pat, ...); ;; void flusherr(); @@ -1370,10 +1368,10 @@ ;; GEN gabs(GEN x, long prec); (pari-call-out-prec pari-abs "gabs" (x) "abs") -;; GEN gpui(GEN x, GEN n, long prec); -(pari-call-out-prec pari-expt "gpui" (x n) "^") -;; GEN gpuigs(GEN x, long n); -(pari-call-out pari-expt-integer "gpuigs" (x (n long)) "^") +;; GEN gpow(GEN x, GEN n, long prec); +(pari-call-out-prec pari-expt "gpow" (x n) "^") +;; GEN gpowgs(GEN x, long n); +(pari-call-out pari-expt-integer "gpowgs" (x (n long)) "^") ;; GEN gmax(GEN x, GEN y); (pari-call-out pari-max "gmax" (x y) "max") @@ -1520,8 +1518,8 @@ (pari-call-out (compare boolean) "gcmp" (x y) "?") ;; GEN lexcmp(GEN x, GEN y); (pari-call-out (compare-lex boolean) "lexcmp" (x y) "lex") -;; GEN gegal(GEN x, GEN y); -(pari-call-out (equal? boolean) "gegal" (x y) "==") +;; GEN gequal(GEN x, GEN y); +(pari-call-out (equal? boolean) "gequal" (x y) "==") ;; GEN polegal(GEN x, GEN y); ;; GEN vecegal(GEN x, GEN y); ;; GEN gsigne(GEN x); @@ -1559,17 +1557,17 @@ ;;(pari-call-out (rounderror long) "rounderror" (x)) ;; GEN gsize(GEN x); ;;(pari-call-out (size long) "gsize" (x) "size") -;; GEN pvaluation(GEN x, GEN p, GEN *py); +;; GEN Z_pvalrem(GEN x, GEN p, GEN *py); ;; double rtodbl(GEN x); ;; GEN gtodouble(GEN x); ;;; /* polarit.c */ ;; GEN ginvmod(GEN x, GEN y); -;; GEN gred(GEN x); +;; GEN gcopy(GEN x); ;; GEN gdeuc(GEN x, GEN y); -;; GEN gres(GEN x, GEN y); -;; GEN poldivres(GEN x, GEN y, GEN *pr); +;; GEN grem(GEN x, GEN y); +;; GEN poldivrem(GEN x, GEN y, GEN *pr); ;; GEN poleval(GEN x, GEN y); ;; GEN roots(GEN x, long l); @@ -1595,13 +1593,11 @@ (pari-call-out content "content" (x)) ;; GEN primpart(GEN x); ;; GEN psres(GEN x, GEN y); -;; GEN factmod9(GEN f, GEN p, GEN a); -(pari-call-out factor-in-fq "factmod9" (f p a) "factfq") +;; GEN factorff(GEN f, GEN p, GEN a); +(pari-call-out factor-in-fq "factorff" (f p a)) ;; GEN factmod(GEN f, GEN p); (pari-call-out factor-in-fp "factmod" (f p)) -;; GEN factmod2(GEN f, GEN p); -;; GEN factmod_gen(GEN f, GEN p); ;; GEN rootmod(GEN f, GEN p); (pari-call-out mod-p-roots "rootmod" (f p)) ;; GEN rootmod2(GEN f, GEN p); @@ -1651,9 +1647,8 @@ ;; GEN newtonpoly(GEN x, GEN p); (pari-call-out newton-polygon "newtonpoly" (x p)) -;; GEN apprgen(GEN f, GEN a); -;; GEN apprgen9(GEN f, GEN a); -(pari-call-out lift-padic-roots "apprgen9" (f a) "apprpadic") +;; GEN padicappr(GEN f, GEN a); +(pari-call-out lift-padic-roots "padicappr" (f a)) ;; GEN rootpadic(GEN f, GEN p, long r); (pari-call-out padic-roots "rootpadic" (f p (prec long))) ;; GEN rootpadicfast(GEN f, GEN p, long r, long flall); @@ -1673,7 +1668,7 @@ (export 'count-real-roots) ;; int poldivis(GEN x, GEN y, GEN *z); -;; GEN gdivise(GEN x, GEN y); +;; GEN gdvd(GEN x, GEN y); ;; void gredsp(GEN *px); ;; GEN split(long m, GEN *t, long d, long p, GEN q); @@ -1695,7 +1690,7 @@ (pari-call-out-prec arithmetic-geometric-mean "agm" (x y)) ;; GEN palog(GEN x); -;; GEN mpsqrt(GEN x); +;; GEN sqrtr(GEN x); ;; GEN gsqrt(GEN x, long prec); (pari-call-out-prec pari-sqrt "gsqrt" (x) "sqrt") @@ -1709,8 +1704,8 @@ ;; GEN mpexp1(GEN x); ;; GEN mpexp(GEN x); -;; GEN logagm(GEN q); -;; GEN glogagm(GEN x, long prec); +;; GEN mplog(GEN q); +;; GEN glog(GEN x, long prec); ;; GEN mpsc1(GEN x, long *ptmod8); ;; GEN mpcos(GEN x); @@ -1990,10 +1985,8 @@ ;; GEN stoi(long x); ;; GEN cgetg(long x, long y); -;; GEN negi(GEN x); -;; GEN negr(GEN x); -;; GEN absi(GEN x); -;; GEN absr(GEN x); +;; GEN mpneg(GEN x); +;; GEN mpabs(GEN x); (def-call-out pari-cgetg (:name "cgetg") (:return-type pari-gen) @@ -2004,7 +1997,7 @@ ;; GEN gerepile(long l, long p, GEN q); ;; GEN icopy(GEN x); -;; GEN rcopy(GEN x); +;; GEN mpcopy(GEN x); #| (def-call-out pari-gerepile (:name "gerepile") --__--__-- Message: 9 From: Sam Steingold <sd...@us...> To: cli...@li... Subject: clisp/src ChangeLog,1.4753,1.4754 Date: Tue, 12 Jul 2005 22:29:35 +0000 Reply-To: cli...@li... Update of /cvsroot/clisp/clisp/src In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv10982/src Modified Files: ChangeLog Log Message: updated obsolete names Index: ChangeLog =================================================================== RCS file: /cvsroot/clisp/clisp/src/ChangeLog,v retrieving revision 1.4753 retrieving revision 1.4754 diff -u -d -r1.4753 -r1.4754 --- ChangeLog 12 Jul 2005 14:43:29 -0000 1.4753 +++ ChangeLog 12 Jul 2005 22:29:05 -0000 1.4754 @@ -1,5 +1,9 @@ 2005-07-12 Sam Steingold <sd...@gn...> + * modules/pari/pari.lisp: updated obsolete names + +2005-07-12 Sam Steingold <sd...@gn...> + * makemake.in (MSVCDIR): output sample values for all versions Reported by Ury Marshak <ur...@tw...> --__--__-- _______________________________________________ clisp-cvs mailing list cli...@li... https://lists.sourceforge.net/lists/listinfo/clisp-cvs End of clisp-cvs Digest |