Add pattern type for module params

crates/compiler/can/src/module.rs

@@ -401,8 +401,7 @@ pub fn canonicalize_module_defs<'a>(
                 var_store,
                 &mut scope,
                 &mut output,
-                // todo(agus): custom type for param
-                PatternType::FunctionArg,
+                PatternType::ModuleParams,
                 &pattern.value,
                 pattern.region,
                 PermitShadows(false),

crates/compiler/parse/src/pattern.rs

@@ -25,6 +25,7 @@ pub enum PatternType {
     DefExpr,
     FunctionArg,
     WhenBranch,
+    ModuleParams,
 }
 
 pub fn closure_param<'a>() -> impl Parser<'a, Loc<Pattern<'a>>, EPattern<'a>> {

crates/reporting/src/error/canonicalize.rs

@@ -390,6 +390,7 @@ pub fn can_problem<'b>(
                 TopLevelDef => "a top-level definition:",
                 DefExpr => "a value definition:",
                 FunctionArg => "function arguments:",
+                ModuleParams => "module params:",
                 WhenBranch => unreachable!("all patterns are allowed in a When"),
             };