summaryrefslogtreecommitdiffstats
path: root/libtommath/filter.pl
diff options
context:
space:
mode:
Diffstat (limited to 'libtommath/filter.pl')
-rwxr-xr-xlibtommath/filter.pl34
1 files changed, 0 insertions, 34 deletions
diff --git a/libtommath/filter.pl b/libtommath/filter.pl
deleted file mode 100755
index a8a50c7..0000000
--- a/libtommath/filter.pl
+++ /dev/null
@@ -1,34 +0,0 @@
-#!/usr/bin/perl
-
-# we want to filter every between START_INS and END_INS out and then insert crap from another file (this is fun)
-
-$dst = shift;
-$ins = shift;
-
-open(SRC,"<$dst");
-open(INS,"<$ins");
-open(TMP,">tmp.delme");
-
-$l = 0;
-while (<SRC>) {
- if ($_ =~ /START_INS/) {
- print TMP $_;
- $l = 1;
- while (<INS>) {
- print TMP $_;
- }
- close INS;
- } elsif ($_ =~ /END_INS/) {
- print TMP $_;
- $l = 0;
- } elsif ($l == 0) {
- print TMP $_;
- }
-}
-
-close TMP;
-close SRC;
-
-# $Source$
-# $Revision$
-# $Date$