remove letblock for now

This commit is contained in:
Folkert 2022-05-10 21:39:12 +02:00
parent f2fd58e223
commit 78a45db79d
No known key found for this signature in database
GPG key ID: 1F17F6FFD112B97C
6 changed files with 0 additions and 261 deletions

View file

@ -117,7 +117,6 @@ pub enum Expr {
// Let
LetRec(Vec<Def>, Box<Loc<Expr>>),
LetNonRec(Box<Def>, Box<Loc<Expr>>),
LetBlock(Declarations, Box<Loc<Expr>>),
/// This is *only* for calling functions, not for tag application.
/// The Tag variant contains any applied values inside it.
@ -227,7 +226,6 @@ impl Expr {
Self::If { .. } => Category::If,
Self::LetRec(_, expr) => expr.value.category(),
Self::LetNonRec(_, expr) => expr.value.category(),
Self::LetBlock(_, expr) => expr.value.category(),
&Self::Call(_, _, called_via) => Category::CallResult(None, called_via),
&Self::RunLowLevel { op, .. } => Category::LowLevelOpResult(op),
Self::ForeignCall { .. } => Category::ForeignCall,
@ -1553,11 +1551,6 @@ pub fn inline_calls(var_store: &mut VarStore, scope: &mut Scope, expr: Expr) ->
LetNonRec(Box::new(def), Box::new(loc_expr))
}
LetBlock(declarations, loc_expr) => {
eprintln!("TODO `inline_calls` for let block");
LetBlock(declarations, loc_expr)
}
Closure(ClosureData {
function_type,
closure_type,