From 08fb5ab0d295cab79d5d65e9dba7976b797e0348 Mon Sep 17 00:00:00 2001 From: Drahflow Date: Fri, 7 Mar 2014 03:00:00 +0100 Subject: Testcases (and some code) for #.= --- examples/working-compiler/undefined-resolution.test | 13 +++++++++++++ 1 file changed, 13 insertions(+) create mode 100644 examples/working-compiler/undefined-resolution.test (limited to 'examples/working-compiler') diff --git a/examples/working-compiler/undefined-resolution.test b/examples/working-compiler/undefined-resolution.test new file mode 100644 index 0000000..6465d47 --- /dev/null +++ b/examples/working-compiler/undefined-resolution.test @@ -0,0 +1,13 @@ +< + { "#." dump dump } "#." deffd + { "#.|" dump dump } "#.|" deffd + { "#.?" dump dump } "#.?" deffd + { "#.=" dump dump dump } "#.=" deffd +> ==s + +< { |pipebare } =*f s >' .f +< { 42 =equalbare } =*f s >' .f +s .|dotpipe +s .?dotquestion +s .dot +< { bare } =*f s >' .f -- cgit v1.2.3