summaryrefslogtreecommitdiff
path: root/module/sh9util.m
blob: 023847ddbff97d361a23901f35f19205f1414088 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
Sh9Util: module
{
PATH: con "/dis/lib/sh9util.dis";
DESCR: con "Utility functions for sh9";

Command: adt
{
	args: list of string;
	inf, outf: string;
	infd, outfd: ref Sys->FD;
	append: int;
};

Async, Seq: con iota;

Pipeline: adt
{
	cmds: list of ref Command;
	term: int;
};

reverse_list: fn[T](toks: list of T): list of T;
to_array: fn[T](toks: list of T): array of T;
};