LuaClasses/Classes.lua at main · Germ210/LuaClasses · GitHub

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
local LuaClasses = {
    NewObject = function(ClassTable, ObjectTable)
        assert(type(ClassTable) == "table", "Expected a table for ClassTable")
        assert(type(ObjectTable) == "table", "Expected a table for ObjectTable")
        local instance = {}
        for k, v in pairs(ClassTable) do
            instance[k] = v
        end
        for k, v in pairs(ObjectTable or {}) do
            instance[k] = v
        end
        return instance
    end,

    Inherit = function(self, ClassTable)
        assert(type(ClassTable) == "table", "Expected a table for ClassTable")
        for k, v in pairs(ClassTable) do
            self[k] = v
        end
    end,

    Compile = function(ComponentTable, InsertedComponents)
        assert(type(ComponentTable) == "table", "Expected a table for ComponentTable")
        assert(type(InsertedComponents) == "table", "Expected a table for InsertedComponents")
        local Class = {}
        for key, value in pairs(ComponentTable) do
            Class[key] = value
        end
        for _, Component in ipairs(InsertedComponents) do
            for key, value in pairs(Component) do
                if Class[key] == nil then
                    Class[key] = value
                else
                    Class[key] = value
                end
            end
        end

        return Class
    end,


    ExceptMethods = function(ObjectTable, Methods)
        assert(type(ObjectTable) == "table", "Expected a table for ObjectTable")
        assert(type(Methods) == "table", "Expected a table for Methods")
        for _, Method in ipairs(Methods) do
            rawset(ObjectTable, Method, nil)
        end
    end,

        ExtendClass = function(ClassTable, NewAttributes)
            for key, value in pairs(NewAttributes) do
                ClassTable[key] = value
            end
        end;
    }


return LuaClasses