[Swift-commit] r2961 - trunk/resources

[noreply at svn.ci.uchicago.edu]

Author: benc
Date: 2009-06-16 11:41:53 -0500 (Tue, 16 Jun 2009)
New Revision: 2961

Modified:
   trunk/resources/Karajan.stg
Log:
provenance for array slices

Modified: trunk/resources/Karajan.stg
===================================================================
--- trunk/resources/Karajan.stg	2009-06-16 16:06:23 UTC (rev 2960)
+++ trunk/resources/Karajan.stg	2009-06-16 16:41:53 UTC (rev 2961)
@@ -459,11 +459,25 @@
 >>
 
 slicearray(parent, memberchild, datatype) ::= <<
-<vdl:slicearray>
-  <argument name="var">$parent$</argument>
-  <argument name="path">$memberchild$</argument>
-  <argument name="type">$datatype$</argument>
-</vdl:slicearray>
+<sequential>
+ <set name="swift#array">$parent$</set> 
+ <set name="swift#slice">
+  <vdl:slicearray>
+    <argument name="var"><variable>swift#array</variable></argument>
+    <argument name="path">$memberchild$</argument>
+    <argument name="type">$datatype$</argument>
+  </vdl:slicearray>
+ </set>
+
+ <log level="info"><concat>
+   <string>SLICEARRAY thread={#thread} slice=</string>
+   <vdl:getdatasetprovenanceid var="{swift#slice}" />
+   <string> member=$memberchild$ array=</string>
+   <vdl:getdatasetprovenanceid var="{swift#array}" />
+ </concat></log>
+
+ <variable>swift#slice</variable>
+</sequential>
 >>