Convert devI64inSoft for Link Support
Includes tests to make sure it actually works
This commit is contained in:
@@ -165,6 +165,13 @@ static void testArrayInputs()
|
||||
testdbPutFieldOk("sa2.VAL", DBF_LONG, 1);
|
||||
testdbGetArrFieldEqual("sa2.VAL", DBF_LONG, 10, 1, &oneToTwelve[0]);
|
||||
|
||||
testDiag("testScalarInputs");
|
||||
|
||||
testdbGetFieldEqual("li1", DBR_LONG, 1);
|
||||
testdbGetFieldEqual("i64i1", DBR_LONG, 1);
|
||||
testdbGetFieldEqual("li2", DBR_LONG, 1);
|
||||
testdbGetFieldEqual("i64i2", DBR_INT64, 1);
|
||||
|
||||
testIocShutdownOk();
|
||||
testdbCleanup();
|
||||
}
|
||||
@@ -206,7 +213,7 @@ static void testEventRecord()
|
||||
|
||||
MAIN(linkInitTest)
|
||||
{
|
||||
testPlan(68);
|
||||
testPlan(72);
|
||||
|
||||
testLongStringInit();
|
||||
testCalcInit();
|
||||
|
||||
@@ -64,6 +64,19 @@ record(waveform, "wf2") {
|
||||
field(INP, {const:[1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12]})
|
||||
}
|
||||
|
||||
record(longin, "li1") {
|
||||
field(INP, 1)
|
||||
}
|
||||
record(int64in, "i64i1") {
|
||||
field(INP, 1)
|
||||
}
|
||||
record(longin, "li2") {
|
||||
field(INP, {const:1})
|
||||
}
|
||||
record(int64in, "i64i2") {
|
||||
field(INP, {const:1})
|
||||
}
|
||||
|
||||
record(longin, "count1" ) {
|
||||
field(INP, {calc: {expr:"VAL+1"}})
|
||||
field(SCAN, "Event")
|
||||
|
||||
Reference in New Issue
Block a user