(List (Com {[LIT_CHARS set]} {[LIT_CHARS -o]} {[LIT_CHARS nounset]} ) (Com {[LIT_CHARS set]} {[LIT_CHARS -o]} {[LIT_CHARS pipefail]} ) (Com {[LIT_CHARS set]} {[LIT_CHARS -o]} {[LIT_CHARS errexit]} ) (FunctionDef count [] (List (Com {[LIT_CHARS echo]} {[LIT_CHARS INTERPRETER]} {[LIT_CHARS CODE]} ) (Com {[LIT_CHARS wc]} {[LIT_CHARS -l]} {[LIT_OTHER "*"] [LIT_CHARS .c]} {[LIT_OTHER "*"] [LIT_CHARS .h]} ) (Com {[LIT_CHARS echo]} ) (Com {[LIT_CHARS echo]} {[SQ ]} ) (Com {[LIT_CHARS wc]} {[LIT_CHARS -l]} {[LIT_CHARS llt/] [LIT_OTHER "*"] [LIT_CHARS .c]} {[LIT_CHARS llt/] [LIT_OTHER "*"] [LIT_CHARS .h]} ) (Com {[LIT_CHARS echo]} ) (Com {[LIT_CHARS echo]} {[LIT_CHARS TINY]} {[LIT_CHARS VARIANTS]} ) (Com {[LIT_CHARS wc]} {[LIT_CHARS -l]} {[LIT_CHARS tiny/] [LIT_OTHER "*"] [LIT_CHARS .c]} ) (Com {[LIT_CHARS echo]} ) (Com {[LIT_CHARS echo]} {[DQ [LIT_CHARS "Scheme / Lisp libraries"]]} ) (Pipeline (Com {[LIT_CHARS find]} {[LIT_CHARS .]} {[LIT_CHARS -name]} {[SQ ]} {[LIT_CHARS -o]} {[LIT_CHARS -name]} {[SQ ]} ) (Com {[LIT_CHARS xargs]} {[LIT_CHARS wc]} {[LIT_CHARS -l]} ) ) (Com {[LIT_CHARS echo]} ) ) ) (FunctionDef argv [] (Com {[LIT_CHARS ./flisp]} {[LIT_CHARS tests/argv.lsp]} {[LIT_CHARS 1]} {[LIT_CHARS 2]} {[LIT_CHARS 3]} ) ) (FunctionDef stdin [] (Com {[LIT_CHARS ./flisp]} < (HereDocRedirectNode here_end='EOF' do_expansion=True body_word={[DQ [LIT_CHARS "(print "][RIGHT_D_QUOTE "\""][LIT_CHARS hi][RIGHT_D_QUOTE "\""][LIT_CHARS ")\n"]]} 0), > ) ) (FunctionDef size [] (List (Com {[LIT_CHARS make]} ) (Com {[LIT_CHARS echo]} {[DQ [LIT_CHARS "NUM SYMBOLS"]]} ) (Pipeline (Com {[LIT_CHARS nm]} {[LIT_CHARS flisp]} < (DescriptorRedirectNode target={[LIT_CHARS 1]} &"> 2), > ) (Com {[LIT_CHARS wc]} {[LIT_CHARS -l]} ) ) (Com {[LIT_CHARS echo]} ) (Com {[LIT_CHARS ls]} {[LIT_CHARS -l]} {[LIT_CHARS flisp]} ) (Com {[LIT_CHARS echo]} ) (Com {[LIT_CHARS strip]} {[LIT_CHARS flisp]} ) (Com {[LIT_CHARS ls]} {[LIT_CHARS -l]} {[LIT_CHARS flisp]} ) (Com {[LIT_CHARS echo]} ) (Com {[LIT_CHARS ldd]} {[LIT_CHARS flisp]} ) (Com {[LIT_CHARS echo]} ) ) ) (FunctionDef show-libs [] (List (Com {[LIT_CHARS echo]} {[LIT_CHARS SCHEME]} ) (Com {[LIT_CHARS find]} {[LIT_CHARS .]} {[LIT_CHARS -name]} {[SQ ]} ) (Com {[LIT_CHARS echo]} ) (Com {[LIT_CHARS echo]} {[LIT_CHARS LISP]} ) (Com {[LIT_CHARS find]} {[LIT_CHARS .]} {[LIT_CHARS -name]} {[SQ ]} ) (Com {[LIT_CHARS echo]} ) ) ) (FunctionDef search-libs [] (Pipeline (List (Com {[LIT_CHARS find]} {[LIT_CHARS .]} {[LIT_CHARS -name]} {[SQ ]} ) (Com {[LIT_CHARS find]} {[LIT_CHARS .]} {[LIT_CHARS -name]} {[SQ ]} ) ) (Com {[LIT_CHARS xargs]} {[LIT_CHARS --]} {[LIT_CHARS grep]} {[DQ [VarSub @]]} ) ) ) (Com {[DQ [VarSub @]]} ) )