source/libs/luajit/LuaJIT-src/src/lj_strscan.h

   1 /*
   2 ** String scanning.
   3 ** Copyright (C) 2005-2015 Mike Pall. See Copyright Notice in luajit.h
   4 */
   5
   6 #ifndef _LJ_STRSCAN_H
   7 #define _LJ_STRSCAN_H
   8
   9 #include "lj_obj.h"
  10
  11 /* Options for accepted/returned formats. */
  12 #define STRSCAN_OPT_TOINT       0x01  /* Convert to int32_t, if possible. */
  13 #define STRSCAN_OPT_TONUM       0x02  /* Always convert to double. */
  14 #define STRSCAN_OPT_IMAG        0x04
  15 #define STRSCAN_OPT_LL          0x08
  16 #define STRSCAN_OPT_C           0x10
  17
  18 /* Returned format. */
  19 typedef enum {
  20   STRSCAN_ERROR,
  21   STRSCAN_NUM, STRSCAN_IMAG,
  22   STRSCAN_INT, STRSCAN_U32, STRSCAN_I64, STRSCAN_U64,
  23 } StrScanFmt;
  24
  25 LJ_FUNC StrScanFmt lj_strscan_scan(const uint8_t *p, TValue *o, uint32_t opt);
  26 LJ_FUNC int LJ_FASTCALL lj_strscan_num(GCstr *str, TValue *o);
  27 #if LJ_DUALNUM
  28 LJ_FUNC int LJ_FASTCALL lj_strscan_number(GCstr *str, TValue *o);
  29 #else
  30 #define lj_strscan_number(s, o)         lj_strscan_num((s), (o))
  31 #endif
  32
  33 /* Check for number or convert string to number/int in-place (!). */
  34 static LJ_AINLINE int lj_strscan_numberobj(TValue *o)
  35 {
  36   return tvisnumber(o) || (tvisstr(o) && lj_strscan_number(strV(o), o));
  37 }
  38
  39 #endif