Add tests for for 1e0 ** bigint.

Particularly test that the type is correctly a Num.

Author: colomon

S32-num/power.t

@@ -2,7 +2,7 @@ use v6;
 
 use Test;
 
-plan 50;
+plan 52;
 
 # Real **
 is(0 ** 0,    1, "0 ** 0 ==  1");
@@ -14,6 +14,8 @@ is(4 ** 2,   16, "4 **  2 == 16");
 
 is 0 ** 4553535345364535345634543534, 0, "0 ** 4553535345364535345634543534 == 0";
 is 1 ** 4553535345364535345634543534, 1, "1 ** 4553535345364535345634543534 == 1";
+is 1e0 ** 4553535345364535345634543534, 1, "1e0 ** 4553535345364535345634543534 == 1";
+isa_ok 1e0 ** 4553535345364535345634543534, Num, "1e0 ** 4553535345364535345634543534 is a Num";
 #?rakudo.parrot 2 todo "Simple bigint optimizations NYI"
 is (-1) ** 4553535345364535345634543534, 1, "-1 ** 4553535345364535345634543534 == 1";
 is (-1) ** 4553535345364535345634543533, -1, "-1 ** 4553535345364535345634543534 == -1";