[Rio-pm] BrainFuck Interprer
Aureliano Guedes
guedes_1000 em hotmail.com
Sexta Janeiro 11 05:56:58 PST 2013
Ok, agora um mudei outras coisas tambem, a principio tah td ok.
http://pastebin.com/w78GfPEv
Agora testei com um Hello World :
++++++++++[>+++++++>++++++++++>+++>+<<<<-]>++.>+.+++++++..+++.>++.<<+++++++++++++++.>.+++.------.--------.>+.>.
Mas ficou meio locão.
Date: Fri, 11 Jan 2013 11:47:26 -0200
From: viniciusmiasato em gmail.com
To: rio-pm em pm.org
Subject: Re: [Rio-pm] BrainFuck Interprer
Aureliano,
seu código está bem confuso mesmo.
você está realizando o foreach
foreach my $i (split (//, $data))
e logo após o inicio do foreach você faz
$i = substr($data,$s,2);
você sabe explicar pq ?
Outra dica: declare sua "sub getchar" no final do arquivo para deixar o código mais legível.
Dica adiantada:
antes de você trocar a sub e falar que o script parou de funcionar, na linha em que você realiza a chamada da sub getchar, coloque os () na função.
ex.: getchar();
talvez isso ajude você a consertar o script,
abs.
Em 11 de janeiro de 2013 11:33, Vinícius Miasato <viniciusmiasato em gmail.com> escreveu:
bom, ... com o given o seu script executa, mas não termina.
sem o given ele não executa ...
escolha a melhor opção e continua desenvolvendo =)
abs.
Em 11 de janeiro de 2013 11:27, Aureliano Guedes <guedes_1000 em hotmail.com> escreveu:
Mudanças feitas.
Mas vejam. Eu tinha tirado o given, mas coloquei de volta.
O problema é, com o given, o STDIN não termina, eu digito alguma coisa e aperto enter naturalmente algo deveria acontecer, mas a unica coisa que acontece é uma quebra de linha.
Date: Fri, 11 Jan 2013 11:16:26 -0200
From: viniciusmiasato em gmail.com
To: rio-pm em pm.org
Subject: Re: [Rio-pm] BrainFuck Interprer
não deveria ter um "given" em algum lugar do código para você utilizar o "when" ?
abs.
Em 11 de janeiro de 2013 10:43, Aureliano Guedes <guedes_1000 em hotmail.com> escreveu:
Ola mongens,
Como alguns sabem eu estava tentando fazer um interpretador para brainfuck em Perl.
Portanto segue o que consegui ate agora: http://pastebin.com/gJKizdYS
Um "script brainfuck" para testarem, ele converte letras munusculas para maiusculas: http://pastebin.com/kzMMpUsA
Deve ser executado assim: perl mybf.pl bf.b
Mas estou com problemas. Toda vez que executo me retorna : Can't use when() outside a topicalizer at mybf.pl line 36, <> line 1.
Alguem sabe o que esta acontecendo, e pode me ajudar.
Desde já, grato.
Att
_______________________________________________
Rio-pm mailing list
Rio-pm em pm.org
http://mail.pm.org/mailman/listinfo/rio-pm
_______________________________________________
Rio-pm mailing list
Rio-pm em pm.org
http://mail.pm.org/mailman/listinfo/rio-pm
_______________________________________________
Rio-pm mailing list
Rio-pm em pm.org
http://mail.pm.org/mailman/listinfo/rio-pm
_______________________________________________
Rio-pm mailing list
Rio-pm em pm.org
http://mail.pm.org/mailman/listinfo/rio-pm
-------------- Próxima Parte ----------
Um anexo em HTML foi limpo...
URL: <http://mail.pm.org/pipermail/rio-pm/attachments/20130111/29f0738c/attachment-0001.html>
Mais detalhes sobre a lista de discussão Rio-pm