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

Changes for replacing default.dctsdr by all ascii files

Browse Source
This commit is contained in:
Marty Kraimer
1995-11-29 14:38:52 +00:00
parent 8d8f5754a1
commit fb6f4ce704
41 changed files with 5522 additions and 119 deletions
Download Patch File Download Diff File Expand all files Collapse all files

6
src/dev/devEventSoft.c
View File

@@ -79,10 +79,8 @@ static long init_record(pevent)
/* event.inp must be a CONSTANT or a PV_LINK or a DB_LINK or a CA_LINK*/
switch (pevent->inp.type) {
case (CONSTANT) :
if(pevent->inp.value.value!=0.0 && pevent->val == 0.0){
pevent->val=pevent->inp.value.value;
}
pevent->udf= FALSE;
if(recGblInitConstantLink(&pevent->inp,DBF_USHORT,&pevent->val))
pevent->udf = FALSE;
break;
case (PV_LINK) :
status = dbCaAddInlink(&(pevent->inp), (void *) pevent, "VAL");