瀏覽代碼

* renamed test1 to testreg1

peter 25 年之前
父節點
當前提交
b275450bb6
共有 1 個文件被更改,包括 2 次插入2 次删除
  1. 2 2
      packages/regexpr/testreg1.pp

+ 2 - 2
packages/regexpr/test1.pp → packages/regexpr/testreg1.pp

@@ -1,9 +1,9 @@
+program testreg1;
 uses
-   dpmiexcp,regexpr;
+   regexpr;
 
 var
    r : tregexprengine;
-   b : array[0..100] of char;
    index,len : longint;
 
 procedure do_error(i : longint);