CVSROOT: /sources/m4 Module name: m4 Changes by: Eric Blake <ericb> 06/10/04 23:30:46
Index: tests/builtins.at =================================================================== RCS file: /sources/m4/m4/tests/builtins.at,v retrieving revision 1.19 retrieving revision 1.20 diff -u -b -r1.19 -r1.20 --- tests/builtins.at 18 Sep 2006 13:16:44 -0000 1.19 +++ tests/builtins.at 4 Oct 2006 23:30:46 -0000 1.20 @@ -19,6 +19,43 @@ AT_BANNER([Torturing builtins.]) +## ----- ## +## debug ## +## ----- ## + +AT_SETUP([debug]) + +AT_DATA([[debug.m4]], +[[define(`countdown', `$1 ifelse(eval($1 > 0), 1, `countdown(decr($1))', `Liftoff')') +debugmode(`aeqc') +traceon(`countdown') +countdown(2) +]]) + +AT_DATA([[expout]], +[[ + + +2 1 0 Liftoff +]]) + +AT_DATA([[experr]], +[[m4trace: -1- countdown ... +m4trace: -1- countdown(`2') -> ??? +m4trace: -1- countdown(...) -> `2 ifelse(eval(2 > 0), 1, `countdown(decr(2))', `Liftoff')' +m4trace: -1- countdown ... +m4trace: -1- countdown(`1') -> ??? +m4trace: -1- countdown(...) -> `1 ifelse(eval(1 > 0), 1, `countdown(decr(1))', `Liftoff')' +m4trace: -1- countdown ... +m4trace: -1- countdown(`0') -> ??? +m4trace: -1- countdown(...) -> `0 ifelse(eval(0 > 0), 1, `countdown(decr(0))', `Liftoff')' +]]) + +AT_CHECK_M4([debug.m4], 0, expout, experr) + +AT_CLEANUP + + ## ------ ## ## define ## ## ------ ## @@ -78,45 +115,6 @@ AT_CLEANUP - -## ----- ## -## debug ## -## ----- ## - -AT_SETUP([debug]) - -AT_DATA([[debug.m4]], -[[define(`countdown', `$1 ifelse(eval($1 > 0), 1, `countdown(decr($1))', `Liftoff')') -debugmode(`aeqc') -traceon(`countdown') -countdown(2) -]]) - -AT_DATA([[expout]], -[[ - - -2 1 0 Liftoff -]]) - -AT_DATA([[experr]], -[[m4trace: -1- countdown ... -m4trace: -1- countdown(`2') -> ??? -m4trace: -1- countdown(...) -> `2 ifelse(eval(2 > 0), 1, `countdown(decr(2))', `Liftoff')' -m4trace: -1- countdown ... -m4trace: -1- countdown(`1') -> ??? -m4trace: -1- countdown(...) -> `1 ifelse(eval(1 > 0), 1, `countdown(decr(1))', `Liftoff')' -m4trace: -1- countdown ... -m4trace: -1- countdown(`0') -> ??? -m4trace: -1- countdown(...) -> `0 ifelse(eval(0 > 0), 1, `countdown(decr(0))', `Liftoff')' -]]) - -AT_CHECK_M4([debug.m4], 0, expout, experr) - -AT_CLEANUP - - - ## ------- ## ## esyscmd ## ## ------- ##
