epics/epics-base
0
0
Fork 0
Code Issues Pull Requests Projects Wiki Activity

fix aSub with constant input links

Browse Source
This commit is contained in:
Michael Davidsaver
2022-08-08 11:19:56 -07:00
parent f0369058bb
commit d47fa4caa4
2 changed files with 23 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files
modules/database/test/std/rec/regressTest.c
+19 -1
View File
@@ -76,6 +76,8 @@ void testArrayLength1(void)
/*
* https://bugs.launchpad.net/epics-base/+bug/1699445 and 1887981
*
* also https://github.com/epics-base/epics-base/issues/284
*/
static
void testHexConstantLinks(void)
@@ -94,6 +96,22 @@ void testHexConstantLinks(void)
testdbGetFieldEqual("as1.G", DBR_LONG, 0x10);
testdbGetFieldEqual("as1.H", DBR_LONG, 0x10);
testdbPutFieldOk("ai1.PROC", DBR_LONG, 1);
testdbPutFieldOk("li1.PROC", DBR_LONG, 1);
testdbPutFieldOk("as1.PROC", DBR_LONG, 1);
testdbGetFieldEqual("ai1", DBR_LONG, 0x10);
testdbGetFieldEqual("li1", DBR_LONG, 0x10);
testdbGetFieldEqual("mi1", DBR_LONG, 0x10);
testdbGetFieldEqual("as1.A", DBR_LONG, 0x10);
testdbGetFieldEqual("as1.B", DBR_LONG, 0x10);
testdbGetFieldEqual("as1.C", DBR_LONG, 0x10);
testdbGetFieldEqual("as1.D", DBR_LONG, 0x10);
testdbGetFieldEqual("as1.E", DBR_LONG, 0x10);
testdbGetFieldEqual("as1.F", DBR_LONG, 0x10);
testdbGetFieldEqual("as1.G", DBR_LONG, 0x10);
testdbGetFieldEqual("as1.H", DBR_LONG, 0x10);
testIocShutdownOk();
testdbCleanup();
}
@@ -210,7 +228,7 @@ void testLinkSevr(void)
MAIN(regressTest)
{
testPlan(54);
testPlan(68);
testArrayLength1();
testHexConstantLinks();
testLinkMS();