mirrors/lua-date
1
0
Fork 0
mirror of https://github.com/TangentFoxy/lua-date.git synced 2025-07-28 02:52:18 +00:00
Code Issues Packages Projects Releases Wiki Activity

whitespace changes

Browse Source
This commit is contained in:
Thijs Schreijer
2013-05-04 20:47:47 +02:00
parent 1c9d0952fe
commit c0e035a27c
1 changed files with 3 additions and 3 deletions
Download Patch File Download Diff File Expand all files Collapse all files

6
date.lua
View File

@@ -51,7 +51,7 @@
-- removes the decimal part of a number -- removes the decimal part of a number
local function fix(n) n = tonumber(n) return n and ((n > 0 and floor or ceil)(n)) end local function fix(n) n = tonumber(n) return n and ((n > 0 and floor or ceil)(n)) end
-- returns the modulo n % d; -- returns the modulo n % d;
local function mod (n,d) return n - d*floor(n/d) end local function mod(n,d) return n - d*floor(n/d) end
-- rounds a number; -- rounds a number;
local function round(n, d) d=d^10 return floor((n*d)+.5)/d end local function round(n, d) d=d^10 return floor((n*d)+.5)/d end
-- rounds a number to whole; -- rounds a number to whole;
@@ -355,9 +355,9 @@
else else
sw:back() sw:back()
-- am pm bce ad ce bc -- am pm bce ad ce bc
if sw ("^([bB])%s*(%.?)%s*[Cc]%s*(%2)%s*[Ee]%s*(%2)%s*") or sw ("^([bB])%s*(%.?)%s*[Cc]%s*(%2)%s*") then if sw("^([bB])%s*(%.?)%s*[Cc]%s*(%2)%s*[Ee]%s*(%2)%s*") or sw("^([bB])%s*(%.?)%s*[Cc]%s*(%2)%s*") then
e = e and error_dup() or -1 e = e and error_dup() or -1
elseif sw ("^([aA])%s*(%.?)%s*[Dd]%s*(%2)%s*") or sw ("^([cC])%s*(%.?)%s*[Ee]%s*(%2)%s*") then elseif sw("^([aA])%s*(%.?)%s*[Dd]%s*(%2)%s*") or sw("^([cC])%s*(%.?)%s*[Ee]%s*(%2)%s*") then
e = e and error_dup() or 1 e = e and error_dup() or 1
elseif sw("^([PApa])%s*(%.?)%s*[Mm]?%s*(%2)%s*") then elseif sw("^([PApa])%s*(%.?)%s*[Mm]?%s*(%2)%s*") then
x = lwr(sw[1]) -- there should be hour and it must be correct x = lwr(sw[1]) -- there should be hour and it must be correct