small fixes

git-svn-id: https://ws10smt.googlecode.com/svn/trunk@700 ec762483-ff6d-05da-a07a-a48fb63a330f

1 files changed, 4 insertions, 1 deletions

diff --git a/word-aligner/support/extract_vocab.pl b/word-aligner/support/extract_vocab.pl
index 070d4202..ef94b7d6 100755
--- a/word-aligner/support/extract_vocab.pl
+++ b/word-aligner/support/extract_vocab.pl
@@ -7,7 +7,10 @@ my $wc = 0;
 while(<>) {
   chomp;
   my @words = split /\s+/;
-  for my $word (@words) { $wc++; $dict{$word}++; }
+  for my $word (@words) {
+    die if $word eq '';
+    $wc++; $dict{$word}++;
+  }
 }
 
 my $tc = 0;