######################################################################## # # # This software is part of the ast package # # Copyright (c) 1994-2011 AT&T Intellectual Property # # and is licensed under the # # Eclipse Public License, Version 1.0 # # by AT&T Intellectual Property # # # # A copy of the License is available at # # http://www.eclipse.org/org/documents/epl-v10.html # # (with md5 checksum b35adb5213ca9657e911e9befb180842) # # # # Information and Software Systems Research # # AT&T Research # # Florham Park NJ # # # # Glenn Fowler # # # ######################################################################## # non-ksh script for the nmake ignore prefix # @(#)ignore (AT&T Research) 1992-08-11 matchstr $Flags:$BASH_VERSION { *x*:[0123456789]* { : bash set -x is broken :; set +ex } } while : { matchstr $Argc { 0 { exit 0 } } matchstr $1 { *=* { matchstr $RANDOM { $RANDOM {$[echo $1 | sed "s/\\([^=]*\\)=\\(.*\\)/eval \\1='\\2'; export \\1/] } * { export $1 } } shift } * { break } } } @Argv exit 0 (CommandList children: [ (Case to_match: {($ VSub_Hyphen "$-") (Lit_Other ":") ($ VSub_Name "$BASH_VERSION")} arms: [ (case_arm pat_list: [ {(Lit_Other "*") (x) (Lit_Other "*") (Lit_Other ":") (Lit_Other "[") (0123456789) (Lit_Other "]") (Lit_Other "*") } ] action: [ (Sentence child: (C {(Lit_Other ":")} {(bash)} {(set)} {(-x)} {(is)} {(broken)} {(Lit_Other ":")}) terminator: ) (C {(set)} {(Lit_Other "+") (ex)}) ] spids: [72 80 102 -1] ) ] spids: [64 70 104] ) (While cond: [(C {(Lit_Other ":")})] body: (DoGroup children: [ (Case to_match: {($ VSub_Pound "$#")} arms: [(case_arm pat_list:[{(0)}] action:[(C {(exit)} {(0)})] spids:[120121127-1])] spids: [113 117 130] ) (Case to_match: {($ VSub_Number "$1")} arms: [ (case_arm pat_list: [{(Lit_Other "*") (Lit_Other "=") (Lit_Other "*")}] action: [ (Case to_match: {($ VSub_Name "$RANDOM")} arms: [ (case_arm pat_list: [{($ VSub_Name "$RANDOM")}] action: [ (C { (CommandSubPart command_list: (CommandList children: [ (Pipeline children: [ (C {(echo)} {($ VSub_Number "$1")}) (C {(sed)} { (DQ (s/) (EscapedLiteralPart token: ) ("([^=]*") (EscapedLiteralPart token:) (")=") (EscapedLiteralPart token: ) ("(.*") (EscapedLiteralPart token:) (")/eval ") (EscapedLiteralPart token: ) ("1='") (EscapedLiteralPart token:) ("2'; export ") (EscapedLiteralPart token: ) (1/) ) } ) ] negated: False ) ] ) left_token: spids: [154 180] ) } ) ] spids: [152 153 182 -1] ) (case_arm pat_list: [{(Lit_Other "*")}] action: [(C {(export)} {(DQ ($ VSub_Number "$1"))})] spids: [185 186 194 -1] ) ] spids: [145 149 197] ) (C {(shift)}) ] spids: [140 143 203 -1] ) (case_arm pat_list: [{(Lit_Other "*")}] action: [(ControlFlow token:)] spids: [206 207 212 -1] ) ] spids: [133 137 215] ) ] spids: [111 217] ) ) (C {(DQ ($ VSub_At "$@"))}) (C {(exit)} {(0)}) ] )