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

Allow hex and octal constants for constant links

Browse Source
This commit is contained in:
Marty Kraimer
2001-07-23 14:39:40 +00:00
parent 3031016853
commit 018f0b5186
1 changed files with 6 additions and 6 deletions
Download Patch File Download Diff File Expand all files Collapse all files

12
src/db/recGbl.c
View File

@@ -226,7 +226,7 @@ int epicsShareAPI recGblInitConstantLink(
short value;
char *pvalue = (char *)pdest;
sscanf(plink->value.constantStr,"%hd",&value);
sscanf(plink->value.constantStr,"%hi",&value);
*pvalue = value;
}
break;
@@ -234,24 +234,24 @@ int epicsShareAPI recGblInitConstantLink(
unsigned short value;
unsigned char *pvalue = (unsigned char *)pdest;
sscanf(plink->value.constantStr,"%hu",&value);
sscanf(plink->value.constantStr,"%hi",&value);
*pvalue = value;
}
break;
case DBF_SHORT :
sscanf(plink->value.constantStr,"%hd",(short *)pdest);
sscanf(plink->value.constantStr,"%hi",(short *)pdest);
break;
case DBF_USHORT :
case DBF_ENUM :
case DBF_MENU :
case DBF_DEVICE :
sscanf(plink->value.constantStr,"%hu",(unsigned short *)pdest);
sscanf(plink->value.constantStr,"%hi",(unsigned short *)pdest);
break;
case DBF_LONG :
sscanf(plink->value.constantStr,"%ld",(long *)pdest);
sscanf(plink->value.constantStr,"%li",(long *)pdest);
break;
case DBF_ULONG :
sscanf(plink->value.constantStr,"%lu",(unsigned long *)pdest);
sscanf(plink->value.constantStr,"%li",(unsigned long *)pdest);
break;
case DBF_FLOAT :
sscanf(plink->value.constantStr,"%f",(float *)pdest);