Changeset 2ff076 in git


Ignore:
Timestamp:
Nov 15, 2007, 12:35:29 PM (16 years ago)
Author:
Hans Schönemann <hannes@…>
Branches:
(u'spielwiese', '82fc009ea2b0098c1a4896c841bb70860976bdfc')
Children:
ab53b7f5d4f5db6f032491a4967a38010025cc29
Parents:
80ba2c7876b58d2594e2c750cee2f15e8a69c4f9
Message:
*hannes: max nest for x86_Linux:564


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

Legend:

Unmodified
Added
Removed
  • Singular/iplib.cc

    r80ba2c7 r2ff076  
    22*  Computer Algebra System SINGULAR     *
    33****************************************/
    4 /* $Id: iplib.cc,v 1.122 2006-09-27 17:46:11 Singular Exp $ */
     4/* $Id: iplib.cc,v 1.123 2007-11-15 11:35:29 Singular Exp $ */
    55/*
    66* ABSTRACT: interpreter: LIB and help
     
    2323#include "ipshell.h"
    2424#include "lists.h"
     25
     26#if SIZEOF_LONG == 8
     27#define SI_MAX_NEST 500
     28#else
     29#define SI_MAX_NEST 1000
     30#endif
    2531
    2632#ifdef HAVE_DYNAMIC_LOADING
     
    291297BOOLEAN iiPStart(idhdl pn, sleftv  * v)
    292298{
    293   char * str;
    294299  BOOLEAN err=FALSE;
    295300  int old_echo=si_echo;
     
    330335  /* start interpreter ======================================*/
    331336  myynest++;
    332   if (myynest > 1000)
    333   {
    334     WerrorS("nesting too deep (>1000)");
     337  if (myynest > SI_MAX_NEST)
     338  {
     339    WerrorS("nesting too deep");
    335340    err=TRUE;
    336341  }
Note: See TracChangeset for help on using the changeset viewer.