Changeset e514ee in git


Ignore:
Timestamp:
Nov 24, 1999, 6:09:39 PM (25 years ago)
Author:
Hans Schönemann <hannes@…>
Branches:
(u'fieker-DuVal', '117eb8c30fc9e991c4decca4832b1d19036c4c65')(u'spielwiese', '45e267b9942dec9429fe249ce3e5e44ab80a6a3a')
Children:
5d32fdb9ecb9fff4978a30bd8fb80b5e9fcdb7b0
Parents:
17b9209be23f46743b20ed712fa0ce186bc1a6ae
Message:
* hannes; moved breakpoint from extra.cc to iparith.cc (new command breakpoint)


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

Legend:

Unmodified
Added
Removed
  • Singular/extra.cc

    r17b920 re514ee  
    22*  Computer Algebra System SINGULAR      *
    33*****************************************/
    4 /* $Id: extra.cc,v 1.118 1999-11-19 16:42:39 obachman Exp $ */
     4/* $Id: extra.cc,v 1.119 1999-11-24 17:09:34 Singular Exp $ */
    55/*
    66* ABSTRACT: general interface to internals of Singular ("system" command)
     
    10031003    else
    10041004#endif
    1005 /*==================== sdb-debugger =================*/
    1006     if (strcmp(sys_cmd, "breakpoint") == 0)
    1007     {
    1008       if (h==NULL)
    1009       {
    1010        sdb_show_bp();
    1011        return FALSE;
    1012       }
    1013       else if (h->Typ()==PROC_CMD)
    1014       {
    1015         int lineno=0;
    1016         if ((h->next!=NULL) && (h->next->Typ()==INT_CMD))
    1017         {
    1018           lineno=(int)h->next->Data();
    1019         }
    1020         return sdb_set_breakpoint(h->Name(),lineno);
    1021       }
    1022       else
    1023       {
    1024         WerrorS("system(\"breakpoint\",`proc`[,`int`]) expected");
    1025         return TRUE;
    1026       }
    1027     }
    1028     else
    10291005/*==================== sdb_flags =================*/
    10301006    if (strcmp(sys_cmd, "sdb_flags") == 0)
  • Singular/iparith.cc

    r17b920 re514ee  
    22*  Computer Algebra System SINGULAR     *
    33****************************************/
    4 /* $Id: iparith.cc,v 1.189 1999-11-24 14:07:22 obachman Exp $ */
     4/* $Id: iparith.cc,v 1.190 1999-11-24 17:09:35 Singular Exp $ */
    55
    66/*
     
    2121#include "mmemory.h"
    2222#include "febase.h"
     23#include "sdb.h"
    2324#include "longalg.h"
    2425#include "polys.h"
     
    130131  { "betti",       0, BETTI_CMD ,         CMD_12},
    131132  { "break",       0, BREAK_CMD ,         BREAK_CMD},
     133  { "breakpoint",  0, BREAKPOINT_CMD ,    CMD_M},
    132134  { "char",        0, CHARACTERISTIC_CMD ,CMD_1},
    133135  { "char_series", 0, CHAR_SERIES_CMD ,   CMD_1},
     
    43664368};
    43674369/*=================== operations with many arg.: static proc =================*/
     4370static BOOLEAN jjBREAK0(leftv res, leftv v)
     4371{
     4372  sdb_show_bp();
     4373  return FALSE;
     4374}
     4375static BOOLEAN jjBREAK1(leftv res, leftv v)
     4376{
     4377  if(v->Typ()==PROC_CMD)
     4378  {
     4379    int lineno=0;
     4380    if((v->next!=NULL) && (v->next->Typ()==INT_CMD))
     4381    {
     4382      lineno=(int)v->next->Data();
     4383    }
     4384    return sdb_set_breakpoint(v->Name(),lineno);
     4385  }
     4386  return TRUE;
     4387}
    43684388static BOOLEAN jjCALL1ARG(leftv res, leftv v)
    43694389{
     
    48774897// proc         cmd               res            number_of_args
    48784898 {jjKLAMMER_PL,  '(',           ANY_TYPE,           -2  }
     4899,{jjBREAK0,    BREAKPOINT_CMD,  NONE,               0  }
     4900,{jjBREAK1,    BREAKPOINT_CMD,  NONE,               -2  }
    48794901,{jjCALL2ARG,  COEF_CMD,        MATRIX_CMD,         2  }
    48804902,{jjCOEF_M,    COEF_CMD,        NONE,               4  }
  • Singular/tok.h

    r17b920 re514ee  
    77* ABSTRACT: tokens, types for interpreter; general macros
    88*/
    9 /* $Id: tok.h,v 1.30 1999-11-24 14:02:47 wichmann Exp $ */
     9/* $Id: tok.h,v 1.31 1999-11-24 17:09:36 Singular Exp $ */
    1010
    1111#ifndef MYYSTYPE
     
    4646  ATTRIB_CMD,
    4747  BAREISS_CMD,
     48  BREAKPOINT_CMD,
    4849  CHARACTERISTIC_CMD,
    4950  CHARSTR_CMD,
Note: See TracChangeset for help on using the changeset viewer.