epics/pcas
0
0
Fork 0
Code Issues Pull Requests Projects Wiki Activity

Changes for udf and other problems discovered while looking at udf

Browse Source
This commit is contained in:
Marty Kraimer
1996-10-31 22:24:14 +00:00
parent a160ebf5ba
commit 179c9f6df0
34 changed files with 382 additions and 670 deletions
Download Patch File Download Diff File Expand all files Collapse all files

18
src/dev/devHistogramSoft.c
View File

@@ -1,7 +1,5 @@
/* devHistogramSoft.c */
/* base/src/dev $Id$ */
/* devHistogramSoft.c - Device Support Routines for soft Histogram Input */
/*
* Author: Janet Anderson
* Date: 07/02/91
@@ -34,14 +32,10 @@
* .03 03-13-92 jba ANSI C changes
* ...
*/
#include <vxWorks.h>
#include <types.h>
#include <stdioLib.h>
#include <string.h>
#include <alarm.h>
#include <cvtTable.h>
#include <dbDefs.h>
@@ -50,7 +44,6 @@
#include <devSup.h>
#include <link.h>
#include <histogramRecord.h>
/* Create the dset for devHistogramSoft */
static long init_record();
static long read_histogram();
@@ -69,9 +62,9 @@ struct {
init_record,
NULL,
read_histogram,
NULL};
NULL
};
static long init_record(phistogram)
struct histogramRecord *phistogram;
{
@@ -80,8 +73,8 @@ static long init_record(phistogram)
/* histogram.svl must be a CONSTANT or a PV_LINK or a DB_LINK or a CA_LINK*/
switch (phistogram->svl.type) {
case (CONSTANT) :
if(recGblInitConstantLink(&phistogram->svl,DBF_DOUBLE,&phistogram->sgnl))
phistogram->udf = FALSE;
if(recGblInitConstantLink(&phistogram->svl,DBF_DOUBLE,&phistogram->sgnl))
phistogram->udf = FALSE;
break;
case (PV_LINK) :
case (DB_LINK) :
@@ -94,13 +87,12 @@ static long init_record(phistogram)
}
return(status);
}
static long read_histogram(phistogram)
struct histogramRecord *phistogram;
{
long status;
status = dbGetLink(&phistogram->svl,DBR_DOUBLE, &phistogram->sgnl,0,0);
return(0); /*add count*/
}