The Hitachi SR8000 compiler doesn't seem to like the way the thorn

attributes list was being assigned, so now have to declare the array with
a fixed size and assign each member of the array manually 8-(  Maybe one
day they'll fix the compiler and things can be tidied up again...

Tom


git-svn-id: http://svn.cactuscode.org/flesh/trunk@2208 17b73243-c579-4c4c-a9d2-2d5706c11dac

1 files changed, 16 insertions, 8 deletions

diff --git a/lib/sbin/CreateImplementationBindings.pl b/lib/sbin/CreateImplementationBindings.pl
index 53014d0d..236ce67f 100644
--- a/lib/sbin/CreateImplementationBindings.pl
+++ b/lib/sbin/CreateImplementationBindings.pl
@@ -112,14 +112,22 @@ sub CreateImplementationBindings
     push(@data, "    0,");
     push(@data, "  };\n");
 
-    push(@data, "\n  struct iAttributeList attributes[] =");
-    push(@data, "  {");
-    push(@data, "    {\"name\",          {name}},");
-    push(@data, "    {\"implementation\",{implementation}},");
-    push(@data, "    {\"ancestors\",{ancestors}},");
-    push(@data, "    {\"friends\",{friends}},");
-    push(@data, "    {0,{0}},");
-    push(@data, "  };\n");
+    push(@data, "  /* Should be able to do below with a constant initialiser but sr8000 compiler complains");
+    push(@data, "   * So have to laboriously assign values to each member of array.");
+    push(@data, "   */");
+    push(@data, "  struct iAttributeList attributes[5];");
+    push(@data, "");
+    push(@data, "  attributes[0].attribute =              \"name\";");
+    push(@data, "  attributes[0].AttributeData.StringList = name;");
+    push(@data, "  attributes[1].attribute =              \"implementation\";");
+    push(@data, "  attributes[1].AttributeData.StringList = implementation;");
+    push(@data, "  attributes[2].attribute =              \"ancestors\";");
+    push(@data, "  attributes[2].AttributeData.StringList = ancestors;");
+    push(@data, "  attributes[3].attribute =              \"friends\";");
+    push(@data, "  attributes[3].AttributeData.StringList = friends;");
+    push(@data, "  attributes[4].attribute =                0;");
+    push(@data, "  attributes[4].AttributeData.StringList = 0;");
+    push(@data, "\n");
 
     push(@data, "  retval = CCTKi_RegisterThorn(attributes);");