浏览代码

* problem with mixedup scanner in the current 1.1 compiler

peter 23 年之前
父节点
当前提交
06a83acad6
共有 2 个文件被更改,包括 18 次插入0 次删除
  1. 11 0
      tests/tbs/tb0406.pp
  2. 7 0
      tests/tbs/ub0406.pp

+ 11 - 0
tests/tbs/tb0406.pp

@@ -0,0 +1,11 @@
+unit tb0406;
+
+{$ifndef WITH_FULL}
+
+interface
+uses ub0406;
+
+implementation
+
+end.
+{$endif}

+ 7 - 0
tests/tbs/ub0406.pp

@@ -0,0 +1,7 @@
+unit ub0406;
+interface
+
+implementation
+uses tb0406;
+
+end.