<commit_before># $Id$

=head1 NAME

  japh13.pasm - yet another JAPH

=head1 DESCRIPTION

2 threads, synced by sleeping time only

=cut

    find_global P5, "_th"
    new P2, .ParrotThread
    find_method P0, P2, "thread3"

    # run first thread
    new P6, .PerlString
    set P6, "Js nte artHce\n"
    set I3, 2
    invoke

    # run second thread
    new P2, .ParrotThread
    set P6, "utaohrPro akr"
    invoke
    end

.pcc_sub _th:
    set S5, P6<commit_msg>Try to keep the two threads apart<commit_after># $Id$

=head1 NAME

  japh13.pasm - yet another JAPH

=head1 DESCRIPTION

2 threads, synced by sleeping time only

=cut

    find_global P5, "_th"
    new P2, .ParrotThread
    find_method P0, P2, "thread3"

    # run first thread
    new P6, .PerlString
    set P6, "Js nte artHce\n"
    set I3, 2
    invoke

    # Give first thread some tim to print the first character
    sleep 0.25

    # run second thread
    new P2, .ParrotThread
    set P6, "utaohrPro akr"
    invoke
    end

.pcc_sub _th:
    set S5, P6
{'fraction_non_alphanumeric': 0.07587548638132295, 'fraction_numerical': 0.037937743190661476, 'mean_word_length': 2.4072847682119205, 'pattern_counts': {'":': 0, '<': 3, '<?xml version=': 0, '>': 3, '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': '6168409', 'n_tokens_mistral': 419, 'n_tokens_neox': 395, 'n_words': 137}