Fixed Lua 5.3 compatibility

Vexatos · Vexatos · commit 4d6f9450a6ad · 2015-07-06T13:56:20.000+02:00
diff --git a/selene/README.md b/selene/README.md
@@ -99,7 +99,7 @@ This is a list of the functions available on wrapped tables or strings as specif
  - `checkArg(n:number, obj:anything, types:string...)` This function errors when `obj` does not match any of the specified types. `n` is the index of the parameter, used for a more descriptive error message.
 
 ###bit32
-Firstly, Selene adds two convenient functions to the `bit32` library, called fish-or or `for`:
+Firstly, Selene adds two convenient functions to the `bit32` library (these functions are not available in Lua 5.3+), called fish-or or `for`:
  - `bit32.bfor(n1:number, n2:number, n3:number):number` This functions returns the bitwise fish-or of its operands. A bit will be 1 if two out of three of the operands' bits are 1.
  - `bit32.nfor(n1:anything, n2:anything, n3:anything):boolean` This returns `true` if two out of three of the operands are not `nil` and not `false`
 
diff --git a/selene/lib/selene/init.lua b/selene/lib/selene/init.lua
@@ -832,6 +832,7 @@ local function bfor(one, two, three)
   checkArg(1, one, "number")
   checkArg(2, two, "number")
   checkArg(3, three, "number")
+  if not bit32 then return end
   return bit32.bor(bit32.band(bit32.bnot(one), two, three), bit32.band(one, bit32.bnot(two), three), bit32.band(one, two, bit32.bnot(three)))
 end
 
@@ -899,8 +900,10 @@ local function loadSelene(env)
   env.table.range = tbl_range
   env.table.zipped = tbl_zipped
 
-  env.bit32.bfor = bfor
-  env.bit32.nfor = nfor
+  if env.bit32 then
+    env.bit32.bfor = bfor
+    env.bit32.nfor = nfor
+  end
 
   _Table.concat = tbl_concat
   _Table.foreach = tbl_foreach
@@ -1009,8 +1012,10 @@ local function unloadSelene(env)
   env.table.range = nil
   env.table.zipped = nil
 
-  env.bit32.bfor = nil
-  env.bit32.nfor = nil
+  if env.bit32 then
+    env.bit32.bfor = nil
+    env.bit32.nfor = nil
+  end
 end
 
 if not _selene or not _selene.initDone then
