From 5d89a48a91aaf01b0db4be4c1fa71ba601488016 Mon Sep 17 00:00:00 2001
From: =?utf8?q?J=C3=A9r=C3=A9mie=20Astor?= <fennecdjay@gmail.com>
Date: Wed, 20 Apr 2022 12:31:11 +0200
Subject: [PATCH] :art: Improve partial non used checking
---
src/parse/check.c | 2 +-
1 file changed, 1 insertion(+), 1 deletion(-)
diff --git a/src/parse/check.c b/src/parse/check.c
index 827fb6ca..6f091426 100644
--- a/src/parse/check.c
+++ b/src/parse/check.c
@@ -1318,7 +1318,7 @@ ANN m_bool check_union_def(const Env env NUSED, const Union_Def udef) {
ANN static m_bool check_stmt_exp(const Env env, const Stmt_Exp stmt) {
if(stmt->val) {
CHECK_OB(check_exp(env, stmt->val));
- if(!strncmp(stmt->val->type->name, "partial:", 8)) {
+ if(stmt->val->exp_type == ae_exp_lambda) {
const loc_t loc = stmt->val->d.exp_lambda.def->base->pos;
env_warn(env, loc, "Partial application not used");
}
--
2.43.0