exp_negative_power.lua

assert(2^-2 == 1/4 and -2^- -2 == - - -4);

exp_negative_power.t

#!/usr/bin/env perl

use strict;
use warnings;

use File::Spec;
use File::Temp;

use Test::More;

BEGIN {use_ok('MarpaX::Languages::Lua::Parser'); }

my($lua_sources_dir) = 'lua.sources';
$lua_sources_dir = qq{../$lua_sources_dir} unless $ENV{HARNESS_ACTIVE};

my($parser)             = MarpaX::Languages::Lua::Parser -> new
(
    input_file_name  => "$lua_sources_dir/exp_negative_power.lua",
    logger           => '',
);

$parser -> process;

done_testing;