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