(List (Com {[LIT_CHARS set]} {[LIT_CHARS -e]} ) (If (Com {[LIT_CHARS test]} {[LIT_CHARS -z]} {[DQ [VarSub BUILD_HAVE_SOURCES]]} ) (List (Com {[LIT_CHARS echo]} {[LIT_CHARS -n]} {[DQ [LIT_CHARS "Building source code distribution..."]]} ) (Com {[LIT_CHARS ./utils/build-sources.sh]} < (FilenameRedirectNode filename={[LIT_CHARS /dev/null]} "> 1), > ) (Com {[LIT_CHARS echo]} {[DQ [LIT_CHARS OK]]} ) ) ) (If (Com {[LIT_CHARS test]} {[LIT_CHARS -z]} {[DQ [VarSub *]]} ) (For f [{[LIT_CHARS tests/build-hosts/] [LIT_OTHER "*"]}]) (If (Com {[LIT_CHARS test]} {[LIT_CHARS -f]} {[VarSub f]} ) (= scope= flags=0 words=[] bindings=[('hosts', {[DQ [VarSub hosts][LIT_CHARS " "][ComSub (Com {[LIT_CHARS basename]} {[VarSub f]})]]})]) ) ) (ElseTrue) (= scope= flags=0 words=[] bindings=[('hosts', {[DQ [VarSub *]]})]) ) (For hostfile [{[VarSub hosts]}]) (Fork (Subshell (List (Com {[LIT_CHARS .]} {[LIT_CHARS tests/build-hosts/] [VarSub hostfile]} ) (= scope= flags=0 words=[] bindings=[('pkg', {[ComSub (Com {[LIT_CHARS ls]} {[LIT_CHARS dist/tre-] [LIT_OTHER "*"] [LIT_CHARS .tar.gz]})]})]) (= scope= flags=0 words=[] bindings=[('pkg', {[ComSub (Com {[LIT_CHARS basename]} {[VarSub pkg]})]})]) (= scope= flags=0 words=[] bindings=[('dir', {[ComSub (Com {[LIT_CHARS basename]} {[VarSub pkg]} {[LIT_CHARS .tar.gz]})]})]) (If (Com {[LIT_CHARS test]} {[LIT_CHARS -z]} {[DQ [VarSub scp_host]]} ) (List (Com {[LIT_CHARS echo]} {[LIT_CHARS foo]} ) (= scope= flags=0 words=[] bindings=[('scp_host', {[DQ [VarSub host]]})]) ) ) (Com {[LIT_CHARS cat]} {[LIT_CHARS tests/build-hosts/] [VarSub hostfile]} < (FilenameRedirectNode filename={[VarSub hostfile] [LIT_CHARS .tmp]} "> 1), > ) (Com {[LIT_CHARS echo]} {[DQ [LIT_CHARS "pkg="][VarSub pkg]]} < (FilenameRedirectNode filename={[VarSub hostfile] [LIT_CHARS .tmp]} >"> 1), > ) (Com {[LIT_CHARS echo]} {[DQ [LIT_CHARS "dir="][VarSub dir]]} < (FilenameRedirectNode filename={[VarSub hostfile] [LIT_CHARS .tmp]} >"> 1), > ) (Com {[LIT_CHARS chmod]} {[LIT_OTHER "+"] [LIT_CHARS x]} {[VarSub hostfile] [LIT_CHARS .tmp]} ) (Com {[LIT_CHARS echo]} {[DQ [LIT_CHARS "Copying files to "][VarSub scp_host][LIT_CHARS ...]]} ) (Com {[LIT_CHARS scp]} {[LIT_CHARS dist/] [VarSub pkg]} {[LIT_CHARS tests/build-run.sh]} {[VarSub scp_host] [LIT_OTHER ":"] [LIT_CHARS build-tmp]} ) (Com {[LIT_CHARS scp]} {[VarSub hostfile] [LIT_CHARS .tmp]} {[VarSub scp_host] [LIT_OTHER ":"] [LIT_CHARS build-tmp/build-params.sh]} ) (Com {[LIT_CHARS rm]} {[LIT_CHARS -f]} {[VarSub hostfile] [LIT_CHARS .tmp]} ) (Com {[LIT_CHARS echo]} {[DQ [LIT_CHARS "Starting job on "][VarSub host][LIT_CHARS ...]]} ) (Subshell (List (Com {[LIT_CHARS ssh]} {[VarSub host]} {[DQ [LIT_CHARS "cd build-tmp; ./build-run.sh"]]} ) (If (Com {[LIT_CHARS test]} {[VarSub ?]} {[LIT_CHARS -ne]} {[LIT_CHARS 0]} ) (List (Com {[LIT_CHARS echo]} {[DQ [VarSub host][LIT_CHARS ": FAILED:"]]} ) (Com {[LIT_CHARS exit]} {[LIT_CHARS 1]} ) ) ) ) ) ) ) ) ) (Com {[LIT_CHARS wait]} ) )