progs/compile_arr.scala
changeset 695 484b74bc057e
parent 694 b6ed836ce59b
child 696 3a5a7908517f
equal deleted inserted replaced
694:b6ed836ce59b 695:484b74bc057e
    33 // compiler headers needed for the JVM
    33 // compiler headers needed for the JVM
    34 // (contains an init method, as well as methods for read and write)
    34 // (contains an init method, as well as methods for read and write)
    35 val beginning = """
    35 val beginning = """
    36 .class public XXX.XXX
    36 .class public XXX.XXX
    37 .super java/lang/Object
    37 .super java/lang/Object
    38 
       
    39 .method public <init>()V
       
    40    aload_0
       
    41    invokenonvirtual java/lang/Object/<init>()V
       
    42    return
       
    43 .end method
       
    44 
    38 
    45 .method public static write(I)V 
    39 .method public static write(I)V 
    46     .limit locals 1 
    40     .limit locals 1 
    47     .limit stack 2 
    41     .limit stack 2 
    48     getstatic java/lang/System/out Ljava/io/PrintStream; 
    42     getstatic java/lang/System/out Ljava/io/PrintStream; 
   526       ++++++++++++++++++++++++++++++++++++++++++++.[-]<<
   520       ++++++++++++++++++++++++++++++++++++++++++++.[-]<<
   527       <<<<<<<<<<[>>>+>+<<<<-]>>>>[<<<<+>>>>-]<-[>>.>.<<<
   521       <<<<<<<<<<[>>>+>+<<<<-]>>>>[<<<<+>>>>-]<-[>>.>.<<<
   528       [-]]<<[>>+>+<<<-]>>>[<<<+>>>-]<<[<+>-]>[<+>-]<<<-]"""
   522       [-]]<<[>>+>+<<<-]>>>[<<<+>>>-]<<[<+>-]>[<+>-]<<<-]"""
   529 
   523 
   530 bf_run(bf2, "fibs")
   524 bf_run(bf2, "fibs")
       
   525 
       
   526 /*
   531 
   527 
   532 
   528 
   533 bf_run("""      A mandelbrot set fractal viewer in brainf*** written by Erik Bosman
   529 bf_run("""      A mandelbrot set fractal viewer in brainf*** written by Erik Bosman
   534 +++++++++++++[->++>>>+++++>++>+<<<<<<]>>>>>++++++>--->>>>>>>>>>+++++++++++++++[[
   530 +++++++++++++[->++>>>+++++>++>+<<<<<<]>>>>>++++++>--->>>>>>>>>>+++++++++++++++[[
   535 >>>>>>>>>]+[<<<<<<<<<]>>>>>>>>>-]+[>>>>>>>>[-]>]<<<<<<<<<[<<<<<<<<<]>>>>>>>>[-]+
   531 >>>>>>>>>]+[<<<<<<<<<]>>>>>>>>>-]+[>>>>>>>>[-]>]<<<<<<<<<[<<<<<<<<<]>>>>>>>>[-]+
   674 -<<[-<<<<<<+>>>>>>]<<<<<<[->>>>>>+<<<<<<<<<<<<<<<[<<<<<<<<<]>>>[-]+>>>>>>[>>>>>>
   670 -<<[-<<<<<<+>>>>>>]<<<<<<[->>>>>>+<<<<<<<<<<<<<<<[<<<<<<<<<]>>>[-]+>>>>>>[>>>>>>
   675 >>>]>[-]+<]]+>[-<[>>>>>>>>>]<<<<<<<<]>>>>>>>>]<<<<<<<<<[<<<<<<<<<]>>>>[-]<<<++++
   671 >>>]>[-]+<]]+>[-<[>>>>>>>>>]<<<<<<<<]>>>>>>>>]<<<<<<<<<[<<<<<<<<<]>>>>[-]<<<++++
   676 +[-[->>>>>>>>>+<<<<<<<<<]>>>>>>>>>]>>>>>->>>>>>>>>>>>>>>>>>>>>>>>>>>-<<<<<<[<<<<
   672 +[-[->>>>>>>>>+<<<<<<<<<]>>>>>>>>>]>>>>>->>>>>>>>>>>>>>>>>>>>>>>>>>>-<<<<<<[<<<<
   677 <<<<<]]>>>]""", "mand")
   673 <<<<<]]>>>]""", "mand")
   678 
   674 
       
   675 */