Raises an error in a callback using a customized message with ErrorRaiseMessage
ID: 39
using uCalcSoftware;
var uc = new uCalc();
static void RaiseErrorMessageCallback(uCalc.Callback cb) {
if (cb.Arg(1) == 123) {
cb.Error.Raise("I do not like this value!");
cb.Return(cb.Arg(1));
}
}
uc.DefineFunction("ErrRaiseMsgTest(Value)", RaiseErrorMessageCallback);
Console.WriteLine(uc.EvalStr("ErrRaiseMsgTest(111)"));
Console.WriteLine(uc.EvalStr("ErrRaiseMsgTest(123)"));
111
I do not like this value! using uCalcSoftware; var uc = new uCalc(); static void RaiseErrorMessageCallback(uCalc.Callback cb) { if (cb.Arg(1) == 123) { cb.Error.Raise("I do not like this value!"); cb.Return(cb.Arg(1)); } } uc.DefineFunction("ErrRaiseMsgTest(Value)", RaiseErrorMessageCallback); Console.WriteLine(uc.EvalStr("ErrRaiseMsgTest(111)")); Console.WriteLine(uc.EvalStr("ErrRaiseMsgTest(123)"));
#include
#include "uCalc.h"
using namespace std;
using namespace uCalcSoftware;
void ucalc_call RaiseErrorMessageCallback(uCalcBase::Callback cb) {
if (cb.Arg(1) == 123) {
cb.Error().Raise("I do not like this value!");
cb.Return(cb.Arg(1));
}
}
int main() {
uCalc uc;
uc.DefineFunction("ErrRaiseMsgTest(Value)", RaiseErrorMessageCallback);
cout << uc.EvalStr("ErrRaiseMsgTest(111)") << endl;
cout << uc.EvalStr("ErrRaiseMsgTest(123)") << endl;
}
111
I do not like this value! #include <iostream> #include "uCalc.h" using namespace std; using namespace uCalcSoftware; void ucalc_call RaiseErrorMessageCallback(uCalcBase::Callback cb) { if (cb.Arg(1) == 123) { cb.Error().Raise("I do not like this value!"); cb.Return(cb.Arg(1)); } } int main() { uCalc uc; uc.DefineFunction("ErrRaiseMsgTest(Value)", RaiseErrorMessageCallback); cout << uc.EvalStr("ErrRaiseMsgTest(111)") << endl; cout << uc.EvalStr("ErrRaiseMsgTest(123)") << endl; }
Imports System
Imports uCalcSoftware
Public Module Program
Public Sub RaiseErrorMessageCallback(ByVal cb As uCalc.Callback)
If cb.Arg(1) = 123 Then
cb.Error.Raise("I do not like this value!")
cb.Return(cb.Arg(1))
End If
End Sub
Public Sub Main()
Dim uc As New uCalc()
uc.DefineFunction("ErrRaiseMsgTest(Value)", AddressOf RaiseErrorMessageCallback)
Console.WriteLine(uc.EvalStr("ErrRaiseMsgTest(111)"))
Console.WriteLine(uc.EvalStr("ErrRaiseMsgTest(123)"))
End Sub
End Module
111
I do not like this value! Imports System Imports uCalcSoftware Public Module Program Public Sub RaiseErrorMessageCallback(ByVal cb As uCalc.Callback) If cb.Arg(1) = 123 Then cb.Error.Raise("I do not like this value!") cb.Return(cb.Arg(1)) End If End Sub Public Sub Main() Dim uc As New uCalc() uc.DefineFunction("ErrRaiseMsgTest(Value)", AddressOf RaiseErrorMessageCallback) Console.WriteLine(uc.EvalStr("ErrRaiseMsgTest(111)")) Console.WriteLine(uc.EvalStr("ErrRaiseMsgTest(123)")) End Sub End Module