Update of /cvsroot/easycalc/easycalc/mlib
In directory sc8-pr-cvs17:/tmp/cvs-serv11318
Modified Files:
funcs.c
Log Message:
Add missing #ifdef SPECFUN_ENABLED to make EasyCalc compile and link for the
small version.
Index: funcs.c
===================================================================
RCS file: /cvsroot/easycalc/easycalc/mlib/funcs.c,v
retrieving revision 1.52
retrieving revision 1.53
diff -C2 -d -r1.52 -r1.53
*** funcs.c 31 May 2007 00:03:37 -0000 1.52
--- funcs.c 7 Sep 2007 18:15:18 -0000 1.53
***************
*** 245,249 ****
err = stack_add_val(tstack,&row,integer);
err = stack_add_val(tstack,&col,integer);
!
if(!err){
if(tmp.type==list)
--- 245,249 ----
err = stack_add_val(tstack,&row,integer);
err = stack_add_val(tstack,&col,integer);
! #ifdef SPECFUN_ENABLED
if(!err){
if(tmp.type==list)
***************
*** 254,257 ****
--- 254,258 ----
err = cmatrix_item(func,tstack);
}
+ #endif
if(!err)
*dest = stack_pop(tstack);
***************
*** 474,478 ****
else if(row==col){
err = stack_get_val(tstack,&lst->item[col-1],complex);
! }else{
List *lst2;
err = stack_get_val(tstack,&lst2,list);
--- 475,481 ----
else if(row==col){
err = stack_get_val(tstack,&lst->item[col-1],complex);
! }
! #ifdef SPECFUN_ENABLED
! else{
List *lst2;
err = stack_get_val(tstack,&lst2,list);
***************
*** 488,491 ****
--- 491,495 ----
}
}
+ #endif
if (!err)
db_write_variable(item2.u.litemval.name,tmp);
***************
*** 496,499 ****
--- 500,504 ----
else if(col && row)
err = stack_get_val(tstack,&MATRIX(m,row-1,col-1),real);
+ #ifdef SPECFUN_ENABLED
else{
List *lst;
***************
*** 521,524 ****
--- 526,530 ----
}
}
+ #endif
if (!err)
db_write_variable(item2.u.litemval.name,tmp);
***************
*** 529,532 ****
--- 535,539 ----
else if(col && row)
err = stack_get_val(tstack,&MATRIX(m,row-1,col-1),complex);
+ #ifdef SPECFUN_ENABLED
else{
List *lst;
***************
*** 548,551 ****
--- 555,559 ----
}
}
+ #endif
if (!err)
db_write_variable(item2.u.litemval.name,tmp);
|
