Returning a string (from a callback)
ID: 15
using uCalcSoftware;
var uc = new uCalc();
static void TwiceStr(uCalc.Callback cb) {
cb.ReturnStr(cb.ArgStr(1) + cb.ArgStr(1));
}
uc.DefineFunction("Twice(Txt As String) As String", TwiceStr);
Console.WriteLine(uc.EvalStr("Twice('Bye')"));
ByeBye using uCalcSoftware; var uc = new uCalc(); static void TwiceStr(uCalc.Callback cb) { cb.ReturnStr(cb.ArgStr(1) + cb.ArgStr(1)); } uc.DefineFunction("Twice(Txt As String) As String", TwiceStr); Console.WriteLine(uc.EvalStr("Twice('Bye')"));
#include
#include "uCalc.h"
using namespace std;
using namespace uCalcSoftware;
void ucalc_call TwiceStr(uCalcBase::Callback cb) {
cb.ReturnStr(cb.ArgStr(1) + cb.ArgStr(1));
}
int main() {
uCalc uc;
uc.DefineFunction("Twice(Txt As String) As String", TwiceStr);
cout << uc.EvalStr("Twice('Bye')") << endl;
}
ByeBye #include <iostream> #include "uCalc.h" using namespace std; using namespace uCalcSoftware; void ucalc_call TwiceStr(uCalcBase::Callback cb) { cb.ReturnStr(cb.ArgStr(1) + cb.ArgStr(1)); } int main() { uCalc uc; uc.DefineFunction("Twice(Txt As String) As String", TwiceStr); cout << uc.EvalStr("Twice('Bye')") << endl; }
Imports System
Imports uCalcSoftware
Public Module Program
Public Sub TwiceStr(ByVal cb As uCalc.Callback)
cb.ReturnStr(cb.ArgStr(1) + cb.ArgStr(1))
End Sub
Public Sub Main()
Dim uc As New uCalc()
uc.DefineFunction("Twice(Txt As String) As String", AddressOf TwiceStr)
Console.WriteLine(uc.EvalStr("Twice('Bye')"))
End Sub
End Module
ByeBye Imports System Imports uCalcSoftware Public Module Program Public Sub TwiceStr(ByVal cb As uCalc.Callback) cb.ReturnStr(cb.ArgStr(1) + cb.ArgStr(1)) End Sub Public Sub Main() Dim uc As New uCalc() uc.DefineFunction("Twice(Txt As String) As String", AddressOf TwiceStr) Console.WriteLine(uc.EvalStr("Twice('Bye')")) End Sub End Module