- Fixes for FOCUS 2D
- Mapped fileeval to exe manager - Updates for TRICS file formats SKIPPED: psi/libpsi.a psi/sinqhmdriv.c psi/sinqhttp.c psi/tabledrive.c psi/tasscan.c psi/hardsup/asynsrv_utility.c psi/hardsup/sinqhm.c
This commit is contained in:
10
lin2ang.c
10
lin2ang.c
@ -70,7 +70,7 @@
|
||||
return 0;
|
||||
|
||||
fprintf(fd,"%s length %f\n",name, self->length);
|
||||
fprintf(fd,"%s zero %f\n",name, self->zero);
|
||||
fprintf(fd,"%s softzero %f\n",name, self->zero);
|
||||
return 1;
|
||||
|
||||
}
|
||||
@ -275,20 +275,20 @@
|
||||
}
|
||||
}
|
||||
/* zero point */
|
||||
if(strcmp(argv[1],"zero") == 0)
|
||||
if(strcmp(argv[1],"softzero") == 0)
|
||||
{
|
||||
if(argc >= 3)
|
||||
{
|
||||
iRet = Tcl_GetDouble(pSics->pTcl,argv[2],&dVal);
|
||||
if(iRet != TCL_OK)
|
||||
{
|
||||
SCWrite(pCon,"ERROR: zero parameter not recognised as number",
|
||||
SCWrite(pCon,"ERROR: softzero parameter not recognised as number",
|
||||
eError);
|
||||
return 0;
|
||||
}
|
||||
if(!SCMatchRights(pCon,usUser))
|
||||
{
|
||||
SCWrite(pCon,"ERROR: Insufficient privilege to change zero point",
|
||||
SCWrite(pCon,"ERROR: Insufficient privilege to change softzero point",
|
||||
eError);
|
||||
return 0;
|
||||
}
|
||||
@ -298,7 +298,7 @@
|
||||
}
|
||||
else
|
||||
{
|
||||
sprintf(pBueffel,"%s.zero = %f",argv[0],self->zero);
|
||||
sprintf(pBueffel,"%s.softzero = %f",argv[0],self->zero);
|
||||
SCWrite(pCon,pBueffel,eValue);
|
||||
return 1;
|
||||
}
|
||||
|
Reference in New Issue
Block a user