aboutsummaryrefslogtreecommitdiff
path: root/gfsm/gfsm/doc/programs/gfsmutils.skel
diff options
context:
space:
mode:
Diffstat (limited to 'gfsm/gfsm/doc/programs/gfsmutils.skel')
-rw-r--r--gfsm/gfsm/doc/programs/gfsmutils.skel90
1 files changed, 90 insertions, 0 deletions
diff --git a/gfsm/gfsm/doc/programs/gfsmutils.skel b/gfsm/gfsm/doc/programs/gfsmutils.skel
new file mode 100644
index 0000000..cc25d9d
--- /dev/null
+++ b/gfsm/gfsm/doc/programs/gfsmutils.skel
@@ -0,0 +1,90 @@
+[@ # -*- Mode: Perl -*-
+ my @gogs = glob('*.gog');
+ @subogs = qw();
+ foreach my $gog (sort(@gogs)) {
+ my $subog = Getopt::Gen->new(handle_rcfile=>0);
+ $subog->parse($gog);
+ push(@subogs, $subog);
+ }
+@]
+=pod
+
+=head1 NAME
+
+gfsmutils - finite state machine command-line utilities
+
+=head1 PROGRAMS
+
+The following is a list of the programs
+and user documentation contained in the gfsm package.
+See the individual manpages for details.
+
+[@
+ foreach my $subog (@subogs) {
+ next if (!defined($subog->{USER}{program})
+ || $subog->{USER}{program} =~ /^\s*$/);
+ $OUT .= ("=head2 $subog->{USER}{program}\n"
+ ."\n"
+ ."$subog->{purpose}\n"
+ ."\n"
+ ."See L<$subog->{USER}{program}> for details.\n"
+ ."\n"
+ ."\n"
+ );
+ }
+@]
+
+=cut
+
+###############################################################
+# Description
+###############################################################
+=pod
+
+=head1 DESCRIPTION
+
+The gfsmutils package provides a suite of command-line tools
+for manipulation of finite state machines (FSMs) using
+the libgfsm library.
+
+=cut
+
+###############################################################
+# Addenda
+###############################################################
+=pod
+
+=head1 ADDENDA
+
+=head2 About this Document
+
+Documentation file auto-generated by [@$og{name}@] version [@$OptGenVersion@].
+Translation was initiated
+as:
+
+ [@$CMDLINE_OPTIONS@]
+
+=cut
+
+
+###############################################################
+# Footer
+###############################################################
+#=pod
+#
+#=head1 ACKNOWLEDGEMENTS
+#
+##[ @ join('',`cat acknowledge.pod`); @ ]
+
+=head1 SEE ALSO
+
+[@
+ join(",\n", (map { $_->{USER}{program}."(1)" } @subogs));
+@],
+fsm(1), fsm(5)
+
+=head1 AUTHOR
+
+Bryan Jurish E<lt>moocow@ling.uni-potsdam.deE<gt>
+
+=cut