Graphviz code: call fslist.pal

From PROSE Programming Language - Wiki
Jump to: navigation, search
._init
func/def	[main], &[.main]
local/rtn

.main
obj/def		P0
class/add	P0, [psFileHook]
attr/add	P0, [psFilePath], [/home/markb/prose-talk]
obj/commit	![+], [fs], P0

%---------------------------------------------------------------
func/call	NULL, [tools.gv_open], #3
func/call	NULL, [tools.gv_add_node], ![.prose]
func/call	NULL, [tools.gv_add_node], ![.prose.code]
func/call	NULL, [tools.gv_add_node], ![-]
func/call	NULL, [tools.gv_add_node], PCTX
func/call	NULL, [tools.gv_add_node], ![+]
%---------------------------------------------------------------

func/call	NULL, [tools.fslist], ![+fs]

%---------------------------------------------------------------
func/call	NULL, [tools.gv_close]
%---------------------------------------------------------------
func/rtn