** Decode one UTF-8 sequence, returning NULL if byte sequence is ** invalid. The array 'limits' stores the minimum value for each ** sequence length,

** Traverse a list making all its elements white and clearing their ** age. */

return i1 + i2 */

=========================================================================== * Flush the bits in the bit buffer to pending output (leaves at most 7 bi

zlib & jpeg huffman tables assume that the output symbols can either be arbitrarily arranged, or have monotonically increasing frequencies--they rely

** Add integer part of 'x' to buffer and return new 'x' */

========================================================================= */

Advances the begin iterator to ``it``. */

///////////////////////////////////////////////////////////////////////////

** returns the index for 'k' if 'k' is an appropriate key to live in ** the array part of a table, 0 otherwise. */

** Auxiliary function to create the iteration function for 'lines'. ** The iteration function is a closure over 'io_readline', with ** the following u

** Resumes a coroutine. Returns the number of results for non-error ** cases or -1 for errors. */

** t[k] = value at the top of the stack (where 'k' is a string) */

** get (if 'get' is true) or set an upvalue from a closure */

=========================================================================== * Flush the bit buffer, keeping at most 7 bits in it. */

=========================================================================== * Reverse the first len bits of a code, using straightforward code (a fas

=========================================================================== * Flush the bit buffer and align the output on a byte boundary */

** call all pending finalizers */

** If possible, shrink string table. */

** Check that 'arg' either is a table or can behave like one (that is, ** has a metatable with the required metamethods) */

///////////////////////////////////////////////////////////////////////////

** clear entries with unmarked keys from all weaktables in list 'l' */

** Code arithmetic operators ('+', '-', ...). If second operand is a ** constant in the proper range, use variant opcodes with K operands. */

** Emit an "extra argument" instruction (format 'iAx') */

** Emit code for order comparisons. When using an immediate operand, ** 'isfloat' tells whether the original value was a float. */

** reads the first character of file 'f' and skips an optional BOM mark ** in its beginning plus its first line if it starts with '#'. Returns ** tr