restructure: simulation/ -> style/

7 files changed, 28 insertions, 18 deletions

diff --git a/regress/simulation/.check b/regress/simulation/.check
deleted file mode 100755
index 973992a1..00000000
--- a/regress/simulation/.check
+++ /dev/null
@@ -1,10 +0,0 @@
-#!/bin/sh
-
-tmp=/tmp/buffer$$
-trap "rm -f $tmp" 0 1 3 15
-
-find ../../ -type f -print |\
-egrep -v 'cpan|CVS|regress|__template|\.ps$' > $tmp
-
-egrep '__[A-Z]' `cat $tmp`|\
-egrep -v '__FILE__|__END__|__DATA__'
diff --git a/regress/simulation/.fix_my_name.pl b/regress/simulation/.fix_my_name.pl
deleted file mode 100755
index de71e463..00000000
--- a/regress/simulation/.fix_my_name.pl
+++ /dev/null
@@ -1,6 +0,0 @@
-while (<>) {
-
-    s/__YOUR_NAME__/Ken'ichi Fukamachi/;
-
-print;
-}
diff --git a/regress/style/check__XXX__.pl b/regress/style/check__XXX__.pl
new file mode 100755
index 00000000..8a6b437b
--- /dev/null
+++ b/regress/style/check__XXX__.pl
@@ -0,0 +1,12 @@
+#!/bin/sh
+#
+# $FML$
+#
+
+tmp=/tmp/buffer$$
+trap "rm -f $tmp" 0 1 3 15
+
+cd ../.. || exit 1
+
+egrep -r '__[A-Z]' fml |\
+egrep -v 'config.guess|configure|CVS|__template|__FILE__|__END__|__DATA__'
diff --git a/regress/simulation/.list_up_command_lock.pl b/regress/style/list_up_command_lock.pl
index 13f164a4..6b3a6b88 100755
--- a/regress/simulation/.list_up_command_lock.pl
+++ b/regress/style/list_up_command_lock.pl
@@ -1,6 +1,6 @@
 #!/usr/bin/env perl
 #
-# $FML$
+# $FML: .list_up_command_lock.pl,v 1.1 2003/04/12 14:02:35 fukachan Exp $
 #
 
 for my $x (<AdminCommand/*pm UserCommand/*pm>) {
diff --git a/regress/simulation/.module_dependence.pl b/regress/style/list_up_dependence.pl
index d349b672..f7c0fadc 100755
--- a/regress/simulation/.module_dependence.pl
+++ b/regress/style/list_up_dependence.pl
@@ -1,6 +1,6 @@
 #!/usr/bin/env perl
 #
-# $FML: .module_dependence.pl,v 1.1 2003/03/16 06:24:58 fukachan Exp $
+# $FML: .module_dependence.pl,v 1.2 2003/04/12 13:56:06 fukachan Exp $
 #
 
 use strict;
diff --git a/regress/style/list_up_message_arg b/regress/style/list_up_message_arg
new file mode 100755
index 00000000..d33cd52b
--- /dev/null
+++ b/regress/style/list_up_message_arg
@@ -0,0 +1,14 @@
+#!/bin/sh
+#
+# $FML$
+#
+
+dir=../../fml/share/message/
+
+grep -r _arg_ $dir |\
+perl -nle 's/_arg_\w+/print $&/e'|\
+sort|\
+uniq -c|\
+sort -n
+
+exit 0
diff --git a/regress/simulation/.list_up_modules.sh b/regress/style/list_up_modules.sh
index aa23138d..aa23138d 100755
--- a/regress/simulation/.list_up_modules.sh
+++ b/regress/style/list_up_modules.sh