lib/pione/transformer/rule-definition-transformer.rb in pione-0.2.0 vs lib/pione/transformer/rule-definition-transformer.rb in pione-0.2.1

@@ -45,12 +45,20 @@
         TypeDataExpr.check(data_expr)
         Naming.OutputLine(data_expr)
       }
 
       # Transform +param_line+ as Naming::ParamLine.
-      rule(:param_line => simple(:param)) {
-        unless TypeAssignment.match(param) or TypeParameters.match(param) or param.kind_of?(Variable)
+      rule(:param_line => subtree(:tree)) {
+        param = tree[:param_expr]
+        param_type = tree[:param_type]
+        unless TypeAssignment.match(param) or param.kind_of?(Variable)
           raise PioneModelTypeError.new(param, TypeAssignment)
+        end
+        case param_type
+        when "advanced"
+          param.set_param_type(:advanced)
+        else
+          param.set_param_type(:basic)
         end
         Naming.ParamLine(param)
       }
 
       # Transform +:feature_line+ as Naming::FeatureLine.