test:Adding proper test plan.

Author: antononcube

t/00-sanity.rakutest

@@ -2,6 +2,8 @@ use v6.d;
 use CortexJS;
 use Test;
 
+plan *;
+
 ok CortexJS::ComputeEngine.^name eq 'CortexJS::ComputeEngine', 'exports ComputeEngine alias';
 ok 'resources/js/ce-bridge.mjs'.IO.f, 'bridge script exists';
 

t/01-ping.rakutest

@@ -34,6 +34,8 @@ unless $ce.defined {
 
 LEAVE { try $ce.close if $ce.defined; }
 
+plan *;
+
 my %ping = $ce.ping.Hash;
 is %ping<pong>, True, 'ping returns pong';
 

t/02-parse.rakutest

@@ -34,6 +34,8 @@ unless $ce.defined {
 
 LEAVE { try $ce.close if $ce.defined; }
 
+plan *;
+
 my $expr = $ce.parse-latex('x^2+1');
 ok $expr.defined, 'parse-latex returns a value';
 

t/03-simplify.rakutest

@@ -34,6 +34,8 @@ unless $ce.defined {
 
 LEAVE { try $ce.close if $ce.defined; }
 
+plan *;
+
 my $simplified = $ce.simplify(["Add", 1, 2]);
 ok $simplified.defined, 'simplify returns a value';
 

t/04-evaluate.rakutest

@@ -34,6 +34,8 @@ unless $ce.defined {
 
 LEAVE { try $ce.close if $ce.defined; }
 
+plan *;
+
 my $evaluated = $ce.evaluate(["Sin", ["Divide", "Pi", 2]]);
 ok $evaluated.defined, 'evaluate returns a value';
 

t/05-N.rakutest

@@ -34,6 +34,8 @@ unless $ce.defined {
 
 LEAVE { try $ce.close if $ce.defined; }
 
+plan *;
+
 my $numeric = $ce.N(["Divide", 1, 3]);
 ok $numeric.defined, 'N returns a value';
 

t/06-expand.rakutest

@@ -34,8 +34,9 @@ unless $ce.defined {
 
 LEAVE { try $ce.close if $ce.defined; }
 
+plan *;
+
 my $expanded = $ce.expand(["Multiply", "x", ["Add", "x", 1]]);
-say (:$expanded);
 ok $expanded.defined, 'expand returns a value';
 
 my $latex = $ce.to-latex($expanded);

t/07-expand-all.rakutest

@@ -34,6 +34,8 @@ unless $ce.defined {
 
 LEAVE { try $ce.close if $ce.defined; }
 
+plan *;
+
 my $expanded = $ce.expandAll(["Power", ["Add", "x", 1], 2]);
 ok $expanded.defined, 'expandAll returns a value';
 

t/08-factor.rakutest

@@ -34,6 +34,8 @@ unless $ce.defined {
 
 LEAVE { try $ce.close if $ce.defined; }
 
+plan *;
+
 my $factored = $ce.factor(["Add", ["Power", "x", 2], ["Multiply", 2, "x"], 1]);
 ok $factored.defined, 'factor returns a value';
 

t/09-solve.rakutest

@@ -34,6 +34,8 @@ unless $ce.defined {
 
 LEAVE { try $ce.close if $ce.defined; }
 
+plan *;
+
 my $eq = $ce.parse-latex('x^2-1=0');
 my $solutions = $ce.solve($eq);
 ok $solutions ~~ Positional, 'solve returns a positional result';