{-# LINE 1 "src/Lua/Constants.hsc" #-}
{-# LANGUAGE PatternSynonyms #-}
module Lua.Constants
(
pattern LUA_VERSION
, pattern LUA_RELEASE
, pattern LUA_COPYRIGHT
, pattern LUA_MULTRET
, pattern LUA_REGISTRYINDEX
, pattern LUA_TNONE
, pattern LUA_TNIL
, pattern LUA_TBOOLEAN
, pattern LUA_TLIGHTUSERDATA
, pattern LUA_TNUMBER
, pattern LUA_TSTRING
, pattern LUA_TTABLE
, pattern LUA_TFUNCTION
, pattern LUA_TUSERDATA
, pattern LUA_TTHREAD
, pattern LUA_OK
, pattern LUA_YIELD
, pattern LUA_ERRRUN
, pattern LUA_ERRSYNTAX
, pattern LUA_ERRMEM
, pattern LUA_ERRERR
, pattern LUA_ERRFILE
, pattern LUA_OPEQ
, pattern LUA_OPLT
, pattern LUA_OPLE
, pattern LUA_OPADD
, pattern LUA_OPSUB
, pattern LUA_OPMUL
, pattern LUA_OPDIV
, pattern LUA_OPIDIV
, pattern LUA_OPMOD
, pattern LUA_OPPOW
, pattern LUA_OPUNM
, pattern LUA_OPBNOT
, pattern LUA_OPBAND
, pattern LUA_OPBOR
, pattern LUA_OPBXOR
, pattern LUA_OPSHL
, pattern LUA_OPSHR
, pattern LUA_GCSTOP
, pattern LUA_GCRESTART
, pattern LUA_GCCOLLECT
, pattern LUA_GCCOUNT
, pattern LUA_GCCOUNTB
, pattern LUA_GCSTEP
, pattern LUA_GCSETPAUSE
, pattern LUA_GCSETSTEPMUL
, pattern LUA_GCISRUNNING
, pattern LUA_GCGEN
, pattern LUA_GCINC
, pattern LUA_REFNIL
, pattern LUA_NOREF
, pattern TRUE
, pattern FALSE
) where
import Foreign.C (CInt (..))
import Lua.Types
pattern LUA_VERSION :: String
pattern LUA_RELEASE :: String
pattern LUA_COPYRIGHT :: String
{-# LINE 105 "src/Lua/Constants.hsc" #-}
pattern $mLUA_RELEASE :: forall {r}. String -> ((# #) -> r) -> ((# #) -> r) -> r
$bLUA_RELEASE :: String
LUA_RELEASE = "Lua 5.4.6"
{-# LINE 106 "src/Lua/Constants.hsc" #-}
pattern LUA_VERSION = "Lua 5.4"
{-# LINE 107 "src/Lua/Constants.hsc" #-}
pattern LUA_COPYRIGHT = "Lua 5.4.6 Copyright (C) 1994-2023 Lua.org, PUC-Rio"
{-# LINE 108 "src/Lua/Constants.hsc" #-}
{-# LINE 109 "src/Lua/Constants.hsc" #-}
pattern LUA_MULTRET :: NumResults
pattern $mLUA_MULTRET :: forall {r}. NumResults -> ((# #) -> r) -> ((# #) -> r) -> r
$bLUA_MULTRET :: NumResults
LUA_MULTRET = NumResults (-1)
{-# LINE 117 "src/Lua/Constants.hsc" #-}
pattern LUA_REGISTRYINDEX :: StackIndex
pattern $mLUA_REGISTRYINDEX :: forall {r}. StackIndex -> ((# #) -> r) -> ((# #) -> r) -> r
$bLUA_REGISTRYINDEX :: StackIndex
LUA_REGISTRYINDEX = StackIndex (-1001000)
{-# LINE 121 "src/Lua/Constants.hsc" #-}
pattern LUA_TNONE :: TypeCode
pattern $mLUA_TNONE :: forall {r}. TypeCode -> ((# #) -> r) -> ((# #) -> r) -> r
$bLUA_TNONE :: TypeCode
LUA_TNONE = TypeCode (-1)
{-# LINE 128 "src/Lua/Constants.hsc" #-}
pattern LUA_TNIL :: TypeCode
pattern $mLUA_TNIL :: forall {r}. TypeCode -> ((# #) -> r) -> ((# #) -> r) -> r
$bLUA_TNIL :: TypeCode
LUA_TNIL = TypeCode (0)
{-# LINE 132 "src/Lua/Constants.hsc" #-}
pattern LUA_TBOOLEAN :: TypeCode
pattern $mLUA_TBOOLEAN :: forall {r}. TypeCode -> ((# #) -> r) -> ((# #) -> r) -> r
$bLUA_TBOOLEAN :: TypeCode
LUA_TBOOLEAN = TypeCode (1)
{-# LINE 136 "src/Lua/Constants.hsc" #-}
pattern LUA_TLIGHTUSERDATA :: TypeCode
pattern $mLUA_TLIGHTUSERDATA :: forall {r}. TypeCode -> ((# #) -> r) -> ((# #) -> r) -> r
$bLUA_TLIGHTUSERDATA :: TypeCode
LUA_TLIGHTUSERDATA = TypeCode (2)
{-# LINE 140 "src/Lua/Constants.hsc" #-}
pattern LUA_TNUMBER :: TypeCode
pattern $mLUA_TNUMBER :: forall {r}. TypeCode -> ((# #) -> r) -> ((# #) -> r) -> r
$bLUA_TNUMBER :: TypeCode
LUA_TNUMBER = TypeCode (3)
{-# LINE 144 "src/Lua/Constants.hsc" #-}
pattern LUA_TSTRING :: TypeCode
pattern $mLUA_TSTRING :: forall {r}. TypeCode -> ((# #) -> r) -> ((# #) -> r) -> r
$bLUA_TSTRING :: TypeCode
LUA_TSTRING = TypeCode (4)
{-# LINE 148 "src/Lua/Constants.hsc" #-}
pattern LUA_TTABLE :: TypeCode
pattern $mLUA_TTABLE :: forall {r}. TypeCode -> ((# #) -> r) -> ((# #) -> r) -> r
$bLUA_TTABLE :: TypeCode
LUA_TTABLE = TypeCode (5)
{-# LINE 152 "src/Lua/Constants.hsc" #-}
pattern LUA_TFUNCTION :: TypeCode
pattern $mLUA_TFUNCTION :: forall {r}. TypeCode -> ((# #) -> r) -> ((# #) -> r) -> r
$bLUA_TFUNCTION :: TypeCode
LUA_TFUNCTION = TypeCode (6)
{-# LINE 156 "src/Lua/Constants.hsc" #-}
pattern LUA_TUSERDATA :: TypeCode
pattern $mLUA_TUSERDATA :: forall {r}. TypeCode -> ((# #) -> r) -> ((# #) -> r) -> r
$bLUA_TUSERDATA :: TypeCode
LUA_TUSERDATA = TypeCode (7)
{-# LINE 160 "src/Lua/Constants.hsc" #-}
pattern LUA_TTHREAD :: TypeCode
pattern $mLUA_TTHREAD :: forall {r}. TypeCode -> ((# #) -> r) -> ((# #) -> r) -> r
$bLUA_TTHREAD :: TypeCode
LUA_TTHREAD = TypeCode (8)
{-# LINE 164 "src/Lua/Constants.hsc" #-}
pattern LUA_OK :: StatusCode
pattern $mLUA_OK :: forall {r}. StatusCode -> ((# #) -> r) -> ((# #) -> r) -> r
$bLUA_OK :: StatusCode
LUA_OK = StatusCode 0
{-# LINE 172 "src/Lua/Constants.hsc" #-}
pattern LUA_YIELD :: StatusCode
pattern $mLUA_YIELD :: forall {r}. StatusCode -> ((# #) -> r) -> ((# #) -> r) -> r
$bLUA_YIELD :: StatusCode
LUA_YIELD = StatusCode 1
{-# LINE 176 "src/Lua/Constants.hsc" #-}
pattern LUA_ERRRUN :: StatusCode
pattern $mLUA_ERRRUN :: forall {r}. StatusCode -> ((# #) -> r) -> ((# #) -> r) -> r
$bLUA_ERRRUN :: StatusCode
LUA_ERRRUN = StatusCode 2
{-# LINE 180 "src/Lua/Constants.hsc" #-}
pattern LUA_ERRSYNTAX :: StatusCode
pattern $mLUA_ERRSYNTAX :: forall {r}. StatusCode -> ((# #) -> r) -> ((# #) -> r) -> r
$bLUA_ERRSYNTAX :: StatusCode
LUA_ERRSYNTAX = StatusCode 3
{-# LINE 184 "src/Lua/Constants.hsc" #-}
pattern LUA_ERRMEM :: StatusCode
pattern $mLUA_ERRMEM :: forall {r}. StatusCode -> ((# #) -> r) -> ((# #) -> r) -> r
$bLUA_ERRMEM :: StatusCode
LUA_ERRMEM = StatusCode 4
{-# LINE 189 "src/Lua/Constants.hsc" #-}
pattern LUA_ERRERR :: StatusCode
pattern $mLUA_ERRERR :: forall {r}. StatusCode -> ((# #) -> r) -> ((# #) -> r) -> r
$bLUA_ERRERR :: StatusCode
LUA_ERRERR = StatusCode 5
{-# LINE 193 "src/Lua/Constants.hsc" #-}
pattern LUA_ERRFILE :: StatusCode
pattern $mLUA_ERRFILE :: forall {r}. StatusCode -> ((# #) -> r) -> ((# #) -> r) -> r
$bLUA_ERRFILE :: StatusCode
LUA_ERRFILE = StatusCode 6
{-# LINE 197 "src/Lua/Constants.hsc" #-}
pattern LUA_OPEQ :: OPCode
pattern $mLUA_OPEQ :: forall {r}. OPCode -> ((# #) -> r) -> ((# #) -> r) -> r
$bLUA_OPEQ :: OPCode
LUA_OPEQ = OPCode 0
{-# LINE 205 "src/Lua/Constants.hsc" #-}
pattern LUA_OPLT :: OPCode
pattern $mLUA_OPLT :: forall {r}. OPCode -> ((# #) -> r) -> ((# #) -> r) -> r
$bLUA_OPLT :: OPCode
LUA_OPLT = OPCode 1
{-# LINE 209 "src/Lua/Constants.hsc" #-}
pattern LUA_OPLE :: OPCode
pattern $mLUA_OPLE :: forall {r}. OPCode -> ((# #) -> r) -> ((# #) -> r) -> r
$bLUA_OPLE :: OPCode
LUA_OPLE = OPCode 2
{-# LINE 213 "src/Lua/Constants.hsc" #-}
pattern LUA_OPADD :: ArithOPCode
pattern $mLUA_OPADD :: forall {r}. ArithOPCode -> ((# #) -> r) -> ((# #) -> r) -> r
$bLUA_OPADD :: ArithOPCode
LUA_OPADD = ArithOPCode 0
{-# LINE 221 "src/Lua/Constants.hsc" #-}
pattern LUA_OPSUB :: ArithOPCode
pattern $mLUA_OPSUB :: forall {r}. ArithOPCode -> ((# #) -> r) -> ((# #) -> r) -> r
$bLUA_OPSUB :: ArithOPCode
LUA_OPSUB = ArithOPCode 1
{-# LINE 225 "src/Lua/Constants.hsc" #-}
pattern LUA_OPMUL :: ArithOPCode
pattern $mLUA_OPMUL :: forall {r}. ArithOPCode -> ((# #) -> r) -> ((# #) -> r) -> r
$bLUA_OPMUL :: ArithOPCode
LUA_OPMUL = ArithOPCode 2
{-# LINE 229 "src/Lua/Constants.hsc" #-}
pattern LUA_OPDIV :: ArithOPCode
pattern $mLUA_OPDIV :: forall {r}. ArithOPCode -> ((# #) -> r) -> ((# #) -> r) -> r
$bLUA_OPDIV :: ArithOPCode
LUA_OPDIV = ArithOPCode 5
{-# LINE 233 "src/Lua/Constants.hsc" #-}
pattern LUA_OPIDIV :: ArithOPCode
pattern $mLUA_OPIDIV :: forall {r}. ArithOPCode -> ((# #) -> r) -> ((# #) -> r) -> r
$bLUA_OPIDIV :: ArithOPCode
LUA_OPIDIV = ArithOPCode 6
{-# LINE 237 "src/Lua/Constants.hsc" #-}
pattern LUA_OPMOD :: ArithOPCode
pattern $mLUA_OPMOD :: forall {r}. ArithOPCode -> ((# #) -> r) -> ((# #) -> r) -> r
$bLUA_OPMOD :: ArithOPCode
LUA_OPMOD = ArithOPCode 3
{-# LINE 241 "src/Lua/Constants.hsc" #-}
pattern LUA_OPPOW :: ArithOPCode
pattern $mLUA_OPPOW :: forall {r}. ArithOPCode -> ((# #) -> r) -> ((# #) -> r) -> r
$bLUA_OPPOW :: ArithOPCode
LUA_OPPOW = ArithOPCode 4
{-# LINE 245 "src/Lua/Constants.hsc" #-}
pattern LUA_OPUNM :: ArithOPCode
pattern $mLUA_OPUNM :: forall {r}. ArithOPCode -> ((# #) -> r) -> ((# #) -> r) -> r
$bLUA_OPUNM :: ArithOPCode
LUA_OPUNM = ArithOPCode 12
{-# LINE 249 "src/Lua/Constants.hsc" #-}
pattern LUA_OPBNOT :: ArithOPCode
pattern $mLUA_OPBNOT :: forall {r}. ArithOPCode -> ((# #) -> r) -> ((# #) -> r) -> r
$bLUA_OPBNOT :: ArithOPCode
LUA_OPBNOT = ArithOPCode 13
{-# LINE 253 "src/Lua/Constants.hsc" #-}
pattern LUA_OPBAND :: ArithOPCode
pattern $mLUA_OPBAND :: forall {r}. ArithOPCode -> ((# #) -> r) -> ((# #) -> r) -> r
$bLUA_OPBAND :: ArithOPCode
LUA_OPBAND = ArithOPCode 7
{-# LINE 257 "src/Lua/Constants.hsc" #-}
pattern LUA_OPBOR :: ArithOPCode
pattern $mLUA_OPBOR :: forall {r}. ArithOPCode -> ((# #) -> r) -> ((# #) -> r) -> r
$bLUA_OPBOR :: ArithOPCode
LUA_OPBOR = ArithOPCode 8
{-# LINE 261 "src/Lua/Constants.hsc" #-}
pattern LUA_OPBXOR :: ArithOPCode
pattern $mLUA_OPBXOR :: forall {r}. ArithOPCode -> ((# #) -> r) -> ((# #) -> r) -> r
$bLUA_OPBXOR :: ArithOPCode
LUA_OPBXOR = ArithOPCode 9
{-# LINE 265 "src/Lua/Constants.hsc" #-}
pattern LUA_OPSHL :: ArithOPCode
pattern $mLUA_OPSHL :: forall {r}. ArithOPCode -> ((# #) -> r) -> ((# #) -> r) -> r
$bLUA_OPSHL :: ArithOPCode
LUA_OPSHL = ArithOPCode 10
{-# LINE 269 "src/Lua/Constants.hsc" #-}
pattern LUA_OPSHR :: ArithOPCode
pattern $mLUA_OPSHR :: forall {r}. ArithOPCode -> ((# #) -> r) -> ((# #) -> r) -> r
$bLUA_OPSHR :: ArithOPCode
LUA_OPSHR = ArithOPCode 11
{-# LINE 273 "src/Lua/Constants.hsc" #-}
pattern LUA_GCSTOP :: GCCode
pattern $mLUA_GCSTOP :: forall {r}. GCCode -> ((# #) -> r) -> ((# #) -> r) -> r
$bLUA_GCSTOP :: GCCode
LUA_GCSTOP = GCCode 0
{-# LINE 281 "src/Lua/Constants.hsc" #-}
pattern LUA_GCRESTART :: GCCode
pattern $mLUA_GCRESTART :: forall {r}. GCCode -> ((# #) -> r) -> ((# #) -> r) -> r
$bLUA_GCRESTART :: GCCode
LUA_GCRESTART = GCCode 1
{-# LINE 285 "src/Lua/Constants.hsc" #-}
pattern LUA_GCCOLLECT :: GCCode
pattern $mLUA_GCCOLLECT :: forall {r}. GCCode -> ((# #) -> r) -> ((# #) -> r) -> r
$bLUA_GCCOLLECT :: GCCode
LUA_GCCOLLECT = GCCode 2
{-# LINE 289 "src/Lua/Constants.hsc" #-}
pattern LUA_GCCOUNT :: GCCode
pattern $mLUA_GCCOUNT :: forall {r}. GCCode -> ((# #) -> r) -> ((# #) -> r) -> r
$bLUA_GCCOUNT :: GCCode
LUA_GCCOUNT = GCCode 3
{-# LINE 293 "src/Lua/Constants.hsc" #-}
pattern LUA_GCCOUNTB :: GCCode
pattern $mLUA_GCCOUNTB :: forall {r}. GCCode -> ((# #) -> r) -> ((# #) -> r) -> r
$bLUA_GCCOUNTB :: GCCode
LUA_GCCOUNTB = GCCode 4
{-# LINE 298 "src/Lua/Constants.hsc" #-}
pattern LUA_GCSTEP :: GCCode
pattern $mLUA_GCSTEP :: forall {r}. GCCode -> ((# #) -> r) -> ((# #) -> r) -> r
$bLUA_GCSTEP :: GCCode
LUA_GCSTEP = GCCode 5
{-# LINE 302 "src/Lua/Constants.hsc" #-}
pattern LUA_GCSETPAUSE :: GCCode
pattern $mLUA_GCSETPAUSE :: forall {r}. GCCode -> ((# #) -> r) -> ((# #) -> r) -> r
$bLUA_GCSETPAUSE :: GCCode
LUA_GCSETPAUSE = GCCode 6
{-# LINE 307 "src/Lua/Constants.hsc" #-}
pattern LUA_GCSETSTEPMUL :: GCCode
pattern $mLUA_GCSETSTEPMUL :: forall {r}. GCCode -> ((# #) -> r) -> ((# #) -> r) -> r
$bLUA_GCSETSTEPMUL :: GCCode
LUA_GCSETSTEPMUL = GCCode 7
{-# LINE 312 "src/Lua/Constants.hsc" #-}
pattern LUA_GCISRUNNING :: GCCode
pattern $mLUA_GCISRUNNING :: forall {r}. GCCode -> ((# #) -> r) -> ((# #) -> r) -> r
$bLUA_GCISRUNNING :: GCCode
LUA_GCISRUNNING = GCCode 9
{-# LINE 317 "src/Lua/Constants.hsc" #-}
pattern LUA_GCGEN :: GCCode
pattern $mLUA_GCGEN :: forall {r}. GCCode -> ((# #) -> r) -> ((# #) -> r) -> r
$bLUA_GCGEN :: GCCode
LUA_GCGEN = GCCode 10
{-# LINE 321 "src/Lua/Constants.hsc" #-}
pattern LUA_GCINC :: GCCode
pattern $mLUA_GCINC :: forall {r}. GCCode -> ((# #) -> r) -> ((# #) -> r) -> r
$bLUA_GCINC :: GCCode
LUA_GCINC = GCCode 11
{-# LINE 325 "src/Lua/Constants.hsc" #-}
pattern LUA_REFNIL :: CInt
pattern $mLUA_REFNIL :: forall {r}. CInt -> ((# #) -> r) -> ((# #) -> r) -> r
$bLUA_REFNIL :: CInt
LUA_REFNIL = -2
{-# LINE 333 "src/Lua/Constants.hsc" #-}
pattern LUA_NOREF :: CInt
pattern $mLUA_NOREF :: forall {r}. CInt -> ((# #) -> r) -> ((# #) -> r) -> r
$bLUA_NOREF :: CInt
LUA_NOREF = -2
{-# LINE 337 "src/Lua/Constants.hsc" #-}
pattern TRUE :: LuaBool
pattern $mTRUE :: forall {r}. LuaBool -> ((# #) -> r) -> ((# #) -> r) -> r
$bTRUE :: LuaBool
TRUE = LuaBool 1
pattern FALSE :: LuaBool
pattern $mFALSE :: forall {r}. LuaBool -> ((# #) -> r) -> ((# #) -> r) -> r
$bFALSE :: LuaBool
FALSE = LuaBool 0