b42a145824
Adds tests to ensure that a record's special() routine can return an error status that gets fed back to the client from both before and after special() calls. This was broken from 3.15 through 7.0.5 inclusive.
51 lines
862 B
Plaintext
51 lines
862 B
Plaintext
|
|
record(x, "recempty") {
|
|
# empty string is the same "0" for numeric fields
|
|
field(DTYP, "")
|
|
field(DESC, "")
|
|
field(PHAS, "")
|
|
field(TSE , "")
|
|
field(DISA, "")
|
|
field(DISV, "")
|
|
}
|
|
|
|
record(x, "recoverwrite") {
|
|
# first with non-default values
|
|
field(DTYP, "Scan I/O")
|
|
field(DESC, "hello")
|
|
field(PHAS, "2")
|
|
field(TSE , "5")
|
|
field(DISA, "6")
|
|
field(DISV, "7")
|
|
}
|
|
|
|
record(x, "recoverwrite") {
|
|
# now restore default values
|
|
field(DTYP, "")
|
|
field(DESC, "")
|
|
field(PHAS, "")
|
|
field(TSE , "")
|
|
field(TSEL, "")
|
|
field(DISA, "")
|
|
field(DISV, "")
|
|
}
|
|
|
|
record(x, "recmax") {
|
|
field(DISA, "0xffffffff")
|
|
}
|
|
|
|
record(x, "lnktarget") {}
|
|
|
|
record(x, "lnktest") {
|
|
field(INP, "lnktarget NPP NMS")
|
|
}
|
|
|
|
record(arr, "arr") {
|
|
field(FTVL, "ULONG")
|
|
field(NELM, "10")
|
|
}
|
|
|
|
record(x, "recmeta") {}
|
|
|
|
record(x, "special") {}
|