greg
/
schala
1
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

Refactor

This commit is contained in:
greg 2018-05-15 21:53:50 -07:00
parent 276662d98a
commit b0e38f7f5b
1 changed files with 10 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

15
schala-lang/src/typechecking.rs
View File

@ -45,7 +45,6 @@ pub enum Type {
#[derive(Debug, PartialEq, Clone)]
pub struct TVar(String);
#[derive(Debug, PartialEq, Clone)]
pub enum TConst {
Unit,
@ -186,17 +185,23 @@ impl TypeContext {
}
output
}
pub fn type_check_ast(&mut self, ast: &parsing::AST) -> TypeResult<Type> {
let ref block = ast.0;
Ok(self.type_check_block(block)?)
}
}
impl TypeContext {
pub fn type_check_ast(&mut self, ast: &parsing::AST) -> TypeResult<Type> {
use self::Type::*; use self::TConst::*;
let mut ret_type = Const(Unit);
for statement in ast.0.iter() {
fn type_check_block(&mut self, statements: &Vec<parsing::Statement>) -> TypeResult<Type> {
let mut ret_type = Type::Const(TConst::Unit);
for statement in statements {
ret_type = self.type_check_statement(statement)?;
}
Ok(ret_type)
}
fn type_check_statement(&mut self, statement: &parsing::Statement) -> TypeResult<Type> {
use self::parsing::Statement::*;
match statement {