Changeset ff4ad677 in tol


Ignore:
Timestamp:
Jun 24, 2010, 1:46:41 PM (16 years ago)
Author:
Víctor de Buen <vdebuen@…>
Branches:
1941-docker-image-to-test, devel, master
Children:
7e5625d
Parents:
18106d99
Message:

Refs #921
Using new method CheckNonDeclarativeAction

git-svn-id: ​https://www.tol-project.org/svn/tolp/trunk@2315 be4846ae-f051-483a-831f-b64e7d08527f

File:
1 edited

Legend:

Unmodified
Added
Removed
  • tol/btol/real_type/datgrav.cpp

    r18106d99 rff4ad677  
    431431//--------------------------------------------------------------------
    432432{
     433  if(CheckNonDeclarativeAction("PutSerDat")) { return; }
    433434  BUserTimeSerie& ser = *Tsr(Arg(1));
    434435  BDate           dte = Date(Arg(2));
    … …  
    652653//--------------------------------------------------------------------
    653654{
     655  if(CheckNonDeclarativeAction("System")) { return; }
    654656  contens_ = (BReal)BSys::System(Text(Arg(1)));
    655657}
    … …  
    677679//--------------------------------------------------------------------
    678680{
     681  if(CheckNonDeclarativeAction("ShellExecute")) { return; }
    679682  contens_ = (BInt)ShellExecute
    680683  (
    … …  
    720723//--------------------------------------------------------------------
    721724{
     725  if(CheckNonDeclarativeAction("WinSystem")) { return; }
    722726  const BText& command = Text(Arg(1));
    723727  int    show    = int(Real(Arg(2)));
    … …  
    740744//--------------------------------------------------------------------
    741745{
     746  if(CheckNonDeclarativeAction("ChildProcess")) { return; }
    742747  contens_ = (BReal)BSys::ChildProcess(Text(Arg(1)));
    743748}
    … …  
    10371042//--------------------------------------------------------------------
    10381043{
     1044  if(CheckNonDeclarativeAction("FileDelete")) { return; }
    10391045  const BText& file = Text(Arg(1));
    10401046  contens_ = BSys::Remove(file);
    … …  
    10531059//--------------------------------------------------------------------
    10541060{
     1061  if(CheckNonDeclarativeAction("FileRename")) { return; }
    10551062  const BText& oldFile = Text(Arg(1));
    10561063  const BText& newFile = Text(Arg(2));
    … …  
    10791086//--------------------------------------------------------------------
    10801087{
     1088  if(CheckNonDeclarativeAction("FileCat")) { return; }
    10811089  const BSet& origin = Set(Arg(1));
    10821090  const BText& target = Text(Arg(2));
    … …  
    11131121//--------------------------------------------------------------------
    11141122{
     1123  if(CheckNonDeclarativeAction("MkDir")) { return; }
    11151124  const BText& dir = Text(Arg(1));
    11161125  contens_  = BSys::MkDir(dir,true);
    … …  
    12071216//--------------------------------------------------------------------
    12081217{
     1218  if(CheckNonDeclarativeAction("PutMatDat")) { return; }
    12091219  BUserMat* uM = (BUserMat*)(Arg(1));
    12101220  BInt i  = (BInt)Real(Arg(2))-1;
    … …  
    14161426//--------------------------------------------------------------------
    14171427{
     1428  if(CheckNonDeclarativeAction("PutCoef")) { return; }
    14181429  BPol& P    = Pol(Arg(1));
    14191430  BInt  deg  = (BInt)Real(Arg(2));
    … …  
    25512562//--------------------------------------------------------------------
    25522563{
     2564  if(CheckNonDeclarativeAction("WinRmtSystem")) { return; }
    25532565  const BChar* serverName = Text(Arg(1)).String();
    25542566  const BInt   port       = (BInt)Real(Arg(2));
    … …  
    25862598//--------------------------------------------------------------------
    25872599{   
     2600  if(CheckNonDeclarativeAction("WinRmtKill")) { return; }
    25882601    contens_ = WinRmtKill(Text(Arg(1)).String(),
    25892602                          (BInt)Real(Arg(2)),
    … …  
    26182631//--------------------------------------------------------------------
    26192632{   
     2633  if(CheckNonDeclarativeAction("WinRmtProcessAlive")) { return; }
    26202634    contens_ = WinRmtProcessAlive(Text(Arg(1)).String(),
    26212635                                  (BInt)Real(Arg(2)),
Note: See TracChangeset for help on using the changeset viewer.