Skip to content

Commit 52ba417

Browse files
committed
Get first pieces of QAST::Want support in place.
1 parent e262e92 commit 52ba417

File tree

3 files changed

+8
-0
lines changed

3 files changed

+8
-0
lines changed

src/QAST/Compiler.nqp

Lines changed: 5 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -528,6 +528,11 @@ class QAST::Compiler is HLL::Compiler {
528528
self.as_post($node)
529529
}
530530

531+
multi method as_post(QAST::Want $node) {
532+
# If we're not in a coercive context, take the default.
533+
self.as_post($node[0])
534+
}
535+
531536
multi method as_post(QAST::IVal $node) {
532537
self.post_new('Ops', :result(~$node.value))
533538
}

src/QAST/Want.nqp

Lines changed: 2 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -0,0 +1,2 @@
1+
class QAST::Want is QAST::Node {
2+
}

tools/build/Makefile.in

Lines changed: 1 addition & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -77,6 +77,7 @@ QAST_SOURCES = \
7777
src/QAST/SVal.nqp \
7878
src/QAST/BVal.nqp \
7979
src/QAST/WVal.nqp \
80+
src/QAST/Want.nqp \
8081
src/QAST/Var.nqp \
8182
src/QAST/Op.nqp \
8283
src/QAST/VM.nqp \

0 commit comments

Comments
 (0)