[Swift-commit] r2888 - trunk/resources

[noreply at svn.ci.uchicago.edu]

Author: benc
Date: 2009-04-28 06:19:49 -0500 (Tue, 28 Apr 2009)
New Revision: 2888

Modified:
   trunk/resources/Karajan.stg
Log:
Log input and output parameters for all procedures, not just application
procedures

Modified: trunk/resources/Karajan.stg
===================================================================
--- trunk/resources/Karajan.stg	2009-04-28 07:11:13 UTC (rev 2887)
+++ trunk/resources/Karajan.stg	2009-04-28 11:19:49 UTC (rev 2888)
@@ -58,6 +58,8 @@
   $optargs:default_arg();separator="\n"$
   $outputs:typecheck();separator="\n"$
   $inputs:typecheck();separator="\n"$
+  $inputs:vdl_log_input();separator="\n"$
+  $outputs:vdl_log_output();separator="\n"$
 $if(binding)$
   $vdl_execute(outputs=outputs,inputs=inputs,application=binding.application, name=name,line=line)$
 $else$
@@ -99,8 +101,6 @@
 
 vdl_execute(outputs,inputs,application,name,line) ::= <<
 <log level="info" message="PROCEDURE line=$line$ thread={#thread} name=$name$"/>
-$inputs:vdl_log_input();separator="\n"$
-$outputs:vdl_log_output();separator="\n"$
 <vdl:execute>
   <vdl:tr>$application.exec$</vdl:tr>
   $inputs:vdl_stagein();separator="\n"$