(CommandList children: [ (Assignment keyword: Assign_None pairs: [(assign_pair lhs:(LhsName name:pkgname) op:Equal rhs:{(tk)} spids:[3])] spids: [3] ) (Assignment keyword: Assign_None pairs: [(assign_pair lhs:(LhsName name:pkgver) op:Equal rhs:{(8.6.6)} spids:[6])] spids: [6] ) (Assignment keyword: Assign_None pairs: [(assign_pair lhs:(LhsName name:pkgrel) op:Equal rhs:{(1)} spids:[9])] spids: [9] ) (Assignment keyword: Assign_None pairs: [ (assign_pair lhs: (LhsName name:pkgdesc) op: Equal rhs: {(DQ ('GUI toolkit for the Tcl scripting language'))} spids: [12] ) ] spids: [12] ) (Assignment keyword: Assign_None pairs: [ (assign_pair lhs: (LhsName name:url) op: Equal rhs: {(DQ ('http://tcl.sourceforge.net/'))} spids: [17] ) ] spids: [17] ) (Assignment keyword: Assign_None pairs: [(assign_pair lhs:(LhsName name:arch) op:Equal rhs:{(DQ (all))} spids:[22])] spids: [22] ) (Assignment keyword: Assign_None pairs: [(assign_pair lhs:(LhsName name:license) op:Equal rhs:{(DQ (TCL))} spids:[27])] spids: [27] ) (Assignment keyword: Assign_None pairs: [(assign_pair lhs:(LhsName name:depends) op:Equal rhs:{(SQ )} spids:[32])] spids: [32] ) (Assignment keyword: Assign_None pairs: [ (assign_pair lhs: (LhsName name:depends_dev) op: Equal rhs: {(DQ ('tcl-dev libx11-dev libxft-dev fontconfig-dev'))} spids: [34] ) ] spids: [34] ) (Assignment keyword: Assign_None pairs: [ (assign_pair lhs: (LhsName name:makedepends) op: Equal rhs: {(DQ ($ VSub_Name '$depends_dev') (' libpng-dev'))} spids: [39] ) ] spids: [39] ) (Assignment keyword: Assign_None pairs: [ (assign_pair lhs: (LhsName name:subpackages) op: Equal rhs: {(DQ ($ VSub_Name '$pkgname') ('-doc ') ($ VSub_Name '$pkgname') (-dev))} spids: [45] ) ] spids: [45] ) (Assignment keyword: Assign_None pairs: [ (assign_pair lhs: (LhsName name:source) op: Equal rhs: { (DQ ('http://downloads.sourceforge.net/sourceforge/tcl/') ($ VSub_Name '$pkgname') ($ VSub_Name '$pkgver') ('-src.tar.gz\n') ('\t') ) } spids: [53] ) ] spids: [53] ) (Assignment keyword: Assign_None pairs: [ (assign_pair lhs: (LhsName name:_major) op: Equal rhs: { (BracedVarSub token: <VSub_Name pkgver> suffix_op: (StringUnary op_id:VOp1_Percent arg_word:{('.*')}) spids: [64 68] ) } spids: [63] ) ] spids: [63] ) (Assignment keyword: Assign_None pairs: [ (assign_pair lhs: (LhsName name:builddir) op: Equal rhs: {(DQ ($ VSub_Name '$srcdir')) (/tk) (${ VSub_Name pkgver) (/unix)} spids: [70] ) ] spids: [70] ) (FuncDef name: build body: (BraceGroup children: [ (Assignment keyword: Assign_Local pairs: [ (assign_pair lhs: (LhsName name:_64bit) op: Equal rhs: {(DQ (--disable-64bit))} spids: [90] ) ] spids: [88] ) (Case to_match: {(DQ ($ VSub_Name '$CARCH'))} arms: [ (case_arm pat_list: [{(x86_64)}] action: [ (Assignment keyword: Assign_None pairs: [ (assign_pair lhs: (LhsName name:_64bit) op: Equal rhs: {(DQ (--enable-64bit))} spids: [108] ) ] spids: [108] ) ] spids: [105 106 112 16777215] ) ] spids: [96 102 115] ) (C {(cd)} {(DQ ($ VSub_Name '$builddir'))}) (AndOr children: [ (C {(./configure)} {(--build) (Lit_Other '=') ($ VSub_Name '$CBUILD')} {(--host) (Lit_Other '=') ($ VSub_Name '$CHOST')} {(--prefix) (Lit_Other '=') (/usr)} {(--mandir) (Lit_Other '=') (/usr/share/man)} {($ VSub_Name '$_64bit')} ) (ControlFlow token:<ControlFlow_Return return> arg_word:{(1)}) ] op_id: Op_DPipe ) (AndOr children: [(C {(make)}) (ControlFlow token:<ControlFlow_Return return> arg_word:{(1)})] op_id: Op_DPipe ) ] spids: [85] ) spids: [81 84] ) (FuncDef name: package body: (BraceGroup children: [ (C {(cd)} {(DQ ($ VSub_Name '$builddir'))}) (C {(export)} {(Lit_VarLike 'LD_LIBRARY_PATH=') (DQ ($ VSub_Name '$builddir'))}) (AndOr children: [ (C {(make)} {(-j1)} {(Lit_VarLike 'INSTALL_ROOT=') (DQ (${ VSub_Name pkgdir))} {(install)} {(install-private-headers)} ) (ControlFlow token:<ControlFlow_Return return> arg_word:{(1)}) ] op_id: Op_DPipe ) (C {(ln)} {(-sf)} {(wish) (${ VSub_Name _major)} {(DQ (${ VSub_Name pkgdir)) (/usr/bin/wish)}) (C {(install)} {(-Dm644)} {(../license.terms)} {(${ VSub_Name pkgdir) (/usr/share/licenses/) (${ VSub_Name pkgname) (/LICENSE)} ) (Pipeline children: [ (C {(find)} {(DQ ($ VSub_Name '$pkgdir'))} {(-name)} {(SQ <'*Config.sh'>)}) (C {(xargs)} {(sed)} {(-i)} {(-e)} {(DQ ('s#') (${ VSub_Name srcdir) ('#/usr/src#'))}) ] negated: False ) (C {(mkdir)} {(-p)} {(DQ ($ VSub_Name '$pkgdir')) (/usr/share/doc/) ($ VSub_Name '$pkgname') (/examples/)} ) (AndOr children: [ (C {(mv)} {(DQ ($ VSub_Name '$pkgdir')) (/usr/lib/tk) (${ VSub_Name _major) (/demos/)} {(DQ ($ VSub_Name '$pkgdir')) (/usr/share/doc/) ($ VSub_Name '$pkgname') (/examples/) } ) (ControlFlow token:<ControlFlow_Return return> arg_word:{(1)}) ] op_id: Op_DPipe ) ] spids: [180] ) spids: [176 179] ) (FuncDef name: dev body: (BraceGroup children: [ (C {(default_dev)}) (C {(cd)} {($ VSub_Name '$pkgdir')}) (ForEach iter_name: i iter_words: [ { (CommandSubPart command_list: (CommandList children: [ (C {(find)} {(.)} {(-name)} {(SQ <'*.c'>)} {(-o)} {(-name)} {(SQ <'*Config.sh'>)}) ] ) left_token: <Left_CommandSub '$('> spids: [357 375] ) } ] do_arg_iter: False body: (DoGroup children: [ (C {(mkdir)} {(-p)} {(DQ ($ VSub_Name '$subpkgdir')) (/) (BracedVarSub token: <VSub_Name i> suffix_op: (StringUnary op_id:VOp1_Percent arg_word:{(Lit_Slash /) ('*')}) spids: [389 394] ) } ) (AndOr children: [ (C {(mv)} {($ VSub_Name '$i')} {(DQ ($ VSub_Name '$subpkgdir')) (/) (BracedVarSub token: <VSub_Name i> suffix_op: (StringUnary op_id: VOp1_Percent arg_word: {(Lit_Slash /) ('*')} ) spids: [405 410] ) (/) } ) (ControlFlow token: <ControlFlow_Return return> arg_word: {(1)} ) ] op_id: Op_DPipe ) ] spids: [378 420] ) spids: [356 376] ) ] spids: [340] ) spids: [336 339] ) (Assignment keyword: Assign_None pairs: [ (assign_pair lhs: (LhsName name:md5sums) op: Equal rhs: {(DQ ('dd7dbb3a6523c42d05f6ab6e86096e99 tk8.6.6-src.tar.gz'))} spids: [425] ) ] spids: [425] ) (Assignment keyword: Assign_None pairs: [ (assign_pair lhs: (LhsName name:sha256sums) op: Equal rhs: { (DQ ( 'd62c371a71b4744ed830e3c21d27968c31dba74dd2c45f36b9b071e6d88eb19d tk8.6.6-src.tar.gz' ) ) } spids: [430] ) ] spids: [430] ) (Assignment keyword: Assign_None pairs: [ (assign_pair lhs: (LhsName name:sha512sums) op: Equal rhs: { (DQ ( '223c72ab5a6f6040928c56843598b878efafab44ed4152a38e68aa2800f2c181adc50a8bf23279b7d446493eec43854920e8b649b6a34ecdf31ecc07ccc74044 tk8.6.6-src.tar.gz' ) ) } spids: [435] ) ] spids: [435] ) ] )