forked from qt-creator/qt-creator
33 lines
954 B
Lua
33 lines
954 B
Lua
|
-- Copyright (C) 2024 The Qt Company Ltd.
|
||
|
|
-- SPDX-License-Identifier: LicenseRef-Qt-Commercial OR GPL-3.0-only WITH Qt-GPL-exception-1.0
|
||
|
|
local inspect = require('inspect')
|
||
|
|
|
||
|
|
local function traceback()
|
||
|
|
local result = ""
|
||
|
|
local level = 1
|
||
|
|
while true do
|
||
|
|
local info = debug.getinfo(level, "Sl")
|
||
|
|
if not info then break end
|
||
|
|
if info.what ~= "C" then
|
||
|
|
---Get the last part of the path in info.source
|
||
|
|
local fileName = info.source:match("^.+/(.+)$")
|
||
|
|
result = result .. (string.format(" %s:%d\n", fileName, info.currentline))
|
||
|
|
end
|
||
|
|
level = level + 1
|
||
|
|
end
|
||
|
|
return result
|
||
|
|
end
|
||
|
|
|
||
|
|
local function compare(actual, expected)
|
||
|
|
if (actual == expected) then
|
||
|
|
return true
|
||
|
|
end
|
||
|
|
|
||
|
|
error("Compared values were not the same.\n Actual: " ..
|
||
|
|
inspect(actual) .. "\n Expected: " .. inspect(expected) .. "\nTrace:\n" .. traceback())
|
||
|
|
end
|
||
|
|
|
||
|
|
return {
|
||
|
|
compare = compare,
|
||
|
|
}
|