view core/src/luan/modules/Debug.luan @ 322:f8ece87df2b1

minor fixes git-svn-id: https://luan-java.googlecode.com/svn/trunk@323 21e917c8-12df-6dd8-5cb6-c86387c605b9
author fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9>
date Sun, 08 Feb 2015 22:03:27 +0000
parents 7f7708e8fdd4
children db37d6aee4db
line wrap: on
line source

local Luan = require "luan:Luan"
local load = Luan.load
local Io = require "luan:Io"
local print = Io.print
local Table = require "luan:Table"


function print_if_something(...)
	if Table.pack(...).n > 0 then
		print(...)
	end
end

function debug(prompt)
	prompt = prompt or "luan_debug> "
	local function console()
		return Io.read_console_line(prompt)
	end
	local env = {}
	for line in console do
		try
			local fn = load(line,"stdin",env,true)
			print_if_something( fn() )
		catch e do
			print(e)
		end
	end
end