705 |
This will be seen. |
This will be seen. |
706 |
]]) |
]]) |
707 |
|
|
708 |
AT_CHECK_M4([tests/iso8859.m4], 0, expout) |
AT_CHECK_M4([$srcdir/iso8859.m4], 0, expout) |
709 |
|
|
710 |
AT_CLEANUP |
AT_CLEANUP |
711 |
|
|
1130 |
|
|
1131 |
AT_SETUP([shadow]) |
AT_SETUP([shadow]) |
1132 |
|
|
1133 |
|
AT_DATA([[shadow.m4]], |
1134 |
|
[[# no modules loaded yet |
1135 |
|
test |
1136 |
|
shadow |
1137 |
|
|
1138 |
|
# define our own macros for `test' and `shadow' |
1139 |
|
define(`test', `local::`test'') |
1140 |
|
define(`shadow', `local::`shadow'') |
1141 |
|
test |
1142 |
|
shadow |
1143 |
|
|
1144 |
|
# module Shadow defines `shadow' and `test' macros |
1145 |
|
load(`shadow') |
1146 |
|
dumpdef(`test') |
1147 |
|
dumpdef(`shadow') |
1148 |
|
test |
1149 |
|
shadow |
1150 |
|
|
1151 |
|
# save the definition of `test' from the Shadow module |
1152 |
|
define(`Shadow::test', defn(`test')) |
1153 |
|
|
1154 |
|
# module Test also defines a `test' macro |
1155 |
|
load(`modtest') |
1156 |
|
dumpdef(`test') |
1157 |
|
dumpdef(`shadow') |
1158 |
|
test |
1159 |
|
shadow |
1160 |
|
|
1161 |
|
# Reloading Shadow shouldn't affect anything |
1162 |
|
load(`shadow') |
1163 |
|
dumpdef(`test') |
1164 |
|
dumpdef(`shadow') |
1165 |
|
test |
1166 |
|
shadow |
1167 |
|
|
1168 |
|
# Unloading Test will unshadow the test definition in Shadow |
1169 |
|
unload(`modtest') |
1170 |
|
dumpdef(`test') |
1171 |
|
dumpdef(`shadow') |
1172 |
|
test |
1173 |
|
shadow |
1174 |
|
|
1175 |
|
# Unloading Shadow once has no effect (we loaded it twice) |
1176 |
|
unload(`shadow') |
1177 |
|
dumpdef(`test') |
1178 |
|
dumpdef(`shadow') |
1179 |
|
test |
1180 |
|
shadow |
1181 |
|
|
1182 |
|
# Unloading Shadow again will revert to copying `test' and the local |
1183 |
|
# `shadow' macro. |
1184 |
|
unload(`shadow') |
1185 |
|
test |
1186 |
|
shadow |
1187 |
|
]]) |
1188 |
|
|
1189 |
AT_DATA([[expout]], |
AT_DATA([[expout]], |
1190 |
[[# no modules loaded yet |
[[# no modules loaded yet |
1191 |
test |
test |
1255 |
shadow: <shadow> |
shadow: <shadow> |
1256 |
]]) |
]]) |
1257 |
|
|
1258 |
AT_CHECK_M4([-m load modules/shadow.m4], 0, |
AT_CHECK_M4([-m load shadow.m4], 0, |
1259 |
[expout], [experr]) |
[expout], [experr]) |
1260 |
|
|
1261 |
AT_CLEANUP |
AT_CLEANUP |
1638 |
|
|
1639 |
AT_SETUP([wrap]) |
AT_SETUP([wrap]) |
1640 |
|
|
1641 |
AT_CHECK_M4([examples/wrap.m4], 0, |
AT_DATA([[wrap.m4]], |
1642 |
|
[[divert(-1) |
1643 |
|
m4wrap(`Wrapper no. 1 |
1644 |
|
') |
1645 |
|
|
1646 |
|
m4wrap(`Wrapper no. 2 |
1647 |
|
m4wrap(`Wrapper no. 3 |
1648 |
|
m4wrap(`Wrapper no. 4 |
1649 |
|
')')') |
1650 |
|
divert |
1651 |
|
No. 33: The End. |
1652 |
|
]]) |
1653 |
|
|
1654 |
|
AT_CHECK_M4([wrap.m4], 0, |
1655 |
[[ |
[[ |
1656 |
No. 33: The End. |
No. 33: The End. |
1657 |
Wrapper no. 2 |
Wrapper no. 2 |