[UNSTABLE] New corpus types implemented. NEXT: Update corpus validation logic.

app/lib/celery_script/corpus.rb

@@ -47,11 +47,6 @@ module CeleryScript
     end
 
     def arg(name, defn, &blk)
-      defn.map do |x|
-        binding.pry if x.is_a?(Symbol)
-        binding.pry if x.is_a?(Class)
-        puts x.class.inspect
-      end
       @arg_def_list[name] = ArgumentSpecification.new(name, defn, blk)
       self
     end

app/models/celery_script_settings_bag.rb

@@ -210,7 +210,7 @@ module CeleryScriptSettingsBag
       end
     },
     lhs: {
-      defn: ALLOWED_LHS_TYPES,
+      defn:  [v(:string), n(:named_pin)], # See ALLOWED_LHS_TYPES
       blk: -> (node) do
         x = [ALLOWED_LHS_STRINGS, node, BAD_LHS]
         enum(*x) unless node.is_a?(CeleryScript::AstNode)
@@ -280,11 +280,12 @@ module CeleryScriptSettingsBag
       end
     },
   }.map do |(name, conf)|
-    blk = conf[:blk]
+    blk  = conf[:blk]
+    defn = conf.fetch(:defn)
     if blk
-      Corpus.arg(name, conf.fetch(:defn), &blk)
+      Corpus.arg(name, defn, &blk)
     else
-      Corpus.arg(name, conf.fetch(:defn))
+      Corpus.arg(name, defn)
     end
   end