(CommandList children: [ (Assignment keyword: Assign_None pairs: [(assign_pair lhs:(LhsName name:pkgname) op:Equal rhs:{(tcl)} spids:[6])] spids: [6] ) (Assignment keyword: Assign_None pairs: [(assign_pair lhs:(LhsName name:pkgver) op:Equal rhs:{(8.6.7)} spids:[9])] spids: [9] ) (Assignment keyword: Assign_None pairs: [(assign_pair lhs:(LhsName name:pkgrel) op:Equal rhs:{(0)} spids:[12])] spids: [12] ) (Assignment keyword: Assign_None pairs: [ (assign_pair lhs: (LhsName name:pkgdesc) op: Equal rhs: {(DQ ("The Tcl scripting language"))} spids: [15] ) ] spids: [15] ) (Assignment keyword: Assign_None pairs: [ (assign_pair lhs: (LhsName name:url) op: Equal rhs: {(DQ ("http://tcl.sourceforge.net/"))} spids: [20] ) ] spids: [20] ) (Assignment keyword: Assign_None pairs: [(assign_pair lhs:(LhsName name:arch) op:Equal rhs:{(DQ (all))} spids:[25])] spids: [25] ) (Assignment keyword: Assign_None pairs: [(assign_pair lhs:(LhsName name:license) op:Equal rhs:{(DQ (TCL))} spids:[30])] spids: [30] ) (Assignment keyword: Assign_None pairs: [(assign_pair lhs:(LhsName name:depends) op:Equal rhs:{(DQ )} spids:[35])] spids: [35] ) (Assignment keyword: Assign_None pairs: [(assign_pair lhs:(LhsName name:depends_dev) op:Equal rhs:{(DQ (tcl))} spids:[39])] spids: [39] ) (Assignment keyword: Assign_None pairs: [ (assign_pair lhs: (LhsName name:makedepends) op: Equal rhs: {(DQ ("zlib-dev sqlite-dev"))} spids: [44] ) ] spids: [44] ) (Assignment keyword: Assign_None pairs: [ (assign_pair lhs: (LhsName name:subpackages) op: Equal rhs: {(DQ ($ VSub_Name "$pkgname") ("-doc ") ($ VSub_Name "$pkgname") (-dev))} spids: [49] ) ] spids: [49] ) (Assignment keyword: Assign_None pairs: [ (assign_pair lhs: (LhsName name:source) op: Equal rhs: { (DQ ("http://downloads.sourceforge.net/sourceforge/") ($ VSub_Name "$pkgname") (/) ($ VSub_Name "$pkgname") ($ VSub_Name "$pkgver") ("-src.tar.gz\n") ("\ttcl-stat64.patch\n") ("\t") ) } spids: [57] ) ] spids: [57] ) (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: [71 75] ) } spids: [70] ) ] spids: [70] ) (Assignment keyword: Assign_None pairs: [ (assign_pair lhs: (LhsName name:builddir) op: Equal rhs: {(DQ ($ VSub_Name "$srcdir")) (/tcl) (${ VSub_Name pkgver) (/unix)} spids: [77] ) ] spids: [77] ) (FuncDef name: prepare body: (BraceGroup children: [ (C {(cd)} {(DQ ($ VSub_Name "$srcdir")) (/tcl) (${ VSub_Name pkgver)}) (ForEach iter_name: i iter_words: [{($ VSub_Name "$source")}] do_arg_iter: False body: (DoGroup children: [ (Case to_match: {($ VSub_Name "$i")} arms: [ (case_arm pat_list: [{(Lit_Other "*") (.patch)}] action: [ (Sentence child: (C {(msg)} {(DQ ($ VSub_Name "$i"))}) terminator: <Op_Semi ";"> ) (AndOr children: [ (C {(patch)} {(-p1)} {(-i)} {(DQ ($ VSub_Name "$srcdir")) (/) ($ VSub_Name "$i")} ) (ControlFlow token: <ControlFlow_Return return> arg_word: {(1)} ) ] op_id: Op_DPipe ) ] spids: [125 127 153 -1] ) ] spids: [118 122 156] ) ] spids: [115 159] ) spids: [111 113] ) (C {(rm)} {(-r)} {(pkgs/sqlite3) (Lit_Other "*")}) ] spids: [92] ) spids: [88 91] ) (FuncDef name: build body: (BraceGroup children: [ (Assignment keyword: Assign_Local pairs: [ (assign_pair lhs: (LhsName name:_64bit) op: Equal rhs: {(DQ (--disable-64bit))} spids: [181] ) ] spids: [179] ) (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: [199] ) ] spids: [199] ) ] spids: [196 197 203 -1] ) ] spids: [187 193 206] ) (C {(cd)} {(DQ ($ VSub_Name "$builddir"))}) (C {(./configure)} {(--build) (Lit_Other "=") ($ VSub_Name "$CBUILD")} {(--host) (Lit_Other "=") ($ VSub_Name "$CHOST")} {(--prefix) (Lit_Other "=") (/usr)} {(--sysconfdir) (Lit_Other "=") (/etc)} {(--mandir) (Lit_Other "=") (/usr/share/man)} {(--localstatedir) (Lit_Other "=") (/var)} {(--with-system-sqlite)} {($ VSub_Name "$_64bit")} ) (C {(make)}) ] spids: [176] ) spids: [172 175] ) (FuncDef name: package body: (BraceGroup children: [ (C {(cd)} {(DQ ($ VSub_Name "$builddir"))}) (C {(export)} {(Lit_VarLike "LD_LIBRARY_PATH=") (DQ ($ VSub_Name "$_builddir"))}) (C {(make)} {(-j1)} {(Lit_VarLike "INSTALL_ROOT=") (DQ (${ VSub_Name pkgdir))} {(install)} {(install-private-headers)} ) (C {(ln)} {(-sf)} {(tclsh) (${ VSub_Name _major)} {(DQ (${ VSub_Name pkgdir)) (/usr/bin/tclsh)} ) (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 ) ] spids: [272] ) spids: [268 271] ) (FuncDef name: check body: (BraceGroup children: [ (C {(cd)} {(DQ ($ VSub_Name "$builddir"))}) (C {(make)} {(test)} {(Lit_VarLike "TESTFLAGS=") (DQ ("-verbose pbtels -skip 'thread-4.5 thread-5* http* unixInit-3*'")) } ) ] spids: [382] ) spids: [378 381] ) (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: [438 456] ) } ] 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: [470 475] ) } ) (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: [486 491] ) (/) } ) (ControlFlow token: <ControlFlow_Return return> arg_word: {(1)} ) ] op_id: Op_DPipe ) ] spids: [459 501] ) spids: [437 457] ) ] spids: [421] ) spids: [417 420] ) (Assignment keyword: Assign_None pairs: [ (assign_pair lhs: (LhsName name:sha512sums) op: Equal rhs: { (DQ ( "67f6a4266dbaf5858508a8533e0334f5a76ffc6372cf321922fd032fe34f74df0368f9a3059a885e29bb0f4f7f99c78d91b8fc3700d4fa7a7f1653b436c3a154 tcl8.6.7-src.tar.gz\n" ) ( "cd52cbe80fd2be227c9018dbe38fa0888302293402e7a57f2e231c195b7c1902f1b58bc87d19c9d123915ca757e871abf084c0ef23b1a7f187bc03ba93904cc2 tcl-stat64.patch" ) ) } spids: [506] ) ] spids: [506] ) ] )