@ -11,25 +11,26 @@ use crate::builtin::BuiltinOps;
use crate ::runtime ::run_thread ::{ RunState , ThreadInfo , ThreadToken } ;
use crate ::runtime ::frame ::REG_COUNT ;
use std ::sync ::atomic ::AtomicU32 ;
use std ::path ::{ Path } ;
pub mod data ;
pub mod error ;
pub mod instr ;
pub mod parse ;
pub mod patches ;
mod read_file ;
use read_file ::read_file ;
pub ( crate ) fn read_source_file ( path : impl AsRef < Path > ) -> Result < String , error ::CrsnError > {
trace ! ( "Read source file: {}" , path . as_ref ( ) . display ( ) ) ;
/// Parse a program from string and assemble a low level instruction sequence from it.
pub fn assemble ( source : & str , uniq : & CrsnUniq , mut parsers : Vec < Box < dyn CrsnExtension > > ) -> Result < Arc < Program > , error ::CrsnError > {
parsers . insert ( 0 , BuiltinOps ::new ( ) ) ;
for p in & mut parsers {
p . init ( uniq ) ;
}
let source = read_file ( path ) ? ;
let parsers_arc = Arc ::new ( parsers ) ;
// remove first line if it looks like a shebang
let s = if source . starts_with ( "#!" ) {
let source = if source . starts_with ( "#!" ) {
if let Some ( nl ) = source . find ( '\n' ) {
( & source [ nl + 1 .. ] ) . to_string ( )
& source [ nl + 1 .. ]
} else {
source
}
@ -37,25 +38,10 @@ pub(crate) fn read_source_file(path: impl AsRef<Path>) -> Result<String, error::
source
} ;
Ok ( s )
}
/// Parse a program from string and assemble a low level instruction sequence from it.
pub fn assemble ( path : impl AsRef < Path > , uniq : & CrsnUniq , mut parsers : Vec < Box < dyn CrsnExtension > > ) -> Result < Arc < Program > , error ::CrsnError > {
parsers . insert ( 0 , BuiltinOps ::new ( ) ) ;
for p in & mut parsers {
p . init ( uniq ) ;
}
let path = path . as_ref ( ) . canonicalize ( ) ? ;
let source = read_source_file ( & path ) ? ;
let parsers_arc = Arc ::new ( parsers ) ;
let ti = Arc ::new ( ThreadInfo {
id : ThreadToken ( 0 ) ,
uniq : Default ::default ( ) ,
program : Program ::new ( vec! [ ] , parsers_arc . clone ( ) , vec! [ path . clone ( ) ] ) . unwrap ( ) ,
program : Program ::new ( vec! [ ] , parsers_arc . clone ( ) ) . unwrap ( ) ,
cycle_time : Default ::default ( ) ,
scheduler_interval : Default ::default ( ) ,
extensions : parsers_arc . clone ( ) ,
@ -86,27 +72,12 @@ pub fn assemble(path: impl AsRef<Path>, uniq : &CrsnUniq, mut parsers: Vec<Box<d
} ,
const_eval_ti : ti ,
parsing_expr : false ,
label_num : label_num . clone ( ) ,
files : vec ! [
path ,
] ,
active_file : 0
label_num : label_num . clone ( )
} ) ,
} ;
let res = do_parse ( & source , & pcx , parsers_arc . clone ( ) ) ;
if let Err ( e ) = & res {
if let Some ( pos ) = e . pos ( ) {
let f = pcx . state . borrow ( ) . files [ pos . file as usize ] . clone ( ) ;
eprintln! ( "Error in source file: {}" , f . display ( ) ) ;
}
}
res
}
fn do_parse ( source : & str , pcx : & ParserContext , parsers_arc : Arc < Vec < Box < dyn CrsnExtension > > > ) -> Result < Arc < Program > , error ::CrsnError > {
let ops = parse ::parse ( source , & SourcePosition ::default ( ) , pcx ) ? ;
let ops = parse ::parse ( source , & SourcePosition ::default ( ) , & pcx ) ? ;
let ops = jumps_to_skips ( ops ) ? ;
Ok ( Program ::new ( ops , parsers_arc , pcx . state . borrow_mut ( ) . files . split_off ( 0 ) ) ? )
Ok ( Program ::new ( ops , parsers_arc ) ? )
}
