Not logged in

Artifact 4e26e41fa117e19e8f0f9c932dc2d06de75db37f:

Wiki page [ProgrammingWithLuaAndC] by zester 2014-01-08 11:42:21.
0000: 44 20 32 30 31 34 2d 30 31 2d 30 38 54 31 31 3a  D 2014-01-08T11:
0010: 34 32 3a 32 31 2e 30 36 32 0a 4c 20 50 72 6f 67  42:21.062.L Prog
0020: 72 61 6d 6d 69 6e 67 57 69 74 68 4c 75 61 41 6e  rammingWithLuaAn
0030: 64 43 0a 50 20 64 39 66 65 65 62 35 31 30 65 35  dC.P d9feeb510e5
0040: 63 62 66 35 65 66 61 32 32 34 65 38 61 62 33 31  cbf5efa224e8ab31
0050: 31 37 62 36 36 65 30 30 38 30 31 64 39 0a 55 20  17b66e00801d9.U 
0060: 7a 65 73 74 65 72 0a 57 20 38 32 35 36 0a 3c 68  zester.W 8256.<h
0070: 32 3e 50 72 6f 67 72 61 6d 6d 69 6e 67 20 77 69  2>Programming wi
0080: 74 68 20 4c 75 61 20 61 6e 64 20 6f 72 20 43 3c  th Lua and or C<
0090: 2f 68 32 3e 0d 0a 0d 0a 3c 74 61 62 6c 65 20 62  /h2>....<table b
00a0: 6f 72 64 65 72 3d 22 30 22 20 77 69 64 74 68 3d  order="0" width=
00b0: 22 31 30 30 25 22 3e 0d 0a 3c 74 72 3e 0d 0a 20  "100%">..<tr>.. 
00c0: 20 0d 0a 3c 74 64 20 76 61 6c 69 67 6e 3d 22 74   ..<td valign="t
00d0: 6f 70 22 20 77 69 64 74 68 3d 22 33 30 30 70 78  op" width="300px
00e0: 22 3e 0d 0a 3c 64 6c 3e 0d 0a 0d 0a 3c 73 6d 61  ">..<dl>....<sma
00f0: 6c 6c 3e 0d 0a 3c 64 74 3e 3c 62 3e 31 2e 20 44  ll>..<dt><b>1. D
0100: 65 76 65 6c 6f 70 6d 65 6e 74 20 54 6f 6f 6c 73  evelopment Tools
0110: 3c 2f 62 3e 3c 2f 64 74 3e 0d 0a 3c 64 64 3e 31  </b></dt>..<dd>1
0120: 2e 31 20 49 6e 74 72 6f 64 75 63 74 69 6f 6e 3c  .1 Introduction<
0130: 2f 64 64 3e 0d 0a 3c 64 64 3e 3c 61 20 68 72 65  /dd>..<dd><a hre
0140: 66 3d 22 68 74 74 70 73 3a 2f 2f 63 68 69 73 65  f="https://chise
0150: 6c 61 70 70 2e 63 6f 6d 2f 75 73 65 72 2f 7a 65  lapp.com/user/ze
0160: 73 74 65 72 2f 72 65 70 6f 73 69 74 6f 72 79 2f  ster/repository/
0170: 48 79 64 72 61 2f 77 69 6b 69 3f 6e 61 6d 65 3d  Hydra/wiki?name=
0180: 50 72 6f 67 72 61 6d 6d 69 6e 67 57 69 74 68 4c  ProgrammingWithL
0190: 75 61 41 6e 64 43 22 3e 31 2e 32 20 50 72 6f 67  uaAndC">1.2 Prog
01a0: 72 61 6d 6d 69 6e 67 20 77 69 74 68 20 4c 75 61  ramming with Lua
01b0: 20 61 6e 64 20 6f 72 20 43 3c 2f 61 3e 3c 2f 64   and or C</a></d
01c0: 64 3e 0d 0a 3c 64 64 3e 3c 61 20 68 72 65 66 3d  d>..<dd><a href=
01d0: 22 68 74 74 70 73 3a 2f 2f 63 68 69 73 65 6c 61  "https://chisela
01e0: 70 70 2e 63 6f 6d 2f 75 73 65 72 2f 7a 65 73 74  pp.com/user/zest
01f0: 65 72 2f 72 65 70 6f 73 69 74 6f 72 79 2f 48 79  er/repository/Hy
0200: 64 72 61 2f 77 69 6b 69 3f 6e 61 6d 65 3d 57 6f  dra/wiki?name=Wo
0210: 72 6b 69 6e 67 57 69 74 68 50 72 65 6d 61 6b 65  rkingWithPremake
0220: 22 3e 31 2e 33 20 57 6f 72 6b 69 6e 67 20 77 69  ">1.3 Working wi
0230: 74 68 20 50 72 65 6d 61 6b 65 3c 2f 61 3e 3c 2f  th Premake</a></
0240: 64 64 3e 0d 0a 3c 64 64 3e 31 2e 34 20 42 6d 61  dd>..<dd>1.4 Bma
0250: 6b 65 3c 2f 64 64 3e 0d 0a 3c 64 64 3e 31 2e 35  ke</dd>..<dd>1.5
0260: 20 44 65 62 75 67 67 69 6e 67 3c 2f 64 64 3e 0d   Debugging</dd>.
0270: 0a 3c 64 64 3e 31 2e 36 20 55 73 69 6e 67 20 46  .<dd>1.6 Using F
0280: 6f 73 73 69 6c 20 28 44 56 43 53 29 3c 2f 64 64  ossil (DVCS)</dd
0290: 3e 0d 0a 3c 64 64 3e 31 2e 37 20 46 75 72 74 68  >..<dd>1.7 Furth
02a0: 65 72 20 52 65 61 64 69 6e 67 3c 2f 64 64 3e 0d  er Reading</dd>.
02b0: 0a 3c 2f 73 6d 61 6c 6c 3e 0d 0a 3c 2f 62 72 3e  .</small>..</br>
02c0: 0d 0a 0d 0a 3c 2f 64 6c 3e 0d 0a 3c 2f 74 64 3e  ....</dl>..</td>
02d0: 0d 0a 0d 0a 0d 0a 0d 0a 3c 74 64 20 76 61 6c 69  ........<td vali
02e0: 67 6e 3d 22 74 6f 70 22 3e 0d 0a 3c 68 33 3e 55  gn="top">..<h3>U
02f0: 73 69 6e 67 20 43 20 4c 69 62 72 61 72 79 27 73  sing C Library's
0300: 20 69 6e 20 50 75 72 65 20 4c 75 61 20 28 53 69   in Pure Lua (Si
0310: 6d 70 6c 65 29 3c 2f 68 33 3e 0d 0a 0d 0a 3c 70  mple)</h3>....<p
0320: 3e 4c 6f 72 65 6d 20 49 70 73 75 6d 20 69 73 20  >Lorem Ipsum is 
0330: 73 69 6d 70 6c 79 20 64 75 6d 6d 79 20 74 65 78  simply dummy tex
0340: 74 20 6f 66 20 74 68 65 20 70 72 69 6e 74 69 6e  t of the printin
0350: 67 20 61 6e 64 20 74 79 70 65 73 65 74 74 69 6e  g and typesettin
0360: 67 20 69 6e 64 75 73 74 72 79 2e 20 4c 6f 72 65  g industry. Lore
0370: 6d 20 49 70 73 75 6d 20 68 61 73 20 62 65 65 6e  m Ipsum has been
0380: 20 74 68 65 20 69 6e 64 75 73 74 72 79 27 73 20   the industry's 
0390: 73 74 61 6e 64 61 72 64 20 64 75 6d 6d 79 20 74  standard dummy t
03a0: 65 78 74 20 65 76 65 72 20 73 69 6e 63 65 20 74  ext ever since t
03b0: 68 65 20 31 35 30 30 73 2c 20 77 68 65 6e 20 61  he 1500s, when a
03c0: 6e 20 75 6e 6b 6e 6f 77 6e 20 70 72 69 6e 74 65  n unknown printe
03d0: 72 20 74 6f 6f 6b 20 61 20 67 61 6c 6c 65 79 20  r took a galley 
03e0: 6f 66 20 74 79 70 65 20 61 6e 64 20 73 63 72 61  of type and scra
03f0: 6d 62 6c 65 64 20 69 74 20 74 6f 20 6d 61 6b 65  mbled it to make
0400: 20 61 20 74 79 70 65 20 73 70 65 63 69 6d 65 6e   a type specimen
0410: 20 62 6f 6f 6b 2e 20 49 74 20 68 61 73 20 73 75   book. It has su
0420: 72 76 69 76 65 64 20 6e 6f 74 20 6f 6e 6c 79 20  rvived not only 
0430: 66 69 76 65 20 63 65 6e 74 75 72 69 65 73 2c 20  five centuries, 
0440: 62 75 74 20 61 6c 73 6f 20 74 68 65 20 6c 65 61  but also the lea
0450: 70 20 69 6e 74 6f 20 65 6c 65 63 74 72 6f 6e 69  p into electroni
0460: 63 20 74 79 70 65 73 65 74 74 69 6e 67 2c 20 72  c typesetting, r
0470: 65 6d 61 69 6e 69 6e 67 20 65 73 73 65 6e 74 69  emaining essenti
0480: 61 6c 6c 79 20 75 6e 63 68 61 6e 67 65 64 2e 20  ally unchanged. 
0490: 49 74 20 77 61 73 20 70 6f 70 75 6c 61 72 69 73  It was popularis
04a0: 65 64 20 69 6e 20 74 68 65 20 31 39 36 30 73 20  ed in the 1960s 
04b0: 77 69 74 68 20 74 68 65 20 72 65 6c 65 61 73 65  with the release
04c0: 20 6f 66 20 4c 65 74 72 61 73 65 74 20 73 68 65   of Letraset she
04d0: 65 74 73 20 63 6f 6e 74 61 69 6e 69 6e 67 20 4c  ets containing L
04e0: 6f 72 65 6d 20 49 70 73 75 6d 20 70 61 73 73 61  orem Ipsum passa
04f0: 67 65 73 2c 20 61 6e 64 20 6d 6f 72 65 20 72 65  ges, and more re
0500: 63 65 6e 74 6c 79 20 77 69 74 68 20 64 65 73 6b  cently with desk
0510: 74 6f 70 20 70 75 62 6c 69 73 68 69 6e 67 20 73  top publishing s
0520: 6f 66 74 77 61 72 65 20 6c 69 6b 65 20 41 6c 64  oftware like Ald
0530: 75 73 20 50 61 67 65 4d 61 6b 65 72 20 69 6e 63  us PageMaker inc
0540: 6c 75 64 69 6e 67 20 76 65 72 73 69 6f 6e 73 20  luding versions 
0550: 6f 66 20 4c 6f 72 65 6d 20 49 70 73 75 6d 2e 3c  of Lorem Ipsum.<
0560: 2f 70 3e 0d 0a 0d 0a 3c 70 72 65 3e 3c 63 6f 64  /p>....<pre><cod
0570: 65 3e 0d 0a 6c 6f 63 61 6c 20 66 66 69 20 3d 20  e>..local ffi = 
0580: 72 65 71 75 69 72 65 28 22 66 66 69 22 29 0d 0a  require("ffi")..
0590: 66 66 69 2e 63 64 65 66 5b 5b 0d 0a 69 6e 74 20  ffi.cdef[[..int 
05a0: 70 72 69 6e 74 66 28 63 6f 6e 73 74 20 63 68 61  printf(const cha
05b0: 72 20 2a 66 6d 74 2c 20 2e 2e 2e 29 3b 0d 0a 5d  r *fmt, ...);..]
05c0: 5d 0d 0a 66 66 69 2e 43 2e 70 72 69 6e 74 66 28  ]..ffi.C.printf(
05d0: 22 48 65 6c 6c 6f 20 25 73 21 22 2c 20 22 77 6f  "Hello %s!", "wo
05e0: 72 6c 64 22 29 0d 0a 3c 2f 70 72 65 3e 3c 2f 63  rld")..</pre></c
05f0: 6f 64 65 3e 0d 0a 3c 2f 62 72 3e 0d 0a 0d 0a 0d  ode>..</br>.....
0600: 0a 0d 0a 0d 0a 3c 68 33 3e 55 73 69 6e 67 20 43  .....<h3>Using C
0610: 20 4c 69 62 72 61 72 79 27 73 20 69 6e 20 50 75   Library's in Pu
0620: 72 65 20 4c 75 61 20 28 41 64 76 61 6e 63 65 64  re Lua (Advanced
0630: 29 3c 2f 68 33 3e 0d 0a 0d 0a 3c 70 3e 54 68 65  )</h3>....<p>The
0640: 20 66 6f 6c 6c 6f 77 69 6e 67 20 63 6f 64 65 20   following code 
0650: 73 68 6f 77 73 20 68 6f 77 20 74 6f 20 61 63 63  shows how to acc
0660: 65 73 73 20 74 68 65 20 7a 6c 69 62 20 63 6f 6d  ess the zlib com
0670: 70 72 65 73 73 69 6f 6e 20 6c 69 62 72 61 72 79  pression library
0680: 20 66 72 6f 6d 20 4c 75 61 20 63 6f 64 65 2e 3c   from Lua code.<
0690: 2f 70 3e 0d 0a 0d 0a 3c 70 72 65 3e 3c 63 6f 64  /p>....<pre><cod
06a0: 65 3e 0d 0a 6c 6f 63 61 6c 20 66 66 69 20 3d 20  e>..local ffi = 
06b0: 72 65 71 75 69 72 65 28 22 66 66 69 22 29 0d 0a  require("ffi")..
06c0: 66 66 69 2e 63 64 65 66 5b 5b 0d 0a 75 6e 73 69  ffi.cdef[[..unsi
06d0: 67 6e 65 64 20 6c 6f 6e 67 20 63 6f 6d 70 72 65  gned long compre
06e0: 73 73 42 6f 75 6e 64 28 75 6e 73 69 67 6e 65 64  ssBound(unsigned
06f0: 20 6c 6f 6e 67 20 73 6f 75 72 63 65 4c 65 6e 29   long sourceLen)
0700: 3b 0d 0a 69 6e 74 20 63 6f 6d 70 72 65 73 73 32  ;..int compress2
0710: 28 75 69 6e 74 38 5f 74 20 2a 64 65 73 74 2c 20  (uint8_t *dest, 
0720: 75 6e 73 69 67 6e 65 64 20 6c 6f 6e 67 20 2a 64  unsigned long *d
0730: 65 73 74 4c 65 6e 2c 0d 0a 09 20 20 20 20 20 20  estLen,...      
0740: 63 6f 6e 73 74 20 75 69 6e 74 38 5f 74 20 2a 73  const uint8_t *s
0750: 6f 75 72 63 65 2c 20 75 6e 73 69 67 6e 65 64 20  ource, unsigned 
0760: 6c 6f 6e 67 20 73 6f 75 72 63 65 4c 65 6e 2c 20  long sourceLen, 
0770: 69 6e 74 20 6c 65 76 65 6c 29 3b 0d 0a 69 6e 74  int level);..int
0780: 20 75 6e 63 6f 6d 70 72 65 73 73 28 75 69 6e 74   uncompress(uint
0790: 38 5f 74 20 2a 64 65 73 74 2c 20 75 6e 73 69 67  8_t *dest, unsig
07a0: 6e 65 64 20 6c 6f 6e 67 20 2a 64 65 73 74 4c 65  ned long *destLe
07b0: 6e 2c 0d 0a 09 20 20 20 20 20 20 20 63 6f 6e 73  n,...       cons
07c0: 74 20 75 69 6e 74 38 5f 74 20 2a 73 6f 75 72 63  t uint8_t *sourc
07d0: 65 2c 20 75 6e 73 69 67 6e 65 64 20 6c 6f 6e 67  e, unsigned long
07e0: 20 73 6f 75 72 63 65 4c 65 6e 29 3b 0d 0a 5d 5d   sourceLen);..]]
07f0: 0d 0a 0d 0a 6c 6f 63 61 6c 20 7a 6c 69 62 20 3d  ....local zlib =
0800: 20 66 66 69 2e 6c 6f 61 64 28 66 66 69 2e 6f 73   ffi.load(ffi.os
0810: 20 3d 3d 20 22 57 69 6e 64 6f 77 73 22 20 61 6e   == "Windows" an
0820: 64 20 22 7a 6c 69 62 31 22 20 6f 72 20 22 7a 22  d "zlib1" or "z"
0830: 29 0d 0a 3c 2f 70 72 65 3e 3c 2f 63 6f 64 65 3e  )..</pre></code>
0840: 0d 0a 3c 2f 62 72 3e 0d 0a 0d 0a 0d 0a 0d 0a 0d  ..</br>.........
0850: 0a 3c 68 33 3e 43 2b 2b 20 61 6e 64 20 4c 75 61  .<h3>C++ and Lua
0860: 20 48 79 62 72 69 64 20 41 70 70 6c 69 63 61 74   Hybrid Applicat
0870: 69 6f 6e 3c 2f 68 33 3e 20 20 20 0d 0a 0d 0a 3c  ion</h3>   ....<
0880: 70 3e 54 68 65 20 66 6f 6c 6c 6f 77 69 6e 67 20  p>The following 
0890: 65 78 61 6d 70 6c 65 20 75 73 65 73 20 4c 75 61  example uses Lua
08a0: 57 72 61 70 70 65 72 20 61 6e 64 20 4c 75 61 6a  Wrapper and Luaj
08b0: 69 74 2e 0d 0a 3c 2f 62 72 3e 3c 2f 62 72 3e 0d  it...</br></br>.
08c0: 0a 4c 75 61 57 72 61 70 70 65 72 20 69 73 20 61  .LuaWrapper is a
08d0: 20 6c 69 62 72 61 72 79 20 64 65 73 69 67 6e 65   library designe
08e0: 64 20 74 6f 20 68 65 6c 70 20 62 72 69 64 67 65  d to help bridge
08f0: 20 74 68 65 20 67 61 62 20 62 65 74 77 65 65 6e   the gab between
0900: 20 4c 75 61 20 61 6e 64 20 43 2b 2b 2e 0d 0a 49   Lua and C++...I
0910: 74 20 69 73 20 64 65 73 69 67 6e 65 64 20 74 6f  t is designed to
0920: 20 62 65 20 73 6d 61 6c 6c 20 28 61 20 73 69 6e   be small (a sin
0930: 67 6c 65 20 68 65 61 64 65 72 20 66 69 6c 65 29  gle header file)
0940: 2c 20 73 69 6d 70 6c 65 2c 20 66 61 73 74 2c 20  , simple, fast, 
0950: 61 6e 64 20 74 79 70 65 73 61 66 65 2e 0d 0a 49  and typesafe...I
0960: 74 20 68 61 73 20 6e 6f 20 65 78 74 65 72 6e 61  t has no externa
0970: 6c 20 64 65 70 65 6e 64 65 6e 63 69 65 73 20 6f  l dependencies o
0980: 74 68 65 72 20 74 68 61 6e 20 74 68 65 20 6c 75  ther than the lu
0990: 61 20 6c 69 62 72 61 72 79 20 69 74 73 65 6c 66  a library itself
09a0: 2c 20 61 6e 64 20 64 6f 65 73 20 6e 6f 74 0d 0a  , and does not..
09b0: 6e 65 65 64 20 74 6f 20 62 65 20 70 72 65 63 6f  need to be preco
09c0: 6d 70 69 6c 65 64 3b 20 74 68 65 20 68 65 61 64  mpiled; the head
09d0: 65 72 20 63 61 6e 20 73 69 6d 70 6c 79 20 62 65  er can simply be
09e0: 20 64 72 6f 70 70 65 64 20 69 6e 74 6f 20 61 20   dropped into a 
09f0: 70 72 6f 6a 65 63 74 20 61 6e 64 0d 0a 75 73 65  project and..use
0a00: 64 20 69 6d 6d 65 64 69 61 74 65 6c 79 2e 20 49  d immediately. I
0a10: 74 20 65 76 65 6e 20 73 75 70 70 6f 72 74 73 20  t even supports 
0a20: 63 6c 61 73 73 20 69 6e 68 65 72 69 74 61 6e 63  class inheritanc
0a30: 65 20 74 6f 20 61 20 63 65 72 74 61 69 6e 20 64  e to a certain d
0a40: 65 67 72 65 65 2e 0d 0a 4f 62 6a 65 63 74 73 20  egree...Objects 
0a50: 63 61 6e 20 62 65 20 63 72 65 61 74 65 64 20 69  can be created i
0a60: 6e 20 65 69 74 68 65 72 20 4c 75 61 20 6f 72 20  n either Lua or 
0a70: 43 2b 2b 2c 20 61 6e 64 20 70 61 73 73 65 64 20  C++, and passed 
0a80: 62 61 63 6b 20 61 6e 64 20 66 6f 72 74 68 2e 0d  back and forth..
0a90: 0a 3c 2f 70 3e 0d 0a 0d 0a 3c 70 3e 0d 0a 54 68  .</p>....<p>..Th
0aa0: 65 20 6e 69 63 65 20 74 68 69 6e 67 20 61 62 6f  e nice thing abo
0ab0: 75 74 20 4c 75 61 57 72 61 70 70 65 72 20 69 73  ut LuaWrapper is
0ac0: 20 74 68 61 74 20 77 65 20 63 61 6e 20 64 65 76   that we can dev
0ad0: 65 6c 6f 70 20 6f 75 72 20 43 2b 2b 20 61 6e 64  elop our C++ and
0ae0: 20 4c 75 61 0d 0a 66 72 61 6d 65 77 6f 72 6b 73   Lua..frameworks
0af0: 20 73 69 64 65 20 62 79 20 73 69 64 65 20 61 6e   side by side an
0b00: 64 20 73 74 69 6c 6c 20 6b 65 65 70 20 74 68 65  d still keep the
0b10: 6d 20 73 65 70 61 72 61 74 65 2e 20 0d 0a 3c 2f  m separate. ..</
0b20: 70 3e 0d 0a 0d 0a 3c 70 3e 3c 62 3e 6d 61 69 6e  p>....<p><b>main
0b30: 2e 63 70 70 3c 2f 62 3e 3c 2f 70 3e 0d 0a 0d 0a  .cpp</b></p>....
0b40: 3c 70 72 65 3e 3c 63 6f 64 65 3e 23 69 6e 63 6c  <pre><code>#incl
0b50: 75 64 65 20 26 6c 74 69 6f 73 74 72 65 61 6d 26  ude &ltiostream&
0b60: 67 74 0d 0a 65 78 74 65 72 6e 20 22 43 22 0d 0a  gt..extern "C"..
0b70: 7b 0d 0a 23 69 6e 63 6c 75 64 65 20 22 6c 75 61  {..#include "lua
0b80: 2e 68 22 0d 0a 23 69 6e 63 6c 75 64 65 20 22 6c  .h"..#include "l
0b90: 75 61 6c 69 62 2e 68 22 0d 0a 23 69 6e 63 6c 75  ualib.h"..#inclu
0ba0: 64 65 20 22 6c 61 75 78 6c 69 62 2e 68 22 0d 0a  de "lauxlib.h"..
0bb0: 23 69 6e 63 6c 75 64 65 20 22 6c 75 61 6a 69 74  #include "luajit
0bc0: 2e 68 22 0d 0a 7d 0d 0a 0d 0a 23 69 6e 63 6c 75  .h"..}....#inclu
0bd0: 64 65 20 22 4c 75 61 42 61 6e 6b 41 63 63 6f 75  de "LuaBankAccou
0be0: 6e 74 2e 68 70 70 22 0d 0a 0d 0a 75 73 69 6e 67  nt.hpp"....using
0bf0: 20 6e 61 6d 65 73 70 61 63 65 20 73 74 64 3b 0d   namespace std;.
0c00: 0a 0d 0a 69 6e 74 20 6d 61 69 6e 28 69 6e 74 20  ...int main(int 
0c10: 61 72 67 63 2c 20 63 6f 6e 73 74 20 63 68 61 72  argc, const char
0c20: 20 2a 61 72 67 76 5b 5d 29 0d 0a 7b 0d 0a 20 20   *argv[])..{..  
0c30: 20 20 69 66 20 28 61 72 67 63 20 3d 3d 20 32 29    if (argc == 2)
0c40: 0d 0a 20 20 20 20 7b 0d 0a 20 20 20 20 20 20 20  ..    {..       
0c50: 20 6c 75 61 5f 53 74 61 74 65 2a 20 4c 20 3d 20   lua_State* L = 
0c60: 6c 75 61 4c 5f 6e 65 77 73 74 61 74 65 28 29 3b  luaL_newstate();
0c70: 0d 0a 20 20 20 20 20 20 20 20 6c 75 61 4a 49 54  ..        luaJIT
0c80: 5f 73 65 74 6d 6f 64 65 28 4c 2c 20 2d 31 2c 20  _setmode(L, -1, 
0c90: 4c 55 41 4a 49 54 5f 4d 4f 44 45 5f 57 52 41 50  LUAJIT_MODE_WRAP
0ca0: 43 46 55 4e 43 7c 4c 55 41 4a 49 54 5f 4d 4f 44  CFUNC|LUAJIT_MOD
0cb0: 45 5f 4f 4e 29 3b 0d 0a 20 20 20 20 20 20 20 20  E_ON);..        
0cc0: 6c 75 61 4c 5f 6f 70 65 6e 6c 69 62 73 28 4c 29  luaL_openlibs(L)
0cd0: 3b 0d 0a 20 20 20 20 20 20 20 20 6c 75 61 6f 70  ;..        luaop
0ce0: 65 6e 5f 42 61 6e 6b 41 63 63 6f 75 6e 74 28 4c  en_BankAccount(L
0cf0: 29 3b 0d 0a 20 20 20 20 20 20 20 20 69 66 20 28  );..        if (
0d00: 6c 75 61 4c 5f 64 6f 66 69 6c 65 28 4c 2c 20 61  luaL_dofile(L, a
0d10: 72 67 76 5b 31 5d 29 29 0d 0a 20 20 20 20 20 20  rgv[1]))..      
0d20: 20 20 20 20 20 20 63 6f 75 74 20 3c 3c 20 6c 75        cout << lu
0d30: 61 5f 74 6f 73 74 72 69 6e 67 28 4c 2c 20 2d 31  a_tostring(L, -1
0d40: 29 20 3c 3c 20 65 6e 64 6c 3b 0d 0a 20 20 20 20  ) << endl;..    
0d50: 20 20 20 20 6c 75 61 5f 63 6c 6f 73 65 28 4c 29      lua_close(L)
0d60: 3b 0d 0a 20 20 20 20 7d 0d 0a 20 20 20 20 72 65  ;..    }..    re
0d70: 74 75 72 6e 20 30 3b 0d 0a 7d 0d 0a 3c 2f 63 6f  turn 0;..}..</co
0d80: 64 65 3e 3c 2f 70 72 65 3e 0d 0a 3c 2f 62 72 3e  de></pre>..</br>
0d90: 0d 0a 0d 0a 0d 0a 3c 70 3e 3c 62 3e 42 61 6e 6b  ......<p><b>Bank
0da0: 41 63 63 6f 75 6e 74 2e 63 70 70 3c 2f 62 3e 3c  Account.cpp</b><
0db0: 2f 70 3e 0d 0a 0d 0a 3c 63 6f 64 65 3e 3c 70 72  /p>....<code><pr
0dc0: 65 3e 0d 0a 23 69 6e 63 6c 75 64 65 20 26 6c 74  e>..#include &lt
0dd0: 42 61 6e 6b 41 63 63 6f 75 6e 74 2e 68 70 70 26  BankAccount.hpp&
0de0: 67 74 0d 0a 0d 0a 66 6c 6f 61 74 20 42 61 6e 6b  gt....float Bank
0df0: 41 63 63 6f 75 6e 74 3a 3a 73 5f 74 6f 74 61 6c  Account::s_total
0e00: 4d 6f 6e 65 79 49 6e 42 61 6e 6b 20 3d 20 30 3b  MoneyInBank = 0;
0e10: 0d 0a 0d 0a 42 61 6e 6b 41 63 63 6f 75 6e 74 3a  ....BankAccount:
0e20: 3a 42 61 6e 6b 41 63 63 6f 75 6e 74 28 63 6f 6e  :BankAccount(con
0e30: 73 74 20 63 68 61 72 2a 20 6f 77 6e 65 72 2c 20  st char* owner, 
0e40: 66 6c 6f 61 74 20 62 61 6c 61 6e 63 65 29 20 0d  float balance) .
0e50: 0a 20 20 20 20 3a 20 6d 5f 6f 77 6e 65 72 28 6f  .    : m_owner(o
0e60: 77 6e 65 72 29 0d 0a 20 20 20 20 2c 20 6d 5f 62  wner)..    , m_b
0e70: 61 6c 61 6e 63 65 28 62 61 6c 61 6e 63 65 29 0d  alance(balance).
0e80: 0a 7b 0d 0a 20 20 20 20 73 5f 74 6f 74 61 6c 4d  .{..    s_totalM
0e90: 6f 6e 65 79 49 6e 42 61 6e 6b 20 2b 3d 20 62 61  oneyInBank += ba
0ea0: 6c 61 6e 63 65 3b 0d 0a 7d 0d 0a 0d 0a 63 6f 6e  lance;..}....con
0eb0: 73 74 20 63 68 61 72 2a 20 42 61 6e 6b 41 63 63  st char* BankAcc
0ec0: 6f 75 6e 74 3a 3a 67 65 74 4f 77 6e 65 72 4e 61  ount::getOwnerNa
0ed0: 6d 65 28 29 20 63 6f 6e 73 74 0d 0a 7b 0d 0a 20  me() const..{.. 
0ee0: 20 20 20 72 65 74 75 72 6e 20 6d 5f 6f 77 6e 65     return m_owne
0ef0: 72 3b 0d 0a 7d 0d 0a 0d 0a 76 6f 69 64 20 42 61  r;..}....void Ba
0f00: 6e 6b 41 63 63 6f 75 6e 74 3a 3a 64 65 70 6f 73  nkAccount::depos
0f10: 69 74 28 66 6c 6f 61 74 20 61 6d 6f 75 6e 74 29  it(float amount)
0f20: 0d 0a 7b 0d 0a 20 20 20 20 73 5f 74 6f 74 61 6c  ..{..    s_total
0f30: 4d 6f 6e 65 79 49 6e 42 61 6e 6b 20 2b 3d 20 61  MoneyInBank += a
0f40: 6d 6f 75 6e 74 3b 0d 0a 20 20 20 20 6d 5f 62 61  mount;..    m_ba
0f50: 6c 61 6e 63 65 20 2b 3d 20 61 6d 6f 75 6e 74 3b  lance += amount;
0f60: 0d 0a 7d 0d 0a 0d 0a 76 6f 69 64 20 42 61 6e 6b  ..}....void Bank
0f70: 41 63 63 6f 75 6e 74 3a 3a 77 69 74 68 64 72 61  Account::withdra
0f80: 77 28 66 6c 6f 61 74 20 61 6d 6f 75 6e 74 29 0d  w(float amount).
0f90: 0a 7b 0d 0a 20 20 20 20 73 5f 74 6f 74 61 6c 4d  .{..    s_totalM
0fa0: 6f 6e 65 79 49 6e 42 61 6e 6b 20 2d 3d 20 61 6d  oneyInBank -= am
0fb0: 6f 75 6e 74 3b 0d 0a 20 20 20 20 6d 5f 62 61 6c  ount;..    m_bal
0fc0: 61 6e 63 65 20 2d 3d 20 61 6d 6f 75 6e 74 3b 0d  ance -= amount;.
0fd0: 0a 7d 0d 0a 0d 0a 66 6c 6f 61 74 20 42 61 6e 6b  .}....float Bank
0fe0: 41 63 63 6f 75 6e 74 3a 3a 63 68 65 63 6b 42 61  Account::checkBa
0ff0: 6c 61 6e 63 65 28 29 20 63 6f 6e 73 74 0d 0a 7b  lance() const..{
1000: 0d 0a 20 20 20 20 72 65 74 75 72 6e 20 6d 5f 62  ..    return m_b
1010: 61 6c 61 6e 63 65 3b 0d 0a 7d 0d 0a 0d 0a 66 6c  alance;..}....fl
1020: 6f 61 74 20 42 61 6e 6b 41 63 63 6f 75 6e 74 3a  oat BankAccount:
1030: 3a 63 68 65 63 6b 54 6f 74 61 6c 4d 6f 6e 65 79  :checkTotalMoney
1040: 49 6e 42 61 6e 6b 28 29 0d 0a 7b 0d 0a 20 20 20  InBank()..{..   
1050: 20 72 65 74 75 72 6e 20 73 5f 74 6f 74 61 6c 4d   return s_totalM
1060: 6f 6e 65 79 49 6e 42 61 6e 6b 3b 0d 0a 7d 0d 0a  oneyInBank;..}..
1070: 3c 2f 63 6f 64 65 3e 3c 2f 70 72 65 3e 0d 0a 3c  </code></pre>..<
1080: 2f 62 72 3e 0d 0a 0d 0a 0d 0a 0d 0a 3c 70 3e 3c  /br>........<p><
1090: 62 3e 42 61 6e 6b 41 63 63 6f 75 6e 74 2e 68 70  b>BankAccount.hp
10a0: 70 3c 2f 62 3e 3c 2f 70 3e 0d 0a 0d 0a 3c 63 6f  p</b></p>....<co
10b0: 64 65 3e 3c 70 72 65 3e 0d 0a 23 69 66 6e 64 65  de><pre>..#ifnde
10c0: 66 20 45 58 41 4d 50 4c 45 5f 48 50 50 5f 0d 0a  f EXAMPLE_HPP_..
10d0: 23 64 65 66 69 6e 65 20 45 58 41 4d 50 4c 45 5f  #define EXAMPLE_
10e0: 48 50 50 5f 0d 0a 0d 0a 23 69 6e 63 6c 75 64 65  HPP_....#include
10f0: 20 26 6c 74 73 74 72 69 6e 67 26 67 74 0d 0a 23   &ltstring&gt..#
1100: 69 6e 63 6c 75 64 65 20 26 6c 74 69 6f 73 74 72  include &ltiostr
1110: 65 61 6d 26 67 74 0d 0a 0d 0a 63 6c 61 73 73 20  eam&gt....class 
1120: 42 61 6e 6b 41 63 63 6f 75 6e 74 0d 0a 7b 0d 0a  BankAccount..{..
1130: 70 75 62 6c 69 63 3a 0d 0a 20 20 20 20 42 61 6e  public:..    Ban
1140: 6b 41 63 63 6f 75 6e 74 28 63 6f 6e 73 74 20 63  kAccount(const c
1150: 68 61 72 2a 20 6f 77 6e 65 72 2c 20 66 6c 6f 61  har* owner, floa
1160: 74 20 62 61 6c 61 6e 63 65 29 3b 0d 0a 0d 0a 20  t balance);.... 
1170: 20 20 20 63 6f 6e 73 74 20 63 68 61 72 2a 20 67     const char* g
1180: 65 74 4f 77 6e 65 72 4e 61 6d 65 28 29 20 63 6f  etOwnerName() co
1190: 6e 73 74 3b 0d 0a 20 20 20 20 76 6f 69 64 20 64  nst;..    void d
11a0: 65 70 6f 73 69 74 28 66 6c 6f 61 74 20 61 6d 6f  eposit(float amo
11b0: 75 6e 74 29 3b 0d 0a 20 20 20 20 76 6f 69 64 20  unt);..    void 
11c0: 77 69 74 68 64 72 61 77 28 66 6c 6f 61 74 20 61  withdraw(float a
11d0: 6d 6f 75 6e 74 29 3b 0d 0a 20 20 20 20 66 6c 6f  mount);..    flo
11e0: 61 74 20 63 68 65 63 6b 42 61 6c 61 6e 63 65 28  at checkBalance(
11f0: 29 20 63 6f 6e 73 74 3b 0d 0a 20 20 20 20 0d 0a  ) const;..    ..
1200: 20 20 20 20 73 74 61 74 69 63 20 66 6c 6f 61 74      static float
1210: 20 63 68 65 63 6b 54 6f 74 61 6c 4d 6f 6e 65 79   checkTotalMoney
1220: 49 6e 42 61 6e 6b 28 29 3b 0d 0a 20 20 20 20 0d  InBank();..    .
1230: 0a 70 72 69 76 61 74 65 3a 0d 0a 20 20 20 20 63  .private:..    c
1240: 6f 6e 73 74 20 63 68 61 72 2a 20 6d 5f 6f 77 6e  onst char* m_own
1250: 65 72 3b 0d 0a 20 20 20 20 66 6c 6f 61 74 20 6d  er;..    float m
1260: 5f 62 61 6c 61 6e 63 65 3b 0d 0a 20 20 20 20 73  _balance;..    s
1270: 74 61 74 69 63 20 66 6c 6f 61 74 20 73 5f 74 6f  tatic float s_to
1280: 74 61 6c 4d 6f 6e 65 79 49 6e 42 61 6e 6b 3b 0d  talMoneyInBank;.
1290: 0a 7d 3b 0d 0a 0d 0a 23 65 6e 64 69 66 20 2f 2f  .};....#endif //
12a0: 20 45 58 41 4d 50 4c 45 5f 48 50 50 5f 0d 0a 3c   EXAMPLE_HPP_..<
12b0: 2f 70 72 65 3e 3c 2f 63 6f 64 65 3e 0d 0a 3c 2f  /pre></code>..</
12c0: 62 72 3e 0d 0a 0d 0a 0d 0a 0d 0a 3c 70 3e 3c 62  br>........<p><b
12d0: 3e 4c 75 61 42 61 6e 6b 41 63 63 6f 75 6e 74 2e  >LuaBankAccount.
12e0: 63 70 70 3c 2f 62 3e 3c 2f 70 3e 0d 0a 0d 0a 3c  cpp</b></p>....<
12f0: 63 6f 64 65 3e 3c 70 72 65 3e 0d 0a 23 69 6e 63  code><pre>..#inc
1300: 6c 75 64 65 20 26 6c 74 69 6f 73 74 72 65 61 6d  lude &ltiostream
1310: 26 67 74 0d 0a 23 69 6e 63 6c 75 64 65 20 26 6c  &gt..#include &l
1320: 74 73 74 72 69 6e 67 26 67 74 0d 0a 0d 0a 65 78  tstring&gt....ex
1330: 74 65 72 6e 20 22 43 22 0d 0a 7b 0d 0a 23 69 6e  tern "C"..{..#in
1340: 63 6c 75 64 65 20 22 6c 75 61 2e 68 22 0d 0a 23  clude "lua.h"..#
1350: 69 6e 63 6c 75 64 65 20 22 6c 61 75 78 6c 69 62  include "lauxlib
1360: 2e 68 22 0d 0a 7d 0d 0a 23 69 6e 63 6c 75 64 65  .h"..}..#include
1370: 20 22 6c 75 61 77 72 61 70 70 65 72 2e 68 70 70   "luawrapper.hpp
1380: 22 0d 0a 0d 0a 23 69 6e 63 6c 75 64 65 20 22 42  "....#include "B
1390: 61 6e 6b 41 63 63 6f 75 6e 74 2e 68 70 70 22 0d  ankAccount.hpp".
13a0: 0a 0d 0a 75 73 69 6e 67 20 6e 61 6d 65 73 70 61  ...using namespa
13b0: 63 65 20 73 74 64 3b 0d 0a 0d 0a 2f 2f 0d 0a 2f  ce std;....//../
13c0: 2f 20 41 6c 6c 6f 63 61 74 6f 72 0d 0a 2f 2f 0d  / Allocator..//.
13d0: 0a 2f 2f 20 54 79 70 65 73 20 74 68 61 74 20 64  .// Types that d
13e0: 6f 20 6e 6f 74 20 68 61 76 65 20 61 20 64 65 66  o not have a def
13f0: 61 75 6c 74 20 63 6f 6e 74 72 75 63 74 6f 72 20  ault contructor 
1400: 72 65 71 75 69 72 65 20 79 6f 75 20 74 6f 20 77  require you to w
1410: 72 69 74 65 20 61 6e 20 61 6c 6c 6f 63 61 74 6f  rite an allocato
1420: 72 20 66 75 6e 63 74 69 6f 6e 2e 0d 0a 2f 2f 20  r function...// 
1430: 54 68 69 73 20 66 75 6e 63 74 69 6f 6e 20 69 73  This function is
1440: 20 70 61 73 73 65 64 20 74 6f 20 6c 75 61 57 5f   passed to luaW_
1450: 72 65 67 69 73 74 65 72 2e 0d 0a 2f 2f 0d 0a 0d  register...//...
1460: 0a 42 61 6e 6b 41 63 63 6f 75 6e 74 2a 20 42 61  .BankAccount* Ba
1470: 6e 6b 41 63 63 6f 75 6e 74 5f 6e 65 77 28 6c 75  nkAccount_new(lu
1480: 61 5f 53 74 61 74 65 20 2a 4c 29 0d 0a 7b 0d 0a  a_State *L)..{..
1490: 20 20 20 20 63 6f 6e 73 74 20 63 68 61 72 2a 20      const char* 
14a0: 6f 77 6e 65 72 20 3d 20 6c 75 61 4c 5f 63 68 65  owner = luaL_che
14b0: 63 6b 73 74 72 69 6e 67 28 4c 2c 20 31 29 3b 0d  ckstring(L, 1);.
14c0: 0a 20 20 20 20 66 6c 6f 61 74 20 62 61 6c 61 6e  .    float balan
14d0: 63 65 20 3d 20 6c 75 61 4c 5f 63 68 65 63 6b 6e  ce = luaL_checkn
14e0: 75 6d 62 65 72 28 4c 2c 20 32 29 3b 0d 0a 20 20  umber(L, 2);..  
14f0: 20 20 72 65 74 75 72 6e 20 6e 65 77 20 42 61 6e    return new Ban
1500: 6b 41 63 63 6f 75 6e 74 28 6f 77 6e 65 72 2c 20  kAccount(owner, 
1510: 62 61 6c 61 6e 63 65 29 3b 0d 0a 7d 0d 0a 0d 0a  balance);..}....
1520: 2f 2f 0d 0a 2f 2f 20 53 74 61 74 69 63 20 46 75  //..// Static Fu
1530: 6e 63 74 69 6f 6e 73 0d 0a 2f 2f 0d 0a 2f 2f 20  nctions..//..// 
1540: 54 68 65 73 65 20 66 75 6e 63 74 69 6f 6e 73 20  These functions 
1550: 63 61 6e 20 62 65 20 63 61 6c 6c 65 64 20 64 69  can be called di
1560: 72 65 63 74 6c 79 20 66 72 6f 6d 20 74 68 65 20  rectly from the 
1570: 42 61 6e 6b 41 63 63 6f 75 6e 74 20 74 61 62 6c  BankAccount tabl
1580: 65 20 69 6e 20 6c 75 61 0d 0a 2f 2f 0d 0a 0d 0a  e in lua..//....
1590: 69 6e 74 20 42 61 6e 6b 41 63 63 6f 75 6e 74 5f  int BankAccount_
15a0: 63 68 65 63 6b 54 6f 74 61 6c 4d 6f 6e 65 79 49  checkTotalMoneyI
15b0: 6e 42 61 6e 6b 28 6c 75 61 5f 53 74 61 74 65 20  nBank(lua_State 
15c0: 2a 4c 29 0d 0a 7b 0d 0a 20 20 20 20 6c 75 61 5f  *L)..{..    lua_
15d0: 70 75 73 68 6e 75 6d 62 65 72 28 4c 2c 20 42 61  pushnumber(L, Ba
15e0: 6e 6b 41 63 63 6f 75 6e 74 3a 3a 63 68 65 63 6b  nkAccount::check
15f0: 54 6f 74 61 6c 4d 6f 6e 65 79 49 6e 42 61 6e 6b  TotalMoneyInBank
1600: 28 29 29 3b 0d 0a 20 20 20 20 72 65 74 75 72 6e  ());..    return
1610: 20 31 3b 0d 0a 7d 0d 0a 0d 0a 2f 2f 0d 0a 2f 2f   1;..}....//..//
1620: 20 4d 65 6d 62 65 72 20 46 75 6e 63 74 69 6f 6e   Member Function
1630: 73 0d 0a 2f 2f 0d 0a 2f 2f 20 54 68 65 73 65 20  s..//..// These 
1640: 66 75 6e 63 74 69 6f 6e 73 20 61 72 65 20 73 74  functions are st
1650: 6f 72 65 64 20 6f 6e 20 74 68 65 20 42 61 6e 6b  ored on the Bank
1660: 41 63 63 6f 75 6e 74 2e 6d 65 74 61 74 61 62 6c  Account.metatabl
1670: 65 20 74 61 62 6c 65 2e 0d 0a 2f 2f 20 41 6c 6c  e table...// All
1680: 20 42 61 6e 6b 41 63 63 6f 75 6e 74 20 6f 62 6a   BankAccount obj
1690: 65 63 74 73 20 69 6e 20 4c 75 61 20 68 61 76 65  ects in Lua have
16a0: 20 61 63 63 65 73 73 20 74 6f 20 74 68 65 20 66   access to the f
16b0: 75 6e 63 74 69 6f 6e 73 20 64 65 66 69 6e 65 64  unctions defined
16c0: 20 74 68 65 72 65 0d 0a 2f 2f 20 62 79 20 74 68   there..// by th
16d0: 65 20 75 73 65 20 6f 66 20 73 70 65 63 69 61 6c  e use of special
16e0: 20 61 20 5f 5f 69 6e 64 65 78 20 6d 65 74 61 74   a __index metat
16f0: 6d 65 74 68 6f 64 20 74 68 61 74 20 69 73 20 73  method that is s
1700: 65 74 20 75 70 20 62 79 20 4c 75 61 57 72 61 70  et up by LuaWrap
1710: 70 65 72 2e 0d 0a 2f 2f 0d 0a 0d 0a 69 6e 74 20  per...//....int 
1720: 42 61 6e 6b 41 63 63 6f 75 6e 74 5f 67 65 74 4f  BankAccount_getO
1730: 77 6e 65 72 4e 61 6d 65 28 6c 75 61 5f 53 74 61  wnerName(lua_Sta
1740: 74 65 20 2a 4c 29 0d 0a 7b 0d 0a 20 20 20 20 42  te *L)..{..    B
1750: 61 6e 6b 41 63 63 6f 75 6e 74 2a 20 61 63 63 6f  ankAccount* acco
1760: 75 6e 74 20 3d 20 6c 75 61 57 5f 63 68 65 63 6b  unt = luaW_check
1770: 3c 42 61 6e 6b 41 63 63 6f 75 6e 74 3e 28 4c 2c  <BankAccount>(L,
1780: 20 31 29 3b 0d 0a 20 20 20 20 6c 75 61 5f 70 75   1);..    lua_pu
1790: 73 68 73 74 72 69 6e 67 28 4c 2c 20 61 63 63 6f  shstring(L, acco
17a0: 75 6e 74 2d 3e 67 65 74 4f 77 6e 65 72 4e 61 6d  unt->getOwnerNam
17b0: 65 28 29 29 3b 0d 0a 20 20 20 20 72 65 74 75 72  e());..    retur
17c0: 6e 20 31 3b 0d 0a 7d 0d 0a 0d 0a 69 6e 74 20 42  n 1;..}....int B
17d0: 61 6e 6b 41 63 63 6f 75 6e 74 5f 64 65 70 6f 73  ankAccount_depos
17e0: 69 74 28 6c 75 61 5f 53 74 61 74 65 20 2a 4c 29  it(lua_State *L)
17f0: 0d 0a 7b 0d 0a 20 20 20 20 42 61 6e 6b 41 63 63  ..{..    BankAcc
1800: 6f 75 6e 74 2a 20 61 63 63 6f 75 6e 74 20 3d 20  ount* account = 
1810: 6c 75 61 57 5f 63 68 65 63 6b 3c 42 61 6e 6b 41  luaW_check<BankA
1820: 63 63 6f 75 6e 74 3e 28 4c 2c 20 31 29 3b 0d 0a  ccount>(L, 1);..
1830: 20 20 20 20 66 6c 6f 61 74 20 61 6d 6f 75 6e 74      float amount
1840: 20 3d 20 6c 75 61 4c 5f 63 68 65 63 6b 6e 75 6d   = luaL_checknum
1850: 62 65 72 28 4c 2c 20 32 29 3b 0d 0a 20 20 20 20  ber(L, 2);..    
1860: 61 63 63 6f 75 6e 74 2d 3e 64 65 70 6f 73 69 74  account->deposit
1870: 28 61 6d 6f 75 6e 74 29 3b 0d 0a 20 20 20 20 72  (amount);..    r
1880: 65 74 75 72 6e 20 30 3b 0d 0a 7d 0d 0a 0d 0a 69  eturn 0;..}....i
1890: 6e 74 20 42 61 6e 6b 41 63 63 6f 75 6e 74 5f 77  nt BankAccount_w
18a0: 69 74 68 64 72 61 77 28 6c 75 61 5f 53 74 61 74  ithdraw(lua_Stat
18b0: 65 20 2a 4c 29 0d 0a 7b 0d 0a 20 20 20 20 42 61  e *L)..{..    Ba
18c0: 6e 6b 41 63 63 6f 75 6e 74 2a 20 61 63 63 6f 75  nkAccount* accou
18d0: 6e 74 20 3d 20 6c 75 61 57 5f 63 68 65 63 6b 3c  nt = luaW_check<
18e0: 42 61 6e 6b 41 63 63 6f 75 6e 74 3e 28 4c 2c 20  BankAccount>(L, 
18f0: 31 29 3b 0d 0a 20 20 20 20 66 6c 6f 61 74 20 61  1);..    float a
1900: 6d 6f 75 6e 74 20 3d 20 6c 75 61 4c 5f 63 68 65  mount = luaL_che
1910: 63 6b 6e 75 6d 62 65 72 28 4c 2c 20 32 29 3b 0d  cknumber(L, 2);.
1920: 0a 20 20 20 20 61 63 63 6f 75 6e 74 2d 3e 77 69  .    account->wi
1930: 74 68 64 72 61 77 28 61 6d 6f 75 6e 74 29 3b 0d  thdraw(amount);.
1940: 0a 20 20 20 20 72 65 74 75 72 6e 20 30 3b 0d 0a  .    return 0;..
1950: 7d 0d 0a 0d 0a 69 6e 74 20 42 61 6e 6b 41 63 63  }....int BankAcc
1960: 6f 75 6e 74 5f 63 68 65 63 6b 42 61 6c 61 6e 63  ount_checkBalanc
1970: 65 28 6c 75 61 5f 53 74 61 74 65 20 2a 4c 29 0d  e(lua_State *L).
1980: 0a 7b 0d 0a 20 20 20 20 42 61 6e 6b 41 63 63 6f  .{..    BankAcco
1990: 75 6e 74 2a 20 61 63 63 6f 75 6e 74 20 3d 20 6c  unt* account = l
19a0: 75 61 57 5f 63 68 65 63 6b 3c 42 61 6e 6b 41 63  uaW_check<BankAc
19b0: 63 6f 75 6e 74 3e 28 4c 2c 20 31 29 3b 0d 0a 20  count>(L, 1);.. 
19c0: 20 20 20 6c 75 61 5f 70 75 73 68 6e 75 6d 62 65     lua_pushnumbe
19d0: 72 28 4c 2c 20 61 63 63 6f 75 6e 74 2d 3e 63 68  r(L, account->ch
19e0: 65 63 6b 42 61 6c 61 6e 63 65 28 29 29 3b 0d 0a  eckBalance());..
19f0: 20 20 20 20 72 65 74 75 72 6e 20 31 3b 0d 0a 7d      return 1;..}
1a00: 0d 0a 0d 0a 73 74 61 74 69 63 20 6c 75 61 4c 5f  ....static luaL_
1a10: 52 65 67 20 42 61 6e 6b 41 63 63 6f 75 6e 74 5f  Reg BankAccount_
1a20: 74 61 62 6c 65 5b 5d 20 3d 0d 0a 7b 0d 0a 20 20  table[] =..{..  
1a30: 20 20 7b 20 22 63 68 65 63 6b 54 6f 74 61 6c 4d    { "checkTotalM
1a40: 6f 6e 65 79 49 6e 42 61 6e 6b 22 2c 20 42 61 6e  oneyInBank", Ban
1a50: 6b 41 63 63 6f 75 6e 74 5f 63 68 65 63 6b 54 6f  kAccount_checkTo
1a60: 74 61 6c 4d 6f 6e 65 79 49 6e 42 61 6e 6b 20 7d  talMoneyInBank }
1a70: 2c 0d 0a 20 20 20 20 7b 20 4e 55 4c 4c 2c 20 4e  ,..    { NULL, N
1a80: 55 4c 4c 20 7d 0d 0a 7d 3b 0d 0a 0d 0a 73 74 61  ULL }..};....sta
1a90: 74 69 63 20 6c 75 61 4c 5f 52 65 67 20 42 61 6e  tic luaL_Reg Ban
1aa0: 6b 41 63 63 6f 75 6e 74 5f 6d 65 74 61 74 61 62  kAccount_metatab
1ab0: 6c 65 5b 5d 20 3d 0d 0a 7b 0d 0a 20 20 20 20 7b  le[] =..{..    {
1ac0: 20 22 67 65 74 4f 77 6e 65 72 4e 61 6d 65 22 2c   "getOwnerName",
1ad0: 20 42 61 6e 6b 41 63 63 6f 75 6e 74 5f 67 65 74   BankAccount_get
1ae0: 4f 77 6e 65 72 4e 61 6d 65 20 7d 2c 0d 0a 20 20  OwnerName },..  
1af0: 20 20 7b 20 22 64 65 70 6f 73 69 74 22 2c 20 42    { "deposit", B
1b00: 61 6e 6b 41 63 63 6f 75 6e 74 5f 64 65 70 6f 73  ankAccount_depos
1b10: 69 74 20 7d 2c 0d 0a 20 20 20 20 7b 20 22 77 69  it },..    { "wi
1b20: 74 68 64 72 61 77 22 2c 20 42 61 6e 6b 41 63 63  thdraw", BankAcc
1b30: 6f 75 6e 74 5f 77 69 74 68 64 72 61 77 20 7d 2c  ount_withdraw },
1b40: 0d 0a 20 20 20 20 7b 20 22 63 68 65 63 6b 42 61  ..    { "checkBa
1b50: 6c 61 6e 63 65 22 2c 20 42 61 6e 6b 41 63 63 6f  lance", BankAcco
1b60: 75 6e 74 5f 63 68 65 63 6b 42 61 6c 61 6e 63 65  unt_checkBalance
1b70: 20 7d 2c 0d 0a 20 20 20 20 7b 20 4e 55 4c 4c 2c   },..    { NULL,
1b80: 20 4e 55 4c 4c 20 7d 0d 0a 7d 3b 0d 0a 0d 0a 69   NULL }..};....i
1b90: 6e 74 20 6c 75 61 6f 70 65 6e 5f 42 61 6e 6b 41  nt luaopen_BankA
1ba0: 63 63 6f 75 6e 74 28 6c 75 61 5f 53 74 61 74 65  ccount(lua_State
1bb0: 2a 20 4c 29 0d 0a 7b 0d 0a 20 20 20 20 6c 75 61  * L)..{..    lua
1bc0: 57 5f 72 65 67 69 73 74 65 72 3c 42 61 6e 6b 41  W_register<BankA
1bd0: 63 63 6f 75 6e 74 3e 28 4c 2c 0d 0a 20 20 20 20  ccount>(L,..    
1be0: 20 20 20 20 22 42 61 6e 6b 41 63 63 6f 75 6e 74      "BankAccount
1bf0: 22 2c 0d 0a 20 20 20 20 20 20 20 20 42 61 6e 6b  ",..        Bank
1c00: 41 63 63 6f 75 6e 74 5f 74 61 62 6c 65 2c 0d 0a  Account_table,..
1c10: 20 20 20 20 20 20 20 20 42 61 6e 6b 41 63 63 6f          BankAcco
1c20: 75 6e 74 5f 6d 65 74 61 74 61 62 6c 65 2c 0d 0a  unt_metatable,..
1c30: 20 20 20 20 20 20 20 20 42 61 6e 6b 41 63 63 6f          BankAcco
1c40: 75 6e 74 5f 6e 65 77 20 2f 2f 20 49 66 20 79 6f  unt_new // If yo
1c50: 75 72 20 63 6c 61 73 73 20 68 61 73 20 61 20 64  ur class has a d
1c60: 65 66 61 75 6c 74 20 63 6f 6e 73 74 72 75 63 74  efault construct
1c70: 6f 72 20 79 6f 75 20 63 61 6e 20 6f 6d 69 74 20  or you can omit 
1c80: 74 68 69 73 20 61 72 67 75 6d 65 6e 74 2c 0d 0a  this argument,..
1c90: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
1ca0: 20 20 20 20 20 20 20 20 2f 2f 20 4c 75 61 57 72          // LuaWr
1cb0: 61 70 70 65 72 20 77 69 6c 6c 20 67 65 6e 65 72  apper will gener
1cc0: 61 74 65 20 61 20 64 65 66 61 75 6c 74 20 61 6c  ate a default al
1cd0: 6c 6f 63 61 74 6f 72 20 66 6f 72 20 79 6f 75 2e  locator for you.
1ce0: 0d 0a 20 20 20 20 29 3b 0d 0a 20 20 20 20 72 65  ..    );..    re
1cf0: 74 75 72 6e 20 31 3b 0d 0a 7d 0d 0a 3c 2f 70 72  turn 1;..}..</pr
1d00: 65 3e 3c 2f 63 6f 64 65 3e 0d 0a 3c 2f 62 72 3e  e></code>..</br>
1d10: 0d 0a 0d 0a 0d 0a 0d 0a 0d 0a 0d 0a 3c 70 3e 3c  ............<p><
1d20: 62 3e 4c 75 61 42 61 6e 6b 41 63 63 6f 75 6e 74  b>LuaBankAccount
1d30: 2e 68 70 70 3c 2f 62 3e 3c 2f 70 3e 0d 0a 0d 0a  .hpp</b></p>....
1d40: 3c 63 6f 64 65 3e 3c 70 72 65 3e 0d 0a 23 69 66  <code><pre>..#if
1d50: 6e 64 65 66 20 4c 55 41 45 58 41 4d 50 4c 45 5f  ndef LUAEXAMPLE_
1d60: 48 50 50 5f 0d 0a 23 64 65 66 69 6e 65 20 4c 55  HPP_..#define LU
1d70: 41 45 58 41 4d 50 4c 45 5f 48 50 50 5f 0d 0a 0d  AEXAMPLE_HPP_...
1d80: 0a 73 74 72 75 63 74 20 6c 75 61 5f 53 74 61 74  .struct lua_Stat
1d90: 65 3b 0d 0a 0d 0a 69 6e 74 20 6c 75 61 6f 70 65  e;....int luaope
1da0: 6e 5f 42 61 6e 6b 41 63 63 6f 75 6e 74 28 6c 75  n_BankAccount(lu
1db0: 61 5f 53 74 61 74 65 2a 29 3b 0d 0a 0d 0a 23 65  a_State*);....#e
1dc0: 6e 64 69 66 20 2f 2f 20 4c 55 41 45 58 41 4d 50  ndif // LUAEXAMP
1dd0: 4c 45 5f 48 50 50 5f 0d 0a 3c 2f 70 72 65 3e 3c  LE_HPP_..</pre><
1de0: 2f 63 6f 64 65 3e 0d 0a 3c 2f 62 72 3e 0d 0a 0d  /code>..</br>...
1df0: 0a 0d 0a 0d 0a 0d 0a 0d 0a 3c 70 3e 3c 62 3e 65  .........<p><b>e
1e00: 78 61 6d 70 6c 65 31 2e 6c 75 61 3c 2f 62 3e 3c  xample1.lua</b><
1e10: 2f 70 3e 0d 0a 0d 0a 3c 63 6f 64 65 3e 3c 70 72  /p>....<code><pr
1e20: 65 3e 0d 0a 61 6c 69 63 65 73 61 63 63 6f 75 6e  e>..alicesaccoun
1e30: 74 20 3d 20 42 61 6e 6b 41 63 63 6f 75 6e 74 2e  t = BankAccount.
1e40: 6e 65 77 28 22 41 6c 69 63 65 22 2c 20 31 30 30  new("Alice", 100
1e50: 29 0d 0a 0d 0a 61 6c 69 63 65 73 61 63 63 6f 75  )....alicesaccou
1e60: 6e 74 3a 64 65 70 6f 73 69 74 28 32 30 29 3b 0d  nt:deposit(20);.
1e70: 0a 61 6c 69 63 65 73 61 63 63 6f 75 6e 74 3a 64  .alicesaccount:d
1e80: 65 70 6f 73 69 74 28 33 30 29 3b 0d 0a 61 6c 69  eposit(30);..ali
1e90: 63 65 73 61 63 63 6f 75 6e 74 3a 64 65 70 6f 73  cesaccount:depos
1ea0: 69 74 28 34 30 29 3b 0d 0a 0d 0a 62 6f 62 73 61  it(40);....bobsa
1eb0: 63 63 6f 75 6e 74 20 3d 20 42 61 6e 6b 41 63 63  ccount = BankAcc
1ec0: 6f 75 6e 74 2e 6e 65 77 28 22 42 6f 62 22 2c 20  ount.new("Bob", 
1ed0: 32 30 30 29 0d 0a 0d 0a 62 6f 62 73 61 63 63 6f  200)....bobsacco
1ee0: 75 6e 74 3a 77 69 74 68 64 72 61 77 28 31 30 29  unt:withdraw(10)
1ef0: 3b 0d 0a 62 6f 62 73 61 63 63 6f 75 6e 74 3a 77  ;..bobsaccount:w
1f00: 69 74 68 64 72 61 77 28 31 35 29 3b 0d 0a 62 6f  ithdraw(15);..bo
1f10: 62 73 61 63 63 6f 75 6e 74 3a 77 69 74 68 64 72  bsaccount:withdr
1f20: 61 77 28 32 30 29 3b 0d 0a 0d 0a 66 75 6e 63 74  aw(20);....funct
1f30: 69 6f 6e 20 70 72 69 6e 74 61 63 63 6f 75 6e 74  ion printaccount
1f40: 62 61 6c 61 6e 63 65 28 61 63 63 6f 75 6e 74 29  balance(account)
1f50: 0d 0a 20 20 20 20 6c 6f 63 61 6c 20 6e 61 6d 65  ..    local name
1f60: 20 3d 20 61 63 63 6f 75 6e 74 3a 67 65 74 4f 77   = account:getOw
1f70: 6e 65 72 4e 61 6d 65 28 29 0d 0a 20 20 20 20 6c  nerName()..    l
1f80: 6f 63 61 6c 20 62 61 6c 61 6e 63 65 20 3d 20 61  ocal balance = a
1f90: 63 63 6f 75 6e 74 3a 63 68 65 63 6b 42 61 6c 61  ccount:checkBala
1fa0: 6e 63 65 28 29 0d 0a 20 20 20 20 70 72 69 6e 74  nce()..    print
1fb0: 28 73 74 72 69 6e 67 2e 66 6f 72 6d 61 74 28 22  (string.format("
1fc0: 25 73 20 68 61 73 20 24 25 64 22 2c 20 6e 61 6d  %s has $%d", nam
1fd0: 65 2c 20 62 61 6c 61 6e 63 65 29 29 0d 0a 65 6e  e, balance))..en
1fe0: 64 0d 0a 0d 0a 70 72 69 6e 74 61 63 63 6f 75 6e  d....printaccoun
1ff0: 74 62 61 6c 61 6e 63 65 28 61 6c 69 63 65 73 61  tbalance(alicesa
2000: 63 63 6f 75 6e 74 29 0d 0a 70 72 69 6e 74 61 63  ccount)..printac
2010: 63 6f 75 6e 74 62 61 6c 61 6e 63 65 28 62 6f 62  countbalance(bob
2020: 73 61 63 63 6f 75 6e 74 29 0d 0a 0d 0a 70 72 69  saccount)....pri
2030: 6e 74 28 73 74 72 69 6e 67 2e 66 6f 72 6d 61 74  nt(string.format
2040: 28 22 54 68 65 20 62 61 6e 6b 20 68 61 73 20 24  ("The bank has $
2050: 25 64 22 2c 20 42 61 6e 6b 41 63 63 6f 75 6e 74  %d", BankAccount
2060: 2e 63 68 65 63 6b 54 6f 74 61 6c 4d 6f 6e 65 79  .checkTotalMoney
2070: 49 6e 42 61 6e 6b 28 29 29 29 0d 0a 3c 2f 70 72  InBank()))..</pr
2080: 65 3e 3c 2f 63 6f 64 65 3e 0d 0a 3c 2f 62 72 3e  e></code>..</br>
2090: 0d 0a 0d 0a 0d 0a 0d 0a 3c 2f 74 64 3e 0d 0a 3c  ........</td>..<
20a0: 2f 74 72 3e 0d 0a 3c 2f 74 61 62 6c 65 3e 0a 5a  /tr>..</table>.Z
20b0: 20 37 39 35 31 64 65 30 36 31 62 30 34 30 33 38   7951de061b04038
20c0: 36 66 39 37 38 30 37 30 64 36 33 34 39 64 35 61  6f978070d6349d5a
20d0: 62 0a                                            b.