1 files changed, 47 insertions, 0 deletions
diff --git a/ACE/bin/DependencyGenerator/MakeObjectGenerator.pm b/ACE/bin/DependencyGenerator/MakeObjectGenerator.pm
new file mode 100644
index 00000000000..67e5cf174b8
--- /dev/null
+++ b/ACE/bin/DependencyGenerator/MakeObjectGenerator.pm
@@ -0,0 +1,47 @@
+package MakeObjectGenerator;
+
+# ************************************************************
+# Description   : Generates object files for generic Makefiles.
+# Author        : Chad Elliott
+# Create Date   : 5/23/2003
+# ************************************************************
+
+# ************************************************************
+# Pragmas
+# ************************************************************
+
+use strict;
+use ObjectGenerator;
+
+use vars qw(@ISA);
+@ISA = qw(ObjectGenerator);
+
+# ************************************************************
+# Subroutine Section
+# ************************************************************
+
+sub process {
+  my($noext)   = $_[1];
+  my(@objects) = ();
+  my(@exts)    = ('o');
+  my(@dirs)    = (defined $ENV{VDIR} ? $ENV{VDIR} : '');
+  $noext =~ s/\.[^\.]+$//o;
+
+  if (defined $ENV{SOEXT}) {
+    push(@exts, $ENV{SOEXT});
+  }
+  if (defined $ENV{VSHDIR}) {
+    push(@dirs, $ENV{VSHDIR});
+  }
+
+  foreach my $dirs (@dirs) {
+    foreach my $ext (@exts) {
+      push(@objects, "$dirs$noext.$ext");
+    }
+  }
+
+  return \@objects;
+}
+
+
+1;