Bring NQPQ up-to-date with latest NQP compiler.

Author: pmichaud

src/NQPQ/Actions.pm

@@ -459,11 +459,11 @@ class NQP::Actions is HLL::Actions {
                 $past := PAST::Var.new(
                     :name($name), :scope('attribute_6model'),
                     :viviself( vivitype( $<sigil> ) ),
-                    PAST::Var.new( :name('self') ),
+                    PAST::Op.new( :pirop('nqp_decontainerize PP'), PAST::Var.new( :name('self') ) ),
                     PAST::Var.new( :name('$?CLASS') )
                 );
 
-                # Make sure the attribute exists.
+                # Make sure the attribute exists and add type info.
                 unless $*IN_DECL {
                     my $attr;
                     for $*PACKAGE.HOW.attributes($*PACKAGE, :local(1)) {

src/NQPQ/Grammar.pm

@@ -17,9 +17,10 @@ grammar NQP::Grammar is HLL::Grammar {
         # Serialization context builder - keeps track of objects that
         # cross the compile-time/run-time boundary that are associated
         # with this compilation unit.
-        my $*SC := NQP::SymbolTable.new(
-            # XXX Need to hash the source, or something.
-            :handle(~pir::time__N()));
+        my $file := pir::find_caller_lex__ps('$?FILES');
+        my $*SC := pir::isnull($file) ??
+            NQP::SymbolTable.new(:handle(~pir::time__N())) !!
+            NQP::SymbolTable.new(:handle(~pir::time__N()), :description($file));
 
         my $*SCOPE       := '';
         my $*MULTINESS   := '';

src/NQPQ/SymbolTable.pm

@@ -421,6 +421,11 @@ class NQP::SymbolTable is HLL::Compiler::SerializationContextBuilder {
                     PAST::Var.new( :name('cur_sc'), :scope('register'), :isdecl(1) ),
                     PAST::Op.new( :pirop('nqp_create_sc Ps'), self.handle() )
                 ),
+                PAST::Op.new(
+                    :pasttype('callmethod'), :name('set_description'),
+                    PAST::Var.new( :name('cur_sc'), :scope('register') ),
+                    self.sc.description
+                ),
                 $des
             ),
             $fix