Mercurial > pub > dyncall > bindings
view lua/luadyncall/test/test_path.lua @ 0:0cfcc391201f
initial from svn dyncall-1745
author | Daniel Adler |
---|---|
date | Thu, 19 Mar 2015 22:26:28 +0100 |
parents | |
children |
line wrap: on
line source
require "path" require "dynload" function init(env,syspath) local env = env or "LIBPATH" local syspath = syspath or ";?.framework/?;lib?.dylib;" print("env\t="..env) print("syspath\t="..syspath) local path = pathinit(env,syspath) print("path\t="..path) return(path) end local mypath = init() function findlib(name) local found, location = pathfind(mypath, name, loadlib) if found then print("found at " .. location .. " ( object= " .. tostring(found) .. " )" ) else print("FAILED: findlib('"..name.."'). tried:\n - " .. table.concat(location,"\n - ") .. "\n" ) end end function trylib(name) print("trylib",name) local status, msg = pcall( findlib, name ) print(status,msg) end trylib("GL") trylib("OpenGL") trylib("SDL") trylib("Bla")