view src/luan/cmd_line.luan @ 1802:ca98dee04e08 default tip

add Parsers.json_null
author Franklin Schmidt <fschmidt@gmail.com>
date Sun, 21 Apr 2024 21:25:15 -0600
parents bac27b119ff2
children
line wrap: on
line source

local Luan = require "luan:Luan.luan"
local error = Luan.error
local ipairs = Luan.ipairs or error()
local load_file = Luan.load_file or error()
local Table = require "luan:Table.luan"
local pack = Table.pack or error()
local unpack = Table.unpack or error()
local Io = require "luan:Io.luan"
local print = Io.print or error()
require "java"
local System = require "java:java.lang.System"


local args = {...}
if #args == 0 then
	print("Luan "..Luan.VERSION)
	Io.debug("> ")
else
	local file = args[1]
	try
		local main_file = load_file(file) or error("file '"..file.."' not found")
		local rtn = pack( main_file( unpack(Luan.arg) ) )
		if rtn.n > 0 then
			print( unpack(rtn) )
		end
	catch e
--		require "java"; e.java.printStackTrace();
		Io.print_to(Io.stderr, e )
		System.exit(1)
	end
end