/[svn]/linuxsampler/trunk/src/scriptvm/CoreVMFunctions.cpp
ViewVC logotype

Diff of /linuxsampler/trunk/src/scriptvm/CoreVMFunctions.cpp

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 2727 by schoenebeck, Tue Mar 31 17:46:11 2015 UTC revision 2945 by schoenebeck, Thu Jul 14 00:22:26 2016 UTC
# Line 142  VMFnResult* CoreVMFunction_num_elements: Line 142  VMFnResult* CoreVMFunction_num_elements:
142      return successResult( args->arg(0)->asIntArray()->arraySize() );      return successResult( args->arg(0)->asIntArray()->arraySize() );
143  }  }
144    
145    ///////////////////////////////////////////////////////////////////////////
146    // built-in script function:  inc()
147    
148    VMFnResult* CoreVMFunction_inc::exec(VMFnArgs* args) {
149        VMExpr* arg = args->arg(0);
150        VMIntExpr* in = dynamic_cast<VMIntExpr*>(arg);
151        VMVariable* out = dynamic_cast<VMVariable*>(arg);
152        if (!in || !out) successResult(0);
153        int i = in->evalInt() + 1;
154        IntLiteral tmp(i);
155        out->assignExpr(&tmp);
156        return successResult(i);
157    }
158    
159    ///////////////////////////////////////////////////////////////////////////
160    // built-in script function:  dec()
161    
162    VMFnResult* CoreVMFunction_dec::exec(VMFnArgs* args) {
163        VMExpr* arg = args->arg(0);
164        VMIntExpr* in = dynamic_cast<VMIntExpr*>(arg);
165        VMVariable* out = dynamic_cast<VMVariable*>(arg);
166        if (!in || !out) successResult(0);
167        int i = in->evalInt() - 1;
168        IntLiteral tmp(i);
169        out->assignExpr(&tmp);
170        return successResult(i);
171    }
172    
173  } // namespace LinuxSampler  } // namespace LinuxSampler
Legend:
Removed from v.2727  
changed lines
  Added in v.2945
  ViewVC Help
Powered by ViewVC