:null
p
n
- /^[ ]*$/! b null
+ /^[ ]*$/ !b null
}
/^FIRSTS$/ {
:firsts
p
n
- /^[ ]*$/! b firsts
+ /^[ ]*$/ !b firsts
}
/^FDERIVES$/ {
:fderiv
p
n
- /^[ ]*$/! b fderiv
+ /^[ ]*$/ !b fderiv
}
/^DERIVES$/ {
:deriv
p
n
- /^[ ]*$/! b deriv
+ /^[ ]*$/ !b deriv
}
]])
AT_CHECK([sed -f extract.sed $1], 0, [stdout])
e: yes
FIRSTS
$axiom firsts
- 4 ($axiom)
- 5 (e)
+ $axiom
+ e
e firsts
- 5 (e)
+ e
FDERIVES
$axiom derives
0: e $
AT_CHECK([[bison --trace input.y]], [], [], [stderr])
-AT_CHECK([[sed -n 's/[ ]*$//;/^RTC: Output BEGIN/,/^RTC: Output END/p' stderr]], [],
-[[RTC: Output BEGIN
+AT_CHECK([[sed -n 's/[ ]*$//;/^RTC: Firsts Output BEGIN/,/^RTC: Firsts Output END/p' stderr]], [],
+[[RTC: Firsts Output BEGIN
012345678
.---------.
7| 11|
8| 1|
`---------'
-RTC: Output END
+RTC: Firsts Output END
]])
AT_CLEANUP
exp: no
FIRSTS
$axiom firsts
- 10 ($axiom)
- 11 (exp)
+ $axiom
+ exp
exp firsts
- 11 (exp)
+ exp
FDERIVES
$axiom derives
0: exp $