Software /
code /
prosody
Annotate
util/mathcompat.lua @ 12930:a7b7cdec2b31
doap: Add RFC 7628 introduced in ab1164eda011
author | Kim Alvefur <zash@zash.se> |
---|---|
date | Sun, 12 Mar 2023 13:05:50 +0100 |
parent | 12782:8815d3090928 |
rev | line source |
---|---|
12782
8815d3090928
util.mathcompat: Module to ease reuse of math.type()
Kim Alvefur <zash@zash.se>
parents:
diff
changeset
|
1 if not math.type then |
8815d3090928
util.mathcompat: Module to ease reuse of math.type()
Kim Alvefur <zash@zash.se>
parents:
diff
changeset
|
2 |
8815d3090928
util.mathcompat: Module to ease reuse of math.type()
Kim Alvefur <zash@zash.se>
parents:
diff
changeset
|
3 local function math_type(t) |
8815d3090928
util.mathcompat: Module to ease reuse of math.type()
Kim Alvefur <zash@zash.se>
parents:
diff
changeset
|
4 if type(t) == "number" then |
8815d3090928
util.mathcompat: Module to ease reuse of math.type()
Kim Alvefur <zash@zash.se>
parents:
diff
changeset
|
5 if t % 1 == 0 and t ~= t + 1 and t ~= t - 1 then |
8815d3090928
util.mathcompat: Module to ease reuse of math.type()
Kim Alvefur <zash@zash.se>
parents:
diff
changeset
|
6 return "integer" |
8815d3090928
util.mathcompat: Module to ease reuse of math.type()
Kim Alvefur <zash@zash.se>
parents:
diff
changeset
|
7 else |
8815d3090928
util.mathcompat: Module to ease reuse of math.type()
Kim Alvefur <zash@zash.se>
parents:
diff
changeset
|
8 return "float" |
8815d3090928
util.mathcompat: Module to ease reuse of math.type()
Kim Alvefur <zash@zash.se>
parents:
diff
changeset
|
9 end |
8815d3090928
util.mathcompat: Module to ease reuse of math.type()
Kim Alvefur <zash@zash.se>
parents:
diff
changeset
|
10 end |
8815d3090928
util.mathcompat: Module to ease reuse of math.type()
Kim Alvefur <zash@zash.se>
parents:
diff
changeset
|
11 end |
8815d3090928
util.mathcompat: Module to ease reuse of math.type()
Kim Alvefur <zash@zash.se>
parents:
diff
changeset
|
12 _G.math.type = math_type |
8815d3090928
util.mathcompat: Module to ease reuse of math.type()
Kim Alvefur <zash@zash.se>
parents:
diff
changeset
|
13 end |