crsn/launcher/src/main.rs

#[macro_use]
extern crate log;

use simple_logger::SimpleLogger;

use crsn::asm::data::literal::Addr;

use crsn::runtime::run_thread::{RunThread, ThreadToken};
use crsn_arith::ArithOps;
use crsn_stacks::StackOps;

fn main() {
    SimpleLogger::new().init().unwrap();

    // ;(dec r0 (z? (ret)))
    /*let program = "
    (
        (main
            (ld r0 2)
            (:again)
            (dec r0)
            (jif nz :again)
            (fault \"that's it\")
        )
    )
    ";*/
    /*
        let program = "
        (
            (main
                (ld r0 2)
                (call add2x r0 15)
                (ld r0 res0)
                (fault \"that's it\")
            )
            (add2x
                (ld r0 arg0)
                (ld r1 arg1)
                (add r0 r1)
                (add r0 r1)
                (ret r0)
            )
        )
        ";*/

/*    let program = "
    (
        (main
            (j :lbl)
            (ld _ arg0)
            (fault)
            (:lbl)
            (call fibo 5)
            (ld r0 res0)
        )
        (fibo
            (cmp arg0 2
                (eq? (ret 2)))
            (ld r0 arg0)
            (dec r0)
            (call fibo r0)
            (ld r0 arg0)
            (mul r0 res0)
            (ret r0)
        )
    )
    ";*/

    let program = "
    (
        (main
            (push 0 10)
            (push 0 20)
            (push 0 30)
            (pop r0 0)
            (pop r0 0)
            (pop r0 0)
            (halt)
        )
    )
    ";

    let parsers = vec![
        ArithOps::new(),
        StackOps::new(),
    ];

    let parsed = crsn::asm::assemble(program, parsers.as_slice()).unwrap();

    let thread1 = RunThread::new(ThreadToken(0), parsed.clone(), Addr(0), &[]);
    let thread2 = RunThread::new(ThreadToken(1), parsed.clone(), Addr(0), &[]);

    let a = thread1.start();
    let b = thread2.start();

    a.join().unwrap();
    b.join().unwrap();
}