[java/compiler/JST.pm] add JST::Null and a $!type to JST::Literal

java/compiler/JST.pm

@@ -333,6 +333,7 @@ class JST::Bind is JST::Node {
 class JST::Literal is JST::Node {
     has $!value;
     has $!escape;
+    has $!type;
 
     method value($set?) {
         if pir::defined($set) { $!value := $set }
@@ -344,14 +345,26 @@ class JST::Literal is JST::Node {
         $!escape
     }
 
-    method new(:$value!, :$escape) {
+    method type($set?) {
+        if pir::defined($set) { $!type := $set }
+        $!type
+    }
+
+    method new(:$value!, :$escape, :$type) {
         my $obj := self.CREATE;
         $obj.value($value);
         $obj.escape($escape);
+        $obj.type($type);
         $obj;
     }
 }
 
+class JST::Null is JST::Node {
+    method new() {
+        self.CREATE
+    }
+}
+
 class JST::ArrayLiteral is JST::Node {
     has $!type;