diff options
Diffstat (limited to 'appl/cmd/fs/void.b')
| -rw-r--r-- | appl/cmd/fs/void.b | 33 |
1 files changed, 33 insertions, 0 deletions
diff --git a/appl/cmd/fs/void.b b/appl/cmd/fs/void.b new file mode 100644 index 00000000..0f8c72fa --- /dev/null +++ b/appl/cmd/fs/void.b @@ -0,0 +1,33 @@ +implement Fsmodule; +include "sys.m"; + sys: Sys; +include "draw.m"; +include "sh.m"; +include "fslib.m"; + fslib: Fslib; + Report, Value, Option: import fslib; + +types(): string +{ + return "vv"; +} + +badmod(p: string) +{ + sys->fprint(sys->fildes(2), "fs: void: cannot load %s: %r\n", p); + raise "fail:bad module"; +} + +init() +{ + sys = load Sys Sys->PATH; + fslib = load Fslib Fslib->PATH; + if(fslib == nil) + badmod(Fslib->PATH); +} + +run(nil: ref Draw->Context, nil: ref Report, + nil: list of Option, args: list of ref Value): ref Value +{ + return (hd args).v(); +} |
