Changeset 3e96095 in git


Ignore:
Timestamp:
Jan 29, 2009, 11:12:19 AM (15 years ago)
Author:
Martin Monerjan
Branches:
(u'fieker-DuVal', '117eb8c30fc9e991c4decca4832b1d19036c4c65')(u'spielwiese', 'b52fc4b2495505785981d640dcf7eb3e456778ef')
Children:
ca41c348440e7c6d985f6aefddf5840eddd132c5
Parents:
a3771a2fa294bd63a632b48d298e68b0f1118e5b
Message:
*** empty log message ***


git-svn-id: file:///usr/local/Singular/svn/trunk@11337 2c84dea3-7e68-4137-9b89-c4e89433aadc
File:
1 edited

Legend:

Unmodified
Added
Removed
  • Singular/extra.cc

    ra3771a r3e96095  
    22*  Computer Algebra System SINGULAR      *
    33*****************************************/
    4 /* $Id: extra.cc,v 1.286 2008-12-17 15:10:37 Singular Exp $ */
     4/* $Id: extra.cc,v 1.287 2009-01-29 10:12:19 monerjan Exp $ */
    55/*
    66* ABSTRACT: general interface to internals of Singular ("system" command)
     
    30623062              */
    30633063
    3064 
    3065 #endif
     3064#endif
     3065
     3066/*======== GFAN ==============*/
     3067if (strcmp(sys_cmd,"gfan")==0)
     3068{
     3069        if ((h==NULL) or (h!=NULL and h->Typ()!=IDEAL_CMD)){
     3070                Werror("system(\"gfan\"...) Ideal expected");
     3071                return TRUE; //Ooooops
     3072        }
     3073ideal myideal=((ideal)h->Data());
     3074printf("Addr: %l\n",*myideal);
     3075//printf(myideal.next());
     3076       
     3077return FALSE; //Everything went fine   
     3078}
     3079else
     3080
     3081
    30663082/*==================== Error =================*/
    30673083      Werror( "system(\"%s\",...) %s", sys_cmd, feNotImplemented );
     
    30693085  return TRUE;
    30703086}
     3087
    30713088#endif // HAVE_EXTENDED_SYSTEM
    30723089
     3090
Note: See TracChangeset for help on using the changeset viewer.