Changeset 5950 for trunk/glueforge/templates/psdb/alloc_c.tt

Timestamp:

Jan 6, 2006, 6:46:10 PM (21 years ago)

Author:

jhoblitt

Message:

fix tests to work with per table data
minor pslib 0.9.0 compatibility fixes

File:

• trunk/glueforge/templates/psdb/alloc_c.tt (modified) (1 diff)

trunk/glueforge/templates/psdb/alloc_c.tt

@@ -9 +9 @@
 int main ()
 {
-    [% indented(table.object_name, "*object") %];
+[% FOREACH table = tables -%]
+    {
+        [% indented(table.object_name, "*object") %];
 
-    object = [% table.object_name %]Alloc(
+        object = [% table.object_name %]Alloc(
 [%- SET i = 0 -%]
 [%- FOREACH item = table.columns -%]
-    [%- IF i == 0 -%][%- i = 1 -%][%- ELSE -%], [% END -%] [%- item.test -%]
+        [%- IF i == 0 -%][%- i = 1 -%][%- ELSE -%], [% END -%] [%- item.test -%]
 [%- END -%]
-);
+    );
 
-    if (!object) {
-        exit(EXIT_FAILURE);
-    }
+        if (!object) {
+            exit(EXIT_FAILURE);
+        }
 
 [% FOREACH item = table.columns -%]
 [% IF item.type == "S32" or item.type == "F32" or item.type == "F64" or item.type == "BOOL" -%]
-    if (!object->[% item.name %] == [% item.test %]) {
+        if (!object->[% item.name %] == [% item.test %]) {
 [% ELSIF item.type == "STR" -%]
-    if (strncmp(object->[% item.name %], [% item.test %], MAX_STRING_LENGTH)) {
+        if (strncmp(object->[% item.name %], [% item.test %], MAX_STRING_LENGTH)) {
 [% END -%]
-        psFree(object);
-        exit(EXIT_FAILURE);
-    }
+            psFree(object);
+            exit(EXIT_FAILURE);
+        }
 [% END -%]
 
-    psFree(object);
+        psFree(object);
+    }
 
+[% END -%]
     exit(EXIT_SUCCESS);
 }