ruoso

User: Qual a música de violão clássico flamenco que tem um trinado que segue a música toda, alternando com uma melodia do baixo

ChatGPT: Existem muitas músicas de violão clássico flamenco que apresentam trinados e melodia no baixo, tornando difícil identificar uma específica com base apenas nessa descrição. No entanto, uma música muito famosa que apresenta esses elementos é "Malagueña", uma peça tradicional espanhola que foi adaptada para o violão clássico. A melodia é composta por uma série de trinados e notas rápidas que se alternam com uma linha de baixo marcante e repetitiva. A música é um desafio técnico para os guitarristas, exigindo habilidades de dedilhado e sincronização avançadas.

User: Talvez não seja flamenco especificamente, mas é do repertório de violão clássico espanhol, a música é só no violão

ruoso

$ ./perl6 --ll-exception -e 'say any(1..5)'
Method 'postcircumfix:<( )>' not found
  in 
  in 
  in infix:<cmp>
  in infix:<cmp>
  in reify
  in 
  in reify
  in 

ruoso

$ ./perl6 -e 'say any(1..5)'
Unhandled exception: Method 'backtrace' not found
  in print_exception
  in <anon>
  in command_eval
  in command_eval
  in command_line
  in MAIN
  in 
  in 

ruoso

#!/bin/bash
OLD=HEAD
for I in $(git tag  | perl -e 'print join "\n", reverse <STDIN>')
do
  if
    [ "x$OLD" == "x$I" ]
  then
    echo "Changelog"
  else
    git log -n1 --format="$OLD -- %aD" $OLD

ruoso

Program received signal SIGSEGV, Segmentation fault.
0xf68e64d3 in from_num () from /home/ruoso/devel/rakudo/install/lib/parrot/3.11.0-devel/dynext/nqp_bigint_ops.so
(gdb) bt
#0  0xf68e64d3 in from_num () from /home/ruoso/devel/rakudo/install/lib/parrot/3.11.0-devel/dynext/nqp_bigint_ops.so
#1  0xf68ec72b in Parrot_nqp_bigint_from_num_p_n_p () from /home/ruoso/devel/rakudo/install/lib/parrot/3.11.0-devel/dynext/nqp_bigint_ops.so
#2  0xf7eab6ec in runops_fast_core (interp=0x8053028, runcore_unused=0x80e5200, pc=0x0) at src/runcore/cores.c:503
#3  0xf7eab536 in runops_int (interp=0x8053028, offset=746437) at src/runcore/main.c:220
#4  0xf7e9296d in runops (interp=0x8053028, offs=746437) at src/call/ops.c:126
#5  0xf7e8e0f3 in Parrot_pcc_invoke_from_sig_object (interp=0x8053028, sub_obj=0xc2f98d4, call_object=0xa42fee8) at src/call/pcc.c:338
#6  0xf68b65f7 in Parrot_bind_signature () from dynext/perl6_ops.so

ruoso

#!/usr/bin/env perl6

sub compare-cell($other, $this) {
	if ($other ~~ Array) {
		return 0;
	} else {
		return $other == $this;
	}
}

ruoso

grammar MyApp {
  token TOP {
    ( <public> | <auth> )
    ( ( "/json" $ { c.forward("View::JSON") } ) |
      { c.forward("View::HTML") }
    )
  }
  token public {
    <main>   |
    <about>  |

ruoso

OUTPUT

# The Perl object is blessed into 'CLASS', which should be a
# char* having the name of the package for the blessing.
O_OBJECT
        void*[] pointers = malloc(2 * sizeof(void*));
        pointers[0] = (void*)$var;
        pointers[1] = (void*)my_perl;
	sv_setref_pv( $arg, CLASS, (void*)pointers );

ruoso

grammar XML::SAX;

token TOP {
  ^
  <startDocument>
  <element>
  <endDocument>
  $
}

ruoso

    my $capture;
    my $back;
    my $interpreter;

    my $name = $capture."positional"(1);
    my $invocant = $capture."positional"(0);
    my $exists = $invocant."exists"($name);
    
    my $void;
    my $ret;