Lua implements_grammer_control の履歴(No.3)

履歴一覧
差分を表示
現在との差分を表示
ソースを表示
Lua implements_grammer_control へ行く。
- 1 (2014-08-14 (木) 03:34:32)
- 2 (2014-08-14 (木) 04:11:03)
- 3 (2014-08-16 (土) 07:02:59)
- 4 (2014-08-16 (土) 00:00:00)

Luaで良く作る関数～文法編～†

enum
switch
redo, continue, skip (Lua 5.2以上)
continue (Lua 5.1)
continue (Luajit 2.x)
３項演算子

enum†

enum.luaとして保存

local enum = {}
local len_key = "len"
local _ = {}
setmetatable(_, {__mode = "k"})

function enum:__len()
	local i = 0
	for k, v in pairs(_[self]) do
		if k ~= len_key then
			i = i + 1
		end
	end
	return i
end

function enum:new(o)
	local t = {}
	_[t] = {[len_key] = enum.__len}
	for k, v in pairs(o) do
		if tonumber(k) ~= nil then
			k, v = v, k - 1
		end
		if _[t][k] ~= nil then
			error('"' .. k .. '" can not be set.', 2)
		end
		_[t][k] = v
	end
	return setmetatable(t, self)
end

function enum:__index(k)
	if _[self][k] == nil then
		error('"' .. k .. '" is undefined enumerator.', 2)
	end
	return _[self][k]
end

function enum:__newindex()
	error("enum is read-only.", 2)
end

return enum

使い方
test.lua

enum = require "enum"

test = enum:new{"aa", "bb", cc = 100}

print(test.aa)  --> 0
print(test.bb)  --> 1
print(test.cc)  --> 100
print(#test)  --> 0 (Lua5.1) or 3 (Lua5.2)
print(test:len())  --> 3
--print(test.dd)  --> error : "dd" is undefined enumerator.
--test.aa = 10  --> error : enum is read-only.

↑

switch†

switch.luaとして保存

function switch(c)
    local swtbl = {
        casevar = c,
        caseof = function (self, code)
            local f
            if (self.casevar) then
                f = code[self.casevar] or code.default
            else
                f = code.default
            end
            if f then
                if type(f)=="function" then
                    return f(self.casevar,self)
                else
                    error("case "..tostring(self.casevar).." not a function")
                end
            end
        end
    }
    return swtbl
end

test.lua

require "switch"
c = 1
switch(c) : caseof {
    [1]   = function (x) print(x,"one") end,
    [2]   = function (x) print(x,"two") end,
    [3]   = 12345, -- エラー
  default = function (x) print(x,"default") end,
}


c = "dde"
switch(c) : caseof {
  ['abc']   = function (x) print(x,"c is abc") end,
  ['def']   = function (x) print(x,"c is def") end,
  ['ddd']   = 12345, -- エラー
  default = function (x) print(x,"default") end,
}

備考
switch文の疑似実装について、紹介したものの、実際の所はif ～ elseif～endでコツコツと記述した方がメンテナンスしやすい。
switch文の様々な例:http://lua-users.org/wiki/SwitchStatement

↑

redo, continue, skip (lua 5.2以上)†

Lua 5.2にてgoto文が加わったので、これを上手く利用すれば良い。
但し、ラベルは被ることが許されないので、そこが難点である。

::redo1::
for x=1,10 do
    for y=1,10 do
        if not f(x,y) then goto continue1 end
        if not g(x,y) then goto skip1 end
        if not h(x,y) then goto redo1 end
        ::continue1::
    end
end
::skip1::


::redo2::
for x=1,10 do
    for y=1,10 do
        if not f(x,y) then goto continue2 end
        if not g(x,y) then goto skip2 end
        if not h(x,y) then goto redo2 end
        ::continue2::
    end
end
::skip2::

↑

continue (Lua 5.1)†

Lua 5.1系の場合、Lua本体のC言語ソースの修正が許されるならば、以下のパッチを元にソース自体の修正をするのが良いです。
lua5.1.continue.patch
これによって continue文が使えるようになります。

↑

continue (Luajit 2.0)†

Luajit 2.0系の場合、Lua本体のC言語ソースの修正が許されるならば、以下のパッチを元にソース自体の修正をするのが良いです。
Luajit continueの実装
これによって continue文が使えるようになります。

↑

３項演算子†

C++の記述
```
// C++の３項目演算
x = a ? b : c
```

Luaの記述

-- Luaの３項演算っぽい記述方法
x = a and b or c

例

local cond = 3
local x = cond==3 and "三" or "他"
print(x)

Lua implements_grammer_control の履歴(No.3)

Luaで良く作る関数 ～文法編～†

enum†

switch†

redo, continue, skip (lua 5.2以上)†

continue (Lua 5.1)†

continue (Luajit 2.0)†

３項演算子†

Luaで良く作る関数～文法編～†