Dan Sugalski wrote:

> At 10:44 AM +0200 7/28/02, Leopold Toetsch wrote:
> 
>> 2) Some Mops numbers, all on i386/linux Athlon 800, slightly shortend:
>> (»make mops« in parrot root)
> 
> 
> Just out of curiosity, I presume the (rather abysmal) perl 6 numbers 
> include time to generate the assembly and assemble it--have you tried 
> running the generated code by itself as a test? (At the moment, the 
> assembler's rather slow)

No, these Mopsen are pure run time.
As Sean alredy stated, code quality is to blame.

Times for individual steps are:
$ time perl6 --imc mops.p6

real    0m1.794s
user    0m1.690s
sys     0m0.100s

$ time ../imcc/imcc mops.imc mops.pasm
327 lines compiled.
Compiling assembly module mops.pasm

real    0m0.032s
user    0m0.020s
sys     0m0.000s
[lt@thu8:~/src/parrot-007/languages/perl6]
$ time perl ../../assemble.pl mops.pasm > mops.pbc

real    0m0.481s
user    0m0.470s
sys     0m0.010s

This adds up to 2.3s to get a perl6 program running.
leo

Reply via email to