lua/lctype.c

/*
** $Id: lctype.c,v 1.12.1.1 2017/04/19 17:20:42 roberto Exp $
** 'ctype' functions for Lua
** See Copyright Notice in lua.h
*/

#define lctype_c
#define LUA_CORE

#include "lprefix.h"


#include "lctype.h"

#if !LUA_USE_CTYPE	/* { */

#include <limits.h>

LUAI_DDEF const lu_byte luai_ctype_[UCHAR_MAX + 2] = {
  0x00,  /* EOZ */
  0x00,  0x00,  0x00,  0x00,  0x00,  0x00,  0x00,  0x00,	/* 0. */
  0x00,  0x08,  0x08,  0x08,  0x08,  0x08,  0x00,  0x00,
  0x00,  0x00,  0x00,  0x00,  0x00,  0x00,  0x00,  0x00,	/* 1. */
  0x00,  0x00,  0x00,  0x00,  0x00,  0x00,  0x00,  0x00,
  0x0c,  0x04,  0x04,  0x04,  0x04,  0x04,  0x04,  0x04,	/* 2. */
  0x04,  0x04,  0x04,  0x04,  0x04,  0x04,  0x04,  0x04,
  0x16,  0x16,  0x16,  0x16,  0x16,  0x16,  0x16,  0x16,	/* 3. */
  0x16,  0x16,  0x04,  0x04,  0x04,  0x04,  0x04,  0x04,
  0x04,  0x15,  0x15,  0x15,  0x15,  0x15,  0x15,  0x05,	/* 4. */
  0x05,  0x05,  0x05,  0x05,  0x05,  0x05,  0x05,  0x05,
  0x05,  0x05,  0x05,  0x05,  0x05,  0x05,  0x05,  0x05,	/* 5. */
  0x05,  0x05,  0x05,  0x04,  0x04,  0x04,  0x04,  0x05,
  0x04,  0x15,  0x15,  0x15,  0x15,  0x15,  0x15,  0x05,	/* 6. */
  0x05,  0x05,  0x05,  0x05,  0x05,  0x05,  0x05,  0x05,
  0x05,  0x05,  0x05,  0x05,  0x05,  0x05,  0x05,  0x05,	/* 7. */
  0x05,  0x05,  0x05,  0x04,  0x04,  0x04,  0x04,  0x00,
  0x00,  0x00,  0x00,  0x00,  0x00,  0x00,  0x00,  0x00,	/* 8. */
  0x00,  0x00,  0x00,  0x00,  0x00,  0x00,  0x00,  0x00,
  0x00,  0x00,  0x00,  0x00,  0x00,  0x00,  0x00,  0x00,	/* 9. */
  0x00,  0x00,  0x00,  0x00,  0x00,  0x00,  0x00,  0x00,
  0x00,  0x00,  0x00,  0x00,  0x00,  0x00,  0x00,  0x00,	/* a. */
  0x00,  0x00,  0x00,  0x00,  0x00,  0x00,  0x00,  0x00,
  0x00,  0x00,  0x00,  0x00,  0x00,  0x00,  0x00,  0x00,	/* b. */
  0x00,  0x00,  0x00,  0x00,  0x00,  0x00,  0x00,  0x00,
  0x00,  0x00,  0x00,  0x00,  0x00,  0x00,  0x00,  0x00,	/* c. */
  0x00,  0x00,  0x00,  0x00,  0x00,  0x00,  0x00,  0x00,
  0x00,  0x00,  0x00,  0x00,  0x00,  0x00,  0x00,  0x00,	/* d. */
  0x00,  0x00,  0x00,  0x00,  0x00,  0x00,  0x00,  0x00,
  0x00,  0x00,  0x00,  0x00,  0x00,  0x00,  0x00,  0x00,	/* e. */
  0x00,  0x00,  0x00,  0x00,  0x00,  0x00,  0x00,  0x00,
  0x00,  0x00,  0x00,  0x00,  0x00,  0x00,  0x00,  0x00,	/* f. */
  0x00,  0x00,  0x00,  0x00,  0x00,  0x00,  0x00,  0x00,
};

#endif			/* } */
"homemade" version of ctype.h 2009-02-19 20:18:25 +03:00			`/*`
Lua 5.3.5 ported to git This is the first commit for the branch Lua 5.3. All source files were copied from the official distribution of 5.3.5 in the Lua site. The test files are the same of 5.3.4. The manual came from the previous RCS repository, revision 1.167.1.2. 2018-12-17 19:46:37 +03:00			`** $Id: lctype.c,v 1.12.1.1 2017/04/19 17:20:42 roberto Exp $`
"homemade" version of ctype.h 2009-02-19 20:18:25 +03:00			`** 'ctype' functions for Lua`
			`** See Copyright Notice in lua.h`
			`*/`

missing 'LUA_CORE' definition 2011-10-03 20:19:23 +04:00			`#define lctype_c`
			`#define LUA_CORE`

added include for 'lprefix.h', for stuff that must be added before any other header file 2014-11-02 22:19:04 +03:00			`#include "lprefix.h"`


"homemade" version of ctype.h 2009-02-19 20:18:25 +03:00			`#include "lctype.h"`

resort to standard C ctype for non-ASCII systems 2011-06-24 16:25:33 +04:00			`#if !LUA_USE_CTYPE /* { */`

			`#include <limits.h>`

new macros 'LUAI_DDEC'/'LUAI_DDEF' to better control declarations and definitions of non-static variables 2009-11-19 22:06:52 +03:00			`LUAI_DDEF const lu_byte luai_ctype_[UCHAR_MAX + 2] = {`
small bug: EOZ is a valid character to be tested 2009-03-26 21:53:52 +03:00			`0x00, /* EOZ */`
macro 'ltoupper' instead of 'lisupper' (more usefull for Lua) 2011-06-23 20:01:06 +04:00			`0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, /* 0. */`
"homemade" version of ctype.h 2009-02-19 20:18:25 +03:00			`0x00, 0x08, 0x08, 0x08, 0x08, 0x08, 0x00, 0x00,`
macro 'ltoupper' instead of 'lisupper' (more usefull for Lua) 2011-06-23 20:01:06 +04:00			`0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, /* 1. */`
"homemade" version of ctype.h 2009-02-19 20:18:25 +03:00			`0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00,`
macro 'ltoupper' instead of 'lisupper' (more usefull for Lua) 2011-06-23 20:01:06 +04:00			`0x0c, 0x04, 0x04, 0x04, 0x04, 0x04, 0x04, 0x04, /* 2. */`
"homemade" version of ctype.h 2009-02-19 20:18:25 +03:00			`0x04, 0x04, 0x04, 0x04, 0x04, 0x04, 0x04, 0x04,`
macro 'ltoupper' instead of 'lisupper' (more usefull for Lua) 2011-06-23 20:01:06 +04:00			`0x16, 0x16, 0x16, 0x16, 0x16, 0x16, 0x16, 0x16, /* 3. */`
added macro 'lisxdigit' (just in case :) 2009-03-10 20:42:33 +03:00			`0x16, 0x16, 0x04, 0x04, 0x04, 0x04, 0x04, 0x04,`
macro 'ltoupper' instead of 'lisupper' (more usefull for Lua) 2011-06-23 20:01:06 +04:00			`0x04, 0x15, 0x15, 0x15, 0x15, 0x15, 0x15, 0x05, /* 4. */`
"homemade" version of ctype.h 2009-02-19 20:18:25 +03:00			`0x05, 0x05, 0x05, 0x05, 0x05, 0x05, 0x05, 0x05,`
macro 'ltoupper' instead of 'lisupper' (more usefull for Lua) 2011-06-23 20:01:06 +04:00			`0x05, 0x05, 0x05, 0x05, 0x05, 0x05, 0x05, 0x05, /* 5. */`
			`0x05, 0x05, 0x05, 0x04, 0x04, 0x04, 0x04, 0x05,`
			`0x04, 0x15, 0x15, 0x15, 0x15, 0x15, 0x15, 0x05, /* 6. */`
"homemade" version of ctype.h 2009-02-19 20:18:25 +03:00			`0x05, 0x05, 0x05, 0x05, 0x05, 0x05, 0x05, 0x05,`
macro 'ltoupper' instead of 'lisupper' (more usefull for Lua) 2011-06-23 20:01:06 +04:00			`0x05, 0x05, 0x05, 0x05, 0x05, 0x05, 0x05, 0x05, /* 7. */`
"homemade" version of ctype.h 2009-02-19 20:18:25 +03:00			`0x05, 0x05, 0x05, 0x04, 0x04, 0x04, 0x04, 0x00,`
macro 'ltoupper' instead of 'lisupper' (more usefull for Lua) 2011-06-23 20:01:06 +04:00			`0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, /* 8. */`
"homemade" version of ctype.h 2009-02-19 20:18:25 +03:00			`0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00,`
macro 'ltoupper' instead of 'lisupper' (more usefull for Lua) 2011-06-23 20:01:06 +04:00			`0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, /* 9. */`
"homemade" version of ctype.h 2009-02-19 20:18:25 +03:00			`0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00,`
macro 'ltoupper' instead of 'lisupper' (more usefull for Lua) 2011-06-23 20:01:06 +04:00			`0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, /* a. */`
"homemade" version of ctype.h 2009-02-19 20:18:25 +03:00			`0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00,`
macro 'ltoupper' instead of 'lisupper' (more usefull for Lua) 2011-06-23 20:01:06 +04:00			`0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, /* b. */`
"homemade" version of ctype.h 2009-02-19 20:18:25 +03:00			`0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00,`
macro 'ltoupper' instead of 'lisupper' (more usefull for Lua) 2011-06-23 20:01:06 +04:00			`0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, /* c. */`
"homemade" version of ctype.h 2009-02-19 20:18:25 +03:00			`0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00,`
macro 'ltoupper' instead of 'lisupper' (more usefull for Lua) 2011-06-23 20:01:06 +04:00			`0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, /* d. */`
"homemade" version of ctype.h 2009-02-19 20:18:25 +03:00			`0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00,`
macro 'ltoupper' instead of 'lisupper' (more usefull for Lua) 2011-06-23 20:01:06 +04:00			`0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, /* e. */`
"homemade" version of ctype.h 2009-02-19 20:18:25 +03:00			`0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00,`
macro 'ltoupper' instead of 'lisupper' (more usefull for Lua) 2011-06-23 20:01:06 +04:00			`0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, /* f. */`
new property 'lisupper' (needed to compute values for hexa digits) 2009-05-18 21:15:14 +04:00			`0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00,`
"homemade" version of ctype.h 2009-02-19 20:18:25 +03:00			`};`
resort to standard C ctype for non-ASCII systems 2011-06-24 16:25:33 +04:00
			`#endif /* } */`