<commit_before>use v6;
use Test;
plan 8;

# L<S02/"Built-In Data Types" /Perl 6 should by default make standard IEEE floating point concepts visible>

{
    my $x = Inf;
    
    cmp_ok( $x, &infix:<==>, Inf,   'numeric equal' );
    cmp_ok( $x, &infix:<eq>, 'Inf', 'string equal'  );
}

{
    my $x = -Inf;
    cmp_ok( $x, &infix:<==>, -Inf,   'negative numeric equal' );
    cmp_ok( $x, &infix:<eq>, '-Inf', 'negative string equal'  );
}

{
    my $x = int( Inf );
    cmp_ok( $x, &infix:<==>,  Inf,  'int numeric equal' );
    cmp_ok( $x, &infix:<eq>, 'Inf', 'int string equal', :todo<bug> );
}

{
    my $x = int( -Inf );
    cmp_ok( $x, &infix:<==>,  -Inf,   'int negative numeric equal');<commit_msg>[t/spec] Fudged infinity.t for rakudo<commit_after>use v6;
use Test;
plan 8;

# L<S02/"Built-In Data Types" /Perl 6 should by default make standard IEEE floating point concepts visible>

#?rakudo skip 'Parse Error: Statement not terminated properly'
{
    my $x = Inf;
    
    cmp_ok( $x, &infix:<==>, Inf,   'numeric equal' );
    cmp_ok( $x, &infix:<eq>, 'Inf', 'string equal'  );
}

#?rakudo skip 'Parse Error: Statement not terminated properly'
{
    my $x = -Inf;
    cmp_ok( $x, &infix:<==>, -Inf,   'negative numeric equal' );
    cmp_ok( $x, &infix:<eq>, '-Inf', 'negative string equal'  );
}

#?rakudo skip 'Parse Error: Statement not terminated properly'
{
    my $x = int( Inf );
    cmp_ok( $x, &infix:<==>,  Inf,  'int numeric equal' );
    cmp_ok( $x, &infix:<eq>, 'Inf', 'int string equal', :todo<bug> );
}

#?rakudo skip 'Parse Error: Statement not terminated properly'
{
    my $x = int( -Inf );
    cmp_ok( $x, &infix:<==>,  -Inf,   'int negative numeric equal');
{'fraction_non_alphanumeric': 0.19312796208530805, 'fraction_numerical': 0.005924170616113744, 'mean_word_length': 3.319693094629156, 'pattern_counts': {'":': 0, '<': 21, '<?xml version=': 0, '>': 21, 'https://': 0, 'lorem ipsum': 0, 'www.': 0, 'xml': 0}, 'pii_count': 0, 'substrings_counts': 0, 'word_list_counts': {'cursed_substrings.json': 0, 'profanity_word_list.json': 0, 'sexual_word_list.json': 0, 'zh_pornsignals.json': 0}}
{'dir': 'git-commits-cleaned', 'id': '3289494', 'n_tokens_mistral': 696, 'n_tokens_neox': 657, 'n_words': 203}