From 46439007cf417cbd9ac8049bb4122c890097a0fa Mon Sep 17 00:00:00 2001 From: "Charles.Forsyth" Date: Fri, 22 Dec 2006 20:52:35 +0000 Subject: 20060303-partial --- module/grid/fbrowse.m | 13 +++++++++++++ 1 file changed, 13 insertions(+) create mode 100644 module/grid/fbrowse.m (limited to 'module/grid/fbrowse.m') diff --git a/module/grid/fbrowse.m b/module/grid/fbrowse.m new file mode 100644 index 00000000..61107d20 --- /dev/null +++ b/module/grid/fbrowse.m @@ -0,0 +1,13 @@ +FBrowse : module +{ + PATH: con "/dis/grid/lib/fbrowse.dis"; + NOTHING: con 0; + RUN: con 1; + OPEN: con 2; + WRITE: con 3; + ERROR: con -1; + + init : fn (ctxt : ref Draw->Context, title, root, currdir: string): string; + readpath : fn (dir: Browser->File): (array of ref sys->Dir, int); +}; + -- cgit v1.2.3