Fossil

Differences From Artifact [dc374dad64]:

• File extsrc/pikchr.c — part of check-in [9e8c47381e] at 2021-12-25 14:39:42 on branch code-movement — Part three of code relocation. All 3rd-party/upstream source files in src/ have been moved to extsrc/. It is very likely that Makefile.msc requires fixing, and a 100% certainty that Makefile.PellesCGMake needed fixing. (user: stephan size: 277823) [more...]
• File src/pikchr.c — part of check-in [400d061151] at 2021-12-24 12:49:23 on branch trunk — Update the built-in pikchr formatter to the latest version. (user: drh size: 277823)

To Artifact [8abbc4a080]:

• File extsrc/pikchr.c — part of check-in [b80ae0215e] at 2022-03-28 13:39:31 on branch trunk — Bug fix to the abs() function of pikchr. (user: drh size: 277823) [more...]

6643
6644
6645
6646
6647
6648
6649
6650
6651
6652
6653
6654
6655
6656
6657

}

/* Compute one of the built-in functions
*/
static PNum pik_func(Pik *p, PToken *pFunc, PNum x, PNum y){
  PNum v = 0.0;
  switch( pFunc->eCode ){
    case FN_ABS:  v = v<0.0 ? -v : v;  break;
    case FN_COS:  v = cos(x);          break;
    case FN_INT:  v = rint(x);         break;
    case FN_SIN:  v = sin(x);          break;
    case FN_SQRT:
      if( x<0.0 ){
        pik_error(p, pFunc, "sqrt of negative value");
        v = 0.0;

|

6643
6644
6645
6646
6647
6648
6649
6650
6651
6652
6653
6654
6655
6656
6657

}

/* Compute one of the built-in functions
*/
static PNum pik_func(Pik *p, PToken *pFunc, PNum x, PNum y){
  PNum v = 0.0;
  switch( pFunc->eCode ){
    case FN_ABS:  v = x<0.0 ? -x : x;  break;
    case FN_COS:  v = cos(x);          break;
    case FN_INT:  v = rint(x);         break;
    case FN_SIN:  v = sin(x);          break;
    case FN_SQRT:
      if( x<0.0 ){
        pik_error(p, pFunc, "sqrt of negative value");
        v = 0.0;