(List (Pipeline (Com {[LIT_CHARS dd]} {[LIT_VAR_LIKE "if="] [LIT_CHARS /dev/zero] =} {[LIT_VAR_LIKE "bs="] [LIT_CHARS 1048576] =} {[LIT_VAR_LIKE "count="] [LIT_CHARS 100] =} < (FilenameRedirectNode filename={[LIT_CHARS /dev/null]} "> 2), > ) (Com {[LIT_CHARS /usr/bin/time]} {[LIT_CHARS ./test-sha1]} < (FilenameRedirectNode filename={[LIT_CHARS /dev/null]} "> 1), > ) ) (While (Com {[LIT_CHARS read]} {[LIT_CHARS expect]} {[LIT_CHARS cnt]} {[LIT_CHARS pfx]} ) (List (Case to_match={[DQ [VarSub expect]]}, pat_word_list=[[{[SQ ] [LIT_OTHER "*"]}]] (Com {[LIT_CHARS continue]} ) ) (= scope= flags=0 words=[] bindings=[('actual', {[ComSub (Pipeline (List (AndOr OP_OR_IF (Com {[LIT_CHARS test]} {[LIT_CHARS -z]} {[DQ [VarSub pfx]]}) (Com {[LIT_CHARS echo]} {[DQ [VarSub pfx]]}) ) (Pipeline (Com redirects=[(FilenameRedirectNode filename={[LIT_CHARS /dev/null]} "> 2)]{[LIT_CHARS dd]} {[LIT_VAR_LIKE "if="] [LIT_CHARS /dev/zero] =} {[LIT_VAR_LIKE "bs="] [LIT_CHARS 1048576] =} {[LIT_VAR_LIKE "count="] [VarSub cnt] =}) (Com {[LIT_CHARS perl]} {[LIT_CHARS -pe]} {[SQ ]}) ) ) (Com {[LIT_CHARS ./test-sha1]} {[VarSub cnt]}) )]})]) (If (Com {[LIT_CHARS test]} {[DQ [VarSub expect]]} {[LIT_DBRACKET_LIKE "="]} {[DQ [VarSub actual]]} ) (Com {[LIT_CHARS echo]} {[DQ [LIT_CHARS "OK: "][VarSub expect][LIT_CHARS " "][VarSub cnt][LIT_CHARS " "][VarSub pfx]]} ) (ElseTrue) (List (Com {[LIT_CHARS echo]} {[DQ [LIT_CHARS "OOPS: "][VarSub cnt]]} < (DescriptorRedirectNode target={[LIT_CHARS 2]} &"> 1), > ) (Com {[LIT_CHARS echo]} {[DQ [LIT_CHARS "expect: "][VarSub expect]]} < (DescriptorRedirectNode target={[LIT_CHARS 2]} &"> 1), > ) (Com {[LIT_CHARS echo]} {[DQ [LIT_CHARS "actual: "][VarSub actual]]} < (DescriptorRedirectNode target={[LIT_CHARS 2]} &"> 1), > ) (Com {[LIT_CHARS exit]} {[LIT_CHARS 1]} ) ) ) ) ) (Com {[LIT_CHARS exit]} ) (While (Com {[LIT_CHARS read]} {[LIT_CHARS cnt]} {[LIT_CHARS pfx]} ) (List (= scope= flags=0 words=[] bindings=[('actual', {[ComSub (Pipeline (List (AndOr OP_OR_IF (Com {[LIT_CHARS test]} {[LIT_CHARS -z]} {[DQ [VarSub pfx]]}) (Com {[LIT_CHARS echo]} {[DQ [VarSub pfx]]}) ) (Pipeline (Com redirects=[(FilenameRedirectNode filename={[LIT_CHARS /dev/null]} "> 2)]{[LIT_CHARS dd]} {[LIT_VAR_LIKE "if="] [LIT_CHARS /dev/zero] =} {[LIT_VAR_LIKE "bs="] [LIT_CHARS 1048576] =} {[LIT_VAR_LIKE "count="] [VarSub cnt] =}) (Com {[LIT_CHARS perl]} {[LIT_CHARS -pe]} {[SQ ]}) ) ) (Com {[LIT_CHARS sha1sum]}) (Com {[LIT_CHARS sed]} {[LIT_CHARS -e]} {[SQ ]}) )]})]) (Com {[LIT_CHARS echo]} {[DQ [VarSub actual][LIT_CHARS " "][VarSub cnt][LIT_CHARS " "][VarSub pfx]]} ) ) ) )