added eprintf() to bas lib, formatted printing to stderr

[metalua.git] / src / lib / metalua / base.lua

diff --git a/src/lib/metalua/base.lua b/src/lib/metalua/base.lua
index 7b8ee5a8427e8364d60d6dcdbde8a2b585643b2b..710643c52408deef2610786a6e8c6405cb7b99fe 100644 (file)
--- a/src/lib/metalua/base.lua
+++ b/src/lib/metalua/base.lua
@@ -68,6 +68,9 @@ function id (...) return ... end
 function const (k) return function () return k end end
 
 function printf(...) return print(string.format(...)) end
+function eprintf(...) 
+   io.stderr:write(string.format(...).."\n") 
+end
 
 function ivalues (x)
    assert(type(x)=='table', 'ivalues() expects a table')