Pārlūkot izejas kodu

* macro should give warning

peter 25 gadi atpakaļ
vecāks
revīzija
de241db0da
1 mainītis faili ar 10 papildinājumiem un 0 dzēšanām
  1. 10 0
      tests/tbf/tbf0351.pp

+ 10 - 0
tests/tbf/tbf0351.pp

@@ -0,0 +1,10 @@
+{ $OPT=-Sew }
+
+{$MACRO OFF}
+
+{ The next line should give a Warning that macro support not has
+  been turned on }
+{$define mac1 := writeln('test')}
+
+begin
+end.