From 35459512e25452cbe2ed623993ebb44d66a39093 Mon Sep 17 00:00:00 2001
From: fukachan <fukachan>
Date: Wed, 15 Dec 2004 23:15:14 +0000
Subject: FNF

---
 regress/fml4to8/gen_rules.pl | 8 +++++++-
 1 file changed, 7 insertions(+), 1 deletion(-)

diff --git a/regress/fml4to8/gen_rules.pl b/regress/fml4to8/gen_rules.pl
index 9d2cfb47..c56f164b 100755
--- a/regress/fml4to8/gen_rules.pl
+++ b/regress/fml4to8/gen_rules.pl
@@ -1,6 +1,6 @@
 #!/usr/bin/env perl
 #
-# $FML$
+# $FML: gen_rules.pl,v 1.1 2004/12/09 03:45:12 fukachan Exp $
 #
 
 use strict;
@@ -92,6 +92,12 @@ sub _preamble
 print q!
 package FML::Merge::FML4::Rules;
 
+
+# Descriptions: translate fml4 rule to the corresponding fml8 one.
+#    Arguments: OBJ($self)
+#               HASH_REF($dispatch) HASH_REF($diff) STR($key) STR($value)
+# Side Effects: none
+# Return Value: STR
 sub translate
 {
     my ($self, $dispatch, $diff, $key, $value) = @_;
-- 
cgit v1.2.1