diff options
Diffstat (limited to 'bin/genrelocs')
-rwxr-xr-x | bin/genrelocs | 24 |
1 files changed, 0 insertions, 24 deletions
diff --git a/bin/genrelocs b/bin/genrelocs deleted file mode 100755 index 9e3b75ffe..000000000 --- a/bin/genrelocs +++ /dev/null @@ -1,24 +0,0 @@ -#!/usr/bin/env perl - -my $num_funcs = 50; - -sub generate_class($$) -{ - my $fh = shift; - my $name = shift; - - print $fh "class $name {\n"; - print $fh " $name(); /* key method */\n"; - for (my $i = 0; $i < $num_funcs; $i++) { - print $fh "virtual int myTestFunction$i (int i)\n"; - print $fh "{ return $i; }\n"; - } - print $fh "};\n"; - print $fh "$name" . "::" . "$name() { }\n"; -} - -for (my $i = 0; $i < 200; $i++) -{ - generate_class(STDOUT, "Test$i"); -} - |