Added test for hook precedence

samples/sample.unittests.txt

@@ -823,6 +823,18 @@
 18091 T = 1
 18093 S = (T = 2) : GOSUB 1
 
+18100 T$ = "Output Hook Precedence
+: A$ = "abc" + CHR$(7) + "xyz"
+: PRINT CHR$(4)"OPEN TESTDATA"
+: PRINT CHR$(4)"WRITE TESTDATA"
+: PRINT A$
+: PRINT CHR$(4)"CLOSE TESTDATA"
+: PRINT CHR$(4)"OPEN TESTDATA"
+: PRINT CHR$(4)"READ TESTDATA"
+: INPUT B$
+: PRINT CHR$(4)"CLOSE TESTDATA"
+: S = (A$ = B$) : GOSUB 1
+
 20000 PRINT : PRINT : PRINT "Executed tests: "; TE
 20010 PRINT "Successful tests: "; TS
 20019 IF F THEN INVERSE