- 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:
11
ubcalc.c
11
ubcalc.c
@ -541,6 +541,7 @@ static int cellFromUBWrapper(pUBCALC self, SConnection *pCon){
|
||||
int UBCalcWrapper(SConnection *pCon, SicsInterp *pSics, void *pData,
|
||||
int argc, char *argv[]){
|
||||
pUBCALC self = (pUBCALC)pData;
|
||||
char pBuffer[512];
|
||||
|
||||
assert(self);
|
||||
if(argc < 2){
|
||||
@ -550,7 +551,15 @@ int UBCalcWrapper(SConnection *pCon, SicsInterp *pSics, void *pData,
|
||||
strtolower(argv[1]);
|
||||
|
||||
if(strcmp(argv[1],"cell") == 0){
|
||||
return readCell(pCon, self, argc, argv);
|
||||
if(argc > 3){
|
||||
return readCell(pCon, self, argc, argv);
|
||||
} else {
|
||||
snprintf(pBuffer,511,"ubcalc cell = %f %f %f %f %f %f",
|
||||
self->direct.a, self->direct.b, self->direct.c,
|
||||
self->direct.alpha, self->direct.beta,self->direct.gamma);
|
||||
SCWrite(pCon,pBuffer,eValue);
|
||||
return 1;
|
||||
}
|
||||
} else if(strcmp(argv[1],"ref1") == 0){
|
||||
return readReflection(pCon,pSics, &self->r1,argc,argv);
|
||||
} else if(strcmp(argv[1],"ref2") ==0){
|
||||
|
Reference in New Issue
Block a user