Skip to content

Instantly share code, notes, and snippets.

@jnthn
Created May 16, 2013 21:50
Show Gist options
  • Star 0 You must be signed in to star a gist
  • Fork 0 You must be signed in to fork a gist
  • Save jnthn/5595395 to your computer and use it in GitHub Desktop.
Save jnthn/5595395 to your computer and use it in GitHub Desktop.
diff --git a/src/Perl6/Actions.nqp b/src/Perl6/Actions.nqp
index e00478d..bf54764 100644
--- a/src/Perl6/Actions.nqp
+++ b/src/Perl6/Actions.nqp
@@ -151,7 +151,7 @@ class Perl6::Actions is HLL::Actions does STDActions {
%info<container_base> := $*W.find_symbol(['Hash']);
%info<bind_constraint> := $*W.find_symbol(['Associative']);
if $shape {
- @value_type[0] := $*W.find_symbol(['Mu']) unless +@value_type;
+ @value_type[0] := $*W.find_symbol(['Any']) unless +@value_type;
my $shape_ast := $shape[0].ast;
if $shape_ast.isa(QAST::Stmts) && +@($shape_ast) == 1 && $shape_ast[0].has_compile_time_value {
@value_type[1] := $shape_ast[0].compile_time_value;
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment