Fossil

Differences From Artifact [a61699134b]:

• File src/th.c — part of check-in [8d627980aa] at 2014-04-04 10:57:40 on branch trunk — Code simplification. No change in functionality. (user: jan.nijtmans size: 78496)

To Artifact [8cff636730]:

• File src/th.c — part of check-in [0f3ed70be4] at 2014-04-04 11:01:08 on branch trunk — unused variable (user: jan.nijtmans size: 78477)

1877
1878
1879
1880
1881
1882
1883
1884
1885
1886
1887
1888
1889
1890
1891

static int thNextInteger(
  Th_Interp *interp,
  const char *zInput,
  int nInput,
  int *pnLiteral
){
  int i;
  int seenDot = 0;
  int (*isdigit)(char) = th_isdigit;
  char c;

  if( nInput<3) return TH_ERROR;
  assert(zInput[0]=='0');
  c = zInput[1];
  if( c>='A' && c<='Z' ) c += 'a' - 'A';

<

1877
1878
1879
1880
1881
1882
1883

1884
1885
1886
1887
1888
1889
1890

static int thNextInteger(
  Th_Interp *interp,
  const char *zInput,
  int nInput,
  int *pnLiteral
){
  int i;

  int (*isdigit)(char) = th_isdigit;
  char c;

  if( nInput<3) return TH_ERROR;
  assert(zInput[0]=='0');
  c = zInput[1];
  if( c>='A' && c<='Z' ) c += 'a' - 'A';