Changeset bf4ff72 in git


Ignore:
Timestamp:
May 18, 2005, 6:24:44 PM (19 years ago)
Author:
Hans Schönemann <hannes@…>
Branches:
(u'spielwiese', 'fe61d9c35bf7c61f2b6cbf1b56e25e2f08d536cc')
Children:
044b9e99a823fc96df124aa9e95723797db62a35
Parents:
42f5a8bf6b4c7bed01fc4375213acbce2abcfe04
Message:
*hannes: load


git-svn-id: file:///usr/local/Singular/svn/trunk@8222 2c84dea3-7e68-4137-9b89-c4e89433aadc
Location:
Singular
Files:
3 edited

Legend:

Unmodified
Added
Removed

  • Singular/iparith.cc

    r42f5a8 rbf4ff72  
    22*  Computer Algebra System SINGULAR     *
    33****************************************/
    4 /* $Id: iparith.cc,v 1.364 2005-05-18 15:59:33 Singular Exp $ */
     4/* $Id: iparith.cc,v 1.365 2005-05-18 16:24:42 Singular Exp $ */
    55
    66/*
    … …  
    39983998        package savepack=currPack;
    39993999        currPack=IDPACKAGE(pl);
    4000         BOOLEAN bo=iiLibCmd(s);
     4000        char libnamebuf[256];
     4001        FILE * fp = feFopen( s, "r", libnamebuf, TRUE );
     4002        BOOLEAN bo=iiLoadLIB(fp, libnamebuf, s, pl, FALSE, TRUE);
    40014003        currPack=savepack;
     4004        IDPACKAGE(pl)->loaded=(!bo);
    40024005        return bo;
    40034006      }

  • Singular/iplib.cc

    r42f5a8 rbf4ff72  
    22*  Computer Algebra System SINGULAR     *
    33****************************************/
    4 /* $Id: iplib.cc,v 1.112 2005-05-18 15:59:35 Singular Exp $ */
     4/* $Id: iplib.cc,v 1.113 2005-05-18 16:24:43 Singular Exp $ */
    55/*
    66* ABSTRACT: interpreter: LIB and help
    … …  
    664664
    665665/*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*/
    666 static BOOLEAN iiLoadLIB(FILE *fp, char *libnamebuf, char *newlib,
    667                          idhdl pl, BOOLEAN autoexport, BOOLEAN tellerror);
    668 
    669666BOOLEAN iiTryLoadLib(leftv v, char *id)
    670667{
    … …  
    909906}
    910907/*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*/
    911 static BOOLEAN iiLoadLIB(FILE *fp, char *libnamebuf, char*newlib,
     908BOOLEAN iiLoadLIB(FILE *fp, char *libnamebuf, char*newlib,
    912909             idhdl pl, BOOLEAN autoexport, BOOLEAN tellerror)
    913910{

  • Singular/ipshell.h

    r42f5a8 rbf4ff72  
    44*  Computer Algebra System SINGULAR     *
    55****************************************/
    6 /* $Id: ipshell.h,v 1.40 2005-05-18 15:59:36 Singular Exp $ */
     6/* $Id: ipshell.h,v 1.41 2005-05-18 16:24:44 Singular Exp $ */
    77/*
    88* ABSTRACT
    … …  
    8080poly    iiHighCorner(ideal i, int ak);
    8181char *  iiConvName(const char *libname);
     82BOOLEAN iiLoadLIB(FILE *fp, char *libnamebuf, char *newlib,
     83                         idhdl pl, BOOLEAN autoexport, BOOLEAN tellerror);
     84
    8285
    8386/* ================================================================== */
Note: See TracChangeset for help on using the changeset viewer.