[Swift-commit] r3482 - trunk/resources

noreply at svn.ci.uchicago.edu noreply at svn.ci.uchicago.edu
Wed Jul 28 14:33:57 CDT 2010


Author: hategan
Date: 2010-07-28 14:33:57 -0500 (Wed, 28 Jul 2010)
New Revision: 3482

Modified:
   trunk/resources/Karajan.stg
Log:
removed typecheck and modified variable template to allow non-mapped variables

Modified: trunk/resources/Karajan.stg
===================================================================
--- trunk/resources/Karajan.stg	2010-07-28 18:51:23 UTC (rev 3481)
+++ trunk/resources/Karajan.stg	2010-07-28 19:33:57 UTC (rev 3482)
@@ -58,8 +58,6 @@
 procedure(name,outputs,inputs,arguments,optargs,binding,declarations,statements,config,line) ::= <<
 <element name="$name$"$if(arguments)$ arguments="$proc_args(args=arguments)$"$endif$$if(optargs)$ optargs="$proc_args(args=optargs)$"$endif$>
   $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)$
@@ -97,10 +95,6 @@
 $endif$
 >>
 
-typecheck() ::= <<
-<vdl:typecheck argname="$it.name$" var="{$it.name$}" type="$it.type.name$" />
->>
-
 vdl_execute(outputs,inputs,application,name,line) ::= <<
 <log level="debug" message="PROCEDURE line=$line$ thread={#thread} name=$name$"/>
 <vdl:execute>
@@ -306,7 +300,7 @@
         $vdl_mapping(mapping=mapping,file=file,waitfor=waitfor)$
       </vdl:new>
     $else$
-      $expr$
+      <vdl:new type="$type$" dbgname="$name$"$if(waitfor)$ waitfor="$waitfor;separator=" "$"$endif$ />
     $endif$
   $endif$
 $if(isGlobal)$</global>$else$</set>$endif$




More information about the Swift-commit mailing list