Browse Source

Adds Sorokin's RegExpr.pas to the Free Pascal Packages, as discussed in the mailling list. Renamed the old RegExpr.pp to oldregexpr.pp

git-svn-id: trunk@18891 -
sekelsenmat 14 năm trước cách đây
mục cha
commit
233081e94c

+ 1 - 1
.gitattributes

@@ -5831,8 +5831,8 @@ packages/regexpr/examples/Makefile.fpc svneol=native#text/plain
 packages/regexpr/examples/testreg1.pp svneol=native#text/plain
 packages/regexpr/fpmake.pp svneol=native#text/plain
 packages/regexpr/src/old/regexpr.pp svneol=native#text/plain
+packages/regexpr/src/oldregexpr.pp svneol=native#text/pascal
 packages/regexpr/src/regex.pp svneol=native#text/plain
-packages/regexpr/src/regexpr.pp svneol=native#text/plain
 packages/rexx/Makefile svneol=native#text/plain
 packages/rexx/Makefile.fpc svneol=native#text/plain
 packages/rexx/examples/Makefile svneol=native#text/plain

+ 1 - 1
packages/regexpr/examples/testreg1.pp

@@ -4,7 +4,7 @@
 
 program testreg1;
 uses
-   regexpr;
+   oldregexpr;
 
 var
    r         : tregexprengine;

+ 6 - 1
packages/regexpr/fpmake.pp

@@ -19,8 +19,13 @@ begin
     P.Version:='2.7.1';
     P.SourcePath.Add('src');
 
-    T:=P.Targets.AddUnit('regexpr.pp');
+    // Sorokin's RegExpr
+    T:=P.Targets.AddUnit('regexpr.pas');
+
+    // RegEx from Joost
+    T:=P.Targets.AddUnit('oldregexpr.pp');
     T:=P.Targets.AddUnit('regex.pp');
+
     T.ResourceStrings := True;
 
     P.ExamplePath.Add('tests');

+ 0 - 0
packages/regexpr/src/regexpr.pp → packages/regexpr/src/oldregexpr.pp