.type warn.tst
.type
.nf
.define substitute /abcd/legal ?
.define substitute /abc$/legal ?
.define substitute /abc/	*** ERROR 1/2
.define substitute /abcde/	*** ERROR 2/2
.define substitute /a$/legal ?