1 files changed, 67 insertions, 0 deletions
diff --git a/script-beta/test/definition/init.lua b/script-beta/test/definition/init.lua
new file mode 100644
index 00000000..645765a2
--- /dev/null
+++ b/script-beta/test/definition/init.lua
@@ -0,0 +1,67 @@
+local core = require 'core.definition'
+local files = require 'files'
+
+rawset(_G, 'TEST', true)
+
+local function catch_target(script)
+    local list = {}
+    local cur = 1
+    while true do
+        local start, finish  = script:find('<!.-!>', cur)
+        if not start then
+            break
+        end
+        list[#list+1] = { start + 2, finish - 2 }
+        cur = finish + 1
+    end
+    return list
+end
+
+local function founded(targets, results)
+    if #targets ~= #results then
+        return false
+    end
+    for _, target in ipairs(targets) do
+        for _, result in ipairs(results) do
+            if target[1] == result[1] and target[2] == result[2] then
+                goto NEXT
+            end
+        end
+        do return false end
+        ::NEXT::
+    end
+    return true
+end
+
+function TEST(script)
+    files.removeAll()
+    local target = catch_target(script)
+    local start  = script:find('<?', 1, true)
+    local finish = script:find('?>', 1, true)
+    local pos = (start + finish) // 2 + 1
+    local new_script = script:gsub('<[!?]', '  '):gsub('[!?]>', '  ')
+    files.setText('', new_script)
+
+    local results = core('', pos)
+    if results then
+        local positions = {}
+        for i, result in ipairs(results) do
+            positions[i] = { result.target.start, result.target.finish }
+        end
+        assert(founded(target, positions))
+    else
+        assert(#target == 0)
+    end
+end
+
+require 'definition.local'
+require 'definition.set'
+require 'definition.arg'
+require 'definition.function'
+require 'definition.table'
+require 'definition.method'
+require 'definition.label'
+require 'definition.call'
+require 'definition.bug'
+require 'definition.special'
+--require 'definition.emmy'