add svn id comments to start of file

git-svn-id: https://mosesdecoder.svn.sourceforge.net/svnroot/mosesdecoder/trunk@1307 1f5c12ca-751b-0410-a591-d2e778427230

regression-testing/compare-results.pl

@@ -1,5 +1,7 @@
 #!/usr/bin/perl -w
 
+# $Id$
+
 use strict;
 my ($results, $truth) = @ARGV;
 

regression-testing/run-single-test.pl

@@ -1,5 +1,7 @@
 #!/usr/bin/perl -w
 
+# $Id$
+
 use strict;
 my $script_dir; BEGIN { use Cwd qw/ abs_path /; use File::Basename; $script_dir = dirname(abs_path($0)); push @INC, $script_dir; }
 use MosesRegressionTesting;

regression-testing/run-test-suite.pl

@@ -1,5 +1,7 @@
 #!/usr/bin/perl -w
 
+# $Id$
+
 use strict;
 my $script_dir; BEGIN { use Cwd qw/ abs_path /; use File::Basename; $script_dir = dirname(abs_path($0)); push @INC, $script_dir; }
 use Getopt::Long;

scripts/analysis/nontranslated_words.pl

@@ -1,4 +1,6 @@
 #!/usr/bin/perl
+
+# $Id$
 # Reads a source and hypothesis file and counts equal tokens. Some of these
 # are punctuation, some are numbers, but most of the remaining are simply
 # unknown words that the decoder just copied. This script tells you how often

scripts/analysis/sentence-by-sentence.pl

@@ -1,5 +1,6 @@
 #!/usr/bin/perl -w
 
+# $Id$
 #sentence-by-sentence: take in a system output, with any number of factors, and a reference translation, also maybe with factors, and show each sentence and its errors
 #usage: sentence-by-sentence SYSOUT [REFERENCE]+ > sentences.html
 

scripts/analysis/show-phrases-used.pl

@@ -1,5 +1,6 @@
 #!/usr/bin/perl -w
 
+# $Id$
 #show-phrases-used: display all source and target phrases for each sentence in a corpus, and give average phrase length used
 #usage: show-phrases-used DECODER_OUTFILE > output.html
 #  where DECODER_OUTFILE is the output of moses with the -T (show alignments) option

scripts/analysis/smtgui/filter-phrase-table.pl

@@ -1,5 +1,6 @@
 #!/usr/bin/perl -w
 
+# $Id$
 #by Philipp Koehn, de-augmented by Evan Herbst
 #filter a phrase table for a specific input corpus
 #arguments: phrasetable_filename input_filename factor_index (0...)

scripts/analysis/smtgui/newsmtgui.cgi

@@ -1,5 +1,6 @@
 #!/usr/bin/perl -w
 
+# $Id$
 use strict;
 
 use CGI;

scripts/check-dependencies.pl

@@ -1,39 +1,41 @@
-#!/usr/bin/perl
+#!/usr/bin/perl
-
+
-my ($home, $target_dir, $release_dir, $bin_dir) = @ARGV;
+# $Id: consolidate-training-data.perl 40 2007-03-14 22:48:03Z hieu $
-
+
-#print "HOME: $home\nTARGET_DIR: $target_dir\nRELEASE_DIR: $release_dir\n";
+my ($home, $target_dir, $release_dir, $bin_dir) = @ARGV;
-
+
-if ($target_dir eq '' || -z $target_dir) {
+#print "HOME: $home\nTARGET_DIR: $target_dir\nRELEASE_DIR: $release_dir\n";
-  print <<EOT;
+
-Please specify a TARGETDIR.
+if ($target_dir eq '' || -z $target_dir) {
-
+  print <<EOT;
-  For development releases you probably want the following:
+Please specify a TARGETDIR.
-  TARGETDIR=$home/releases make release
+
-
+  For development releases you probably want the following:
-  For shared environments, you will want to set TARGETDIR to
+  TARGETDIR=$home/releases make release
-  some appropriately common directory.
+
-
+  For shared environments, you will want to set TARGETDIR to
-EOT
+  some appropriately common directory.
-  exit 1;
+
-}
+EOT
-
+  exit 1;
-if (-e $release_dir) {
+}
-  print "Targetdir exists! Not touching it! $release_dir";
+
-  exit 1;
+if (-e $release_dir) {
-}
+  print "Targetdir exists! Not touching it! $release_dir";
-
+  exit 1;
-unless (-x "$bin_dir/GIZA++" && -x "$bin_dir/snt2cooc.out" && -x "$bin_dir/mkcls" ) {
+}
-  print <<EOT;
+
-Please specify a BINDIR.
+unless (-x "$bin_dir/GIZA++" && -x "$bin_dir/snt2cooc.out" && -x "$bin_dir/mkcls" ) {
-
+  print <<EOT;
-  The BINDIR directory must contain GIZA++, snt2cooc.out and mkcls executables.
+Please specify a BINDIR.
-  These are available from http://www.fjoch.com/GIZA++.html and
+
-  http://www-i6.informatik.rwth-aachen.de/Colleagues/och/software/mkcls.html .
+  The BINDIR directory must contain GIZA++, snt2cooc.out and mkcls executables.
-EOT
+  These are available from http://www.fjoch.com/GIZA++.html and
-  exit 1;
+  http://www-i6.informatik.rwth-aachen.de/Colleagues/och/software/mkcls.html .
-}
+EOT
-
+  exit 1;
-
+}
-exit 0;
+
-
+
+exit 0;
+

scripts/check-dependenciesWIN32.pl

@@ -1,39 +1,41 @@
-#!/usr/bin/perl
+#!/usr/bin/perl
-
+
-my ($home, $target_dir, $release_dir, $bin_dir) = @ARGV;
+# $Id: consolidate-training-data.perl 40 2007-03-14 22:48:03Z hieu $
-
+
-#print "HOME: $home\nTARGET_DIR: $target_dir\nRELEASE_DIR: $release_dir\n";
+my ($home, $target_dir, $release_dir, $bin_dir) = @ARGV;
-
+
-if ($target_dir eq '' || -z $target_dir) {
+#print "HOME: $home\nTARGET_DIR: $target_dir\nRELEASE_DIR: $release_dir\n";
-  print <<EOT;
+
-Please specify a TARGETDIR.
+if ($target_dir eq '' || -z $target_dir) {
-
+  print <<EOT;
-  For development releases you probably want the following:
+Please specify a TARGETDIR.
-  TARGETDIR=$home/releases make release
+
-
+  For development releases you probably want the following:
-  For shared environments, you will want to set TARGETDIR to
+  TARGETDIR=$home/releases make release
-  some appropriately common directory.
+
-
+  For shared environments, you will want to set TARGETDIR to
-EOT
+  some appropriately common directory.
-  exit 1;
+
-}
+EOT
-
+  exit 1;
-if (-e $release_dir) {
+}
-  print "Targetdir exists! Not touching it! $release_dir";
+
-  exit 1;
+if (-e $release_dir) {
-}
+  print "Targetdir exists! Not touching it! $release_dir";
-
+  exit 1;
-unless (-x "$bin_dir/GIZA++" && -x "$bin_dir/snt2cooc.out" && -x "$bin_dir/mkcls" ) {
+}
-  print <<EOT;
+
-Please specify a BINDIR.
+unless (-x "$bin_dir/GIZA++" && -x "$bin_dir/snt2cooc.out" && -x "$bin_dir/mkcls" ) {
-
+  print <<EOT;
-  The BINDIR directory must contain GIZA++, snt2cooc.out and mkcls executables.
+Please specify a BINDIR.
-  These are available from http://www.fjoch.com/GIZA++.html and
+
-  http://www-i6.informatik.rwth-aachen.de/Colleagues/och/software/mkcls.html .
+  The BINDIR directory must contain GIZA++, snt2cooc.out and mkcls executables.
-EOT
+  These are available from http://www.fjoch.com/GIZA++.html and
-  exit 0;
+  http://www-i6.informatik.rwth-aachen.de/Colleagues/och/software/mkcls.html .
-}
+EOT
-
+  exit 0;
-
+}
-exit 0;
+
-
+
+exit 0;
+

scripts/generic/extract-factors.pl

@@ -1,5 +1,6 @@
 #!/usr/bin/perl -w
 
+# $Id$
 #extract-factors.pl: extract only the desired factors from a factored corpus
 #usage: extract-factors corpusfile factor-index factor-index ... > outfile
 #factor indices start at 0

scripts/generic/lopar2pos.pl

@@ -1,5 +1,6 @@
 #!/usr/bin/perl -w
 
+# $Id$
 #lopar2pos: extract POSs from LOPAR output
 #usage: lopar2pos.pl CORPUS.lopar > CORPUS.pos
 

scripts/generic/moses-parallel.pl

@@ -1,5 +1,6 @@
 #! /usr/bin/perl
 
+# $Id$
 #######################
 # Revision history
 #

scripts/generic/multi-bleu.perl

@@ -1,5 +1,6 @@
 #!/usr/bin/perl -w
 
+# $Id$
 use strict;
 
 my $stem = $ARGV[0];

scripts/generic/qsub-wrapper.pl

@@ -1,5 +1,6 @@
 #! /usr/bin/perl
 
+# $Id$
 use strict;
 
 #######################

scripts/recaser/recase.perl

@@ -1,5 +1,6 @@
 #!/usr/bin/perl -w
 
+# $Id: consolidate-training-data.perl 40 2007-03-14 22:48:03Z hieu $
 use strict;
 use Getopt::Long "GetOptions";
 

scripts/recaser/train-recaser.perl

@@ -1,5 +1,6 @@
 #!/usr/bin/perl -w
 
+# $Id: consolidate-training-data.perl 40 2007-03-14 22:48:03Z hieu $
 use strict;
 use Getopt::Long "GetOptions";
 

scripts/tests/full-train-mert-decode.test

@@ -1,5 +1,7 @@
 #!/bin/bash
 
+# $Id: consolidate-training-data.perl 40 2007-03-14 22:48:03Z hieu $
+
 function die() {
   echo "$@"
   exit 1

scripts/tests/train-factored-test-step9.test

@@ -1,5 +1,7 @@
 #!/bin/bash
 
+# $Id$
+
 function die() {
   echo "$@"
   exit 1

scripts/training/absolutize_moses_model.pl

@@ -1,4 +1,6 @@
 #!/usr/bin/perl
+
+# $Id$
 # given a moses.ini file, prints a copy to stdout but replaces all relative
 # paths with absolute paths.
 #

scripts/training/analyse_moses_model.pl

@@ -1,4 +1,6 @@
 #!/usr/bin/perl
+
+# $Id$
 # given a moses.ini file, checks the translation and generation tables and reports
 # statistics on ambiguity
 # Ondrej Bojar

scripts/training/build-generation-table.perl

@@ -1,5 +1,6 @@
 #!/usr/bin/perl
 
+# $Id$
 use strict;
 use Getopt::Long "GetOptions";
 

scripts/training/clean-corpus-n.perl

@@ -1,5 +1,6 @@
 #!/usr/bin/perl -w
 
+# $Id$
 use strict;
 use Getopt::Long;
 my $help;

scripts/training/clone_moses_model.pl

@@ -1,4 +1,6 @@
 #!/usr/bin/perl
+
+# $Id$
 # given a moses.ini file, creates a wiseln of it and all the included bits
 # in the current directory
 

scripts/training/cmert-0.5/bleu.py

@@ -1,5 +1,7 @@
 #!/usr/bin/python
 
+# $Id$
+
 '''Provides:
 
 cook_refs(refs, n=4): Transform a list of reference sentences as strings into a form usable by cook_test().

scripts/training/cmert-0.5/data.c

@@ -1,3 +1,4 @@
+// $Id$
 #include <stdio.h>
 #include <stdlib.h>
 #include <string.h>

scripts/training/cmert-0.5/data.h

@@ -1,3 +1,4 @@
+// $Id$
 #ifndef DATA_H
 #define DATA_H
 

scripts/training/cmert-0.5/dataset.py

@@ -1,5 +1,6 @@
 #!/usr/bin/python2.3
 
+# $Id$
 '''Decoder interface:
 
 Dataset.process() expects a function, which in turn takes a Sentence as input

scripts/training/cmert-0.5/log.py

@@ -1,4 +1,6 @@
 #!/usr/bin/python
+
+# $Id$
 import sys
 
 level = 1

scripts/training/cmert-0.5/mert.c

@@ -1,3 +1,4 @@
+// $Id$
 #include <stdlib.h>
 #include <unistd.h>
 #include <math.h>

scripts/training/cmert-0.5/point.c

@@ -1,3 +1,4 @@
+// $Id$
 #include <stdlib.h>
 #include <stdio.h>
 #include <string.h>

scripts/training/cmert-0.5/point.h

@@ -1,3 +1,4 @@
+// $Id$
 #ifndef POINT_H
 #define POINT_H
 

scripts/training/cmert-0.5/score-nbest.py

@@ -1,5 +1,6 @@
 #!/usr/bin/python
 
+# $Id$
 """Convert n-best list in mert.perl format to format required by
 Venugopal's MER trainer. This entails calculating the BLEU component scores."""
 

scripts/training/cmert-0.5/score.c

@@ -1,3 +1,4 @@
+// $Id$
 #include <math.h>
 #include <stdio.h>
 

scripts/training/cmert-0.5/score.h

@@ -1,3 +1,4 @@
+// $Id$
 #ifndef SCORE_H
 #define SCORE_H
 

scripts/training/combine_factors.pl

@@ -1,4 +1,6 @@
 #!/usr/bin/perl
+
+# $Id$
 # given a list of files, combines them to a single corpus (sent to stdout)
 
 use strict;

scripts/training/exodus.perl

@@ -1,5 +1,7 @@
 #!/usr/bin/perl -w
 
+# $Id: consolidate-training-data.perl 40 2007-03-14 22:48:03Z hieu $
+
 use strict;
 
 my @LINE = <STDIN>;

scripts/training/filter-and-binarize-model-given-input.pl

@@ -1,4 +1,6 @@
 #!/usr/bin/perl -w
+
+# $Id$
 # Given a moses.ini file and an input text prepare minimized translation
 # tables and a new moses.ini, so that loading of tables is much faster.
 

scripts/training/filter-model-given-input.pl

@@ -1,4 +1,6 @@
 #!/usr/bin/perl -w
+
+# $Id$
 # Given a moses.ini file and an input text prepare minimized translation
 # tables and a new moses.ini, so that loading of tables is much faster.
 

scripts/training/mert-moses.pl

@@ -1,4 +1,6 @@
 #!/usr/bin/perl -w
+
+# $Id$
 # Usage:
 # mert-moses.pl <foreign> <english> <decoder-executable> <decoder-config>
 # For other options see below or run 'mert-moses.pl --help'

scripts/training/phrase-extract/extract.cpp

@@ -1,3 +1,4 @@
+// $Id$
 
 #include <cstdio>
 #include <iostream>

scripts/training/phrase-extract/score.cpp

@@ -1,3 +1,4 @@
+// $Id$
 using namespace std;
 
 #include <cstdio>

scripts/training/phrase-extract/tables-core.cpp

@@ -1,3 +1,4 @@
+// $Id$
 //#include "beammain.h"
 #include "tables-core.h"
 

scripts/training/phrase-extract/tables-core.h

@@ -1,3 +1,5 @@
+// $Id$
+
 #ifndef _TABLES_H
 #define _TABLES_H
 

scripts/training/postprocess-lopar.perl

@@ -1,5 +1,7 @@
 #!/usr/bin/perl -w
 
+# $Id$
+
 use strict;
 
 use utf8;

scripts/training/reduce_combine.pl

@@ -1,4 +1,6 @@
 #!/usr/bin/perl
+
+# $Id$
 # given a pathname to a factored corpus, a list of (numeric) factors to keep
 # and a list of (labelled) factors to attach from factors/<basename>.label
 # produces new corpus on stdout

scripts/training/symal/cmd.c

@@ -1,4 +1,6 @@
 
+// $Id$
+
 #include	<stdio.h>
 #include	<stdlib.h>
 #include	<ctype.h>

scripts/training/symal/cmd.h

@@ -1,4 +1,6 @@
 
+// $Id$
+
 #if !defined(CMD_H)
 
 #define	CMD_H

scripts/training/symal/giza2bal.pl

@@ -1,5 +1,6 @@
 #! /usr/bin/perl
 
+# $Id$
 #Converts direct and inverted alignments into a more compact 
 #bi-alignment format. It optionally reads the counting file 
 #produced by giza containing the frequency of each traning sentence.

scripts/training/symal/symal.cpp

@@ -1,5 +1,7 @@
 using namespace std;
 
+// $Id$
+
 #include <cassert>
 #include <iomanip>
 #include <iostream>

scripts/training/train-factored-phrase-model.perl

@@ -1,5 +1,7 @@
 #!/usr/bin/perl -w
 
+# $Id$
+
 use strict;
 use Getopt::Long "GetOptions";