-#!/usr/bin/perl -w
+#!/usr/bin/env perl
# Copyright (c) 2005, 2012-2014. The SimGrid Team.
# All rights reserved.
# This program is free software; you can redistribute it and/or modify it
# under the terms of the license (GNU LGPL) which comes with this package.
+use warnings;
+
($#ARGV >= 1) or die "Usage: index_create.pl <input-tag-file> <output-doc-file>";
my($type) = "";
*
* \\htmlonly Although completely useless, the complete list of structures defined can be found <a href="annotated.html">here</a> \\endhtmlonly
-
EOF
foreach $type (qw(define enumeration enumvalue function typedef)) {
if($type eq "function") {
print OUTPUT "\t<LI> $name()</LI>\n";
} else {
- print OUTPUT "\t<LI> #$name</LI>\n";
+ if($type eq "enumeration") {
+ print OUTPUT "\t<LI> ".$name."::EType</LI>\n";
+ }
+ else {
+ print OUTPUT "\t<LI> #$name</LI>\n";
+ }
}
}
print OUTPUT "\n </ul>\n";