Pasmo for MorphOS
Philippe Rimauro (http://quasar.cpcscene.com) has told me that he has
compiled Pasmo for MorphOS (http://www.morphos.de) and made a binary
package available at Aminet (http://aminet.net).
Philippe Rimauro (http://quasar.cpcscene.com) has told me that he has
compiled Pasmo for MorphOS (http://www.morphos.de) and made a binary
package available at Aminet (http://aminet.net).
.sub main :main push_eh handler maybe_bad() .return() handler: .local pmc exception .get_results(exception) unroll exception show_some_message() .return() .endThe only change in the handler code is the addition of unroll at a
run-standalone bash svn checkout https://svn.parrot.org/parrot/trunk parrot cd parrot perl Configure.pl --prefix=/opt/parrot --optimize make make installNow you have parrot installed in /opt/parrot inside the scratchbox. In
PATH=/opt/parrot/bin:$PATH parrot -VNote that the information about the run platform is wrong. I don't
#! winxed
//**********************************************************************
const int OP_end = 0;
const int OP_noop = 1;
const int OP_say_sc = 465;
//**********************************************************************
function main()
{
var packfile = new 'Packfile';
var dir = packfile.get_directory();
say(elements(dir));
int cst_hello = 0;
int cst_bye = 1;
var constseg = new 'PackfileConstantTable';
constseg[cst_hello] = 'Hello, world!';
constseg[cst_bye] = 'Bye, world!';
var code = new 'PackfileRawSegment';
int of = 0;
code[of++] = OP_noop;
code[of++] = OP_say_sc;
code[of++] = cst_hello;
code[of++] = OP_say_sc;
code[of++] = cst_bye;
code[of++] = OP_end;
dir['BYTECODE_test.pir'] = code;
dir['CONSTANT_test.pir'] = constseg;
dir['BYTECODE_test.pir_ANN'] = new 'PackfileAnnotations';
dir['FIXUP_test.pir'] = new 'PackfileFixupTable';
say(elements(dir));
string rawdata = packfile;
say('About to write');
var handle = new 'FileHandle'.open('h.pbc', 'wb');
handle.print(rawdata);
handle.close();
say('Bye');
}
// That's all folks!
The pieces are on the board, let's play!