1pub mod infer;
2mod symbol;
3use dynamic::{Dynamic, Type};
4use parser::{BinaryOp, Expr, ExprKind, Parser, Pattern, PatternKind, Span, Stmt, StmtKind};
5use std::{
6 collections::{BTreeMap, BTreeSet},
7 path::{Path, PathBuf},
8 sync::Arc,
9};
10pub use symbol::{Symbol, SymbolTable, eval_const_int_type, substitute_type};
11
12#[derive(Clone)]
13pub struct Compiler {
14 pub symbols: SymbolTable,
15 pub frames: Vec<usize>,
16 pub tys: Vec<Type>,
17 pub consts: Vec<Dynamic>,
18 names: Vec<SmolStr>,
19 fns: BTreeMap<u32, Vec<(Vec<Type>, Vec<Type>, Type)>>,
20 importing_paths: BTreeSet<PathBuf>,
21}
22
23fn impl_target_name(target: &Type) -> anyhow::Result<SmolStr> {
24 match target {
25 Type::Ident { name, .. } => Ok(name.clone()),
26 _ => anyhow::bail!("impl 目标类型暂不支持: {:?}", target),
27 }
28}
29
30#[cfg(test)]
31mod tests {
32 use super::{Compiler, Symbol};
33 use dynamic::Type;
34
35 #[test]
36 fn inferred_function_return_type_is_written_back_to_symbol() -> anyhow::Result<()> {
37 let mut compiler = Compiler::new();
38 compiler.import_code(
39 "compiler_infer_return",
40 br#"
41 pub fn is_alive() {
42 true
43 }
44
45 pub fn can_act() {
46 is_alive() && true && is_alive()
47 }
48 "#
49 .to_vec(),
50 )?;
51
52 let is_alive = compiler.symbols.get_id("compiler_infer_return::is_alive")?;
53 assert_eq!(compiler.infer_fn(is_alive, &[])?, Type::Bool);
54
55 let (_, symbol) = compiler.symbols.get_symbol(is_alive)?;
56 let Symbol::Fn { ty: Type::Fn { ret, .. }, .. } = symbol else {
57 panic!("is_alive should be a function symbol");
58 };
59 assert_eq!(ret.as_ref(), &Type::Bool);
60
61 let can_act = compiler.symbols.get_id("compiler_infer_return::can_act")?;
62 assert_eq!(compiler.infer_fn(can_act, &[])?, Type::Bool);
63 Ok(())
64 }
65
66 #[test]
67 fn top_level_const_composite_resolves_const_idents() -> anyhow::Result<()> {
68 let mut compiler = Compiler::new();
69 compiler.import_code(
70 "compiler_const_table",
71 br#"
72 pub const GEM_ATK = "atk";
73 pub const GEM_DEF = "def";
74 pub const GEM_TABLE = [
75 { key: GEM_ATK, score: 3i32 },
76 { key: GEM_DEF, score: 1i32 },
77 ];
78 "#
79 .to_vec(),
80 )?;
81
82 let table = compiler.symbols.get_id("compiler_const_table::GEM_TABLE")?;
83 let (_, symbol) = compiler.symbols.get_symbol(table)?;
84 let Symbol::Const { value, .. } = symbol else {
85 panic!("GEM_TABLE should be a const symbol");
86 };
87
88 let first = value.get_idx(0).expect("first table row");
89 assert_eq!(first.get_dynamic("key").expect("key").as_str(), "atk");
90 assert_eq!(first.get_dynamic("score").expect("score").as_int(), Some(3));
91 Ok(())
92 }
93
94 #[test]
95 fn const_unary_neg_handles_min_integer_literal() -> anyhow::Result<()> {
96 let mut compiler = Compiler::new();
97 compiler.import_code(
98 "compiler_const_min_int",
99 br#"
100 pub const MIN_I32: i32 = -2147483648i32;
101 "#
102 .to_vec(),
103 )?;
104
105 let id = compiler.symbols.get_id("compiler_const_min_int::MIN_I32")?;
106 let (_, symbol) = compiler.symbols.get_symbol(id)?;
107 let Symbol::Const { value, .. } = symbol else {
108 panic!("MIN_I32 should be a const symbol");
109 };
110 assert_eq!(value.as_int(), Some(i32::MIN as i64));
111 Ok(())
112 }
113
114 #[test]
115 fn return_check_resolves_function_args_before_body_compile() -> anyhow::Result<()> {
116 let mut compiler = Compiler::new();
117 compiler.import_code(
118 "compiler_return_check_args",
119 br#"
120 pub fn no_value_return(flag: bool) {
121 if flag {
122 return;
123 }
124 }
125
126 pub fn tail_if(flag: bool) {
127 if flag {
128 1
129 } else {
130 2
131 }
132 }
133
134 pub fn loop_index(low: i64, high: i64) {
135 let total = 0i64;
136 for i in low..high {
137 total += i;
138 }
139 total
140 }
141
142 pub fn closure_capture() {
143 let base = 10i32;
144 let add_base = |value: i32| {
145 value + base
146 };
147 add_base(1i32)
148 }
149
150 pub fn destructured_names() {
151 let (left, right) = (3i32, 4i32);
152 let [first, second] = [5i32, 6i32];
153 let _ = first;
154 left + right + second
155 }
156 "#
157 .to_vec(),
158 )?;
159
160 let no_value_return = compiler.symbols.get_id("compiler_return_check_args::no_value_return")?;
161 assert_eq!(compiler.infer_fn(no_value_return, &[Type::Bool])?, Type::Void);
162
163 let tail_if = compiler.symbols.get_id("compiler_return_check_args::tail_if")?;
164 assert_eq!(compiler.infer_fn(tail_if, &[Type::Bool])?, Type::I32);
165
166 let loop_index = compiler.symbols.get_id("compiler_return_check_args::loop_index")?;
167 assert_eq!(compiler.infer_fn(loop_index, &[Type::I64, Type::I64])?, Type::I64);
168
169 Ok(())
170 }
171
172 #[test]
173 fn return_map_and_struct_is_type_error() -> anyhow::Result<()> {
174 let mut compiler = Compiler::new();
175 let err = match compiler.import_code(
176 "compiler_return_map_struct",
177 br#"
178 struct S {
179 hp: i32,
180 }
181
182 pub fn make_s_or_error(flag: i32) {
183 if flag == 0 {
184 return { error: "bad" };
185 }
186 S{hp: 123}
187 }
188 "#
189 .to_vec(),
190 ) {
191 Ok(_) => panic!("expected mismatched return types to fail"),
192 Err(err) => err,
193 };
194
195 assert!(format!("{err:#}").contains("返回类型不一致"));
196 Ok(())
197 }
198}
199
200fn has_unresolved_generic_param(ty: &Type) -> bool {
201 match ty {
202 Type::Ident { name, params } => {
203 if params.is_empty() {
204 name.chars().next().map(|ch| ch.is_ascii_uppercase()).unwrap_or(false)
205 } else {
206 params.iter().any(has_unresolved_generic_param)
207 }
208 }
209 Type::Struct { params, fields } => params.iter().any(has_unresolved_generic_param) || fields.iter().any(|(_, ty)| has_unresolved_generic_param(ty)),
210 Type::Tuple(items) => items.iter().any(has_unresolved_generic_param),
211 Type::Vec(elem, _) | Type::Array(elem, _) => has_unresolved_generic_param(elem),
212 Type::ArrayParam(elem, len) => has_unresolved_generic_param(elem) || has_unresolved_generic_param(len),
213 Type::Fn { tys, ret } => tys.iter().any(has_unresolved_generic_param) || has_unresolved_generic_param(ret),
214 Type::Symbol { params, .. } => params.iter().any(has_unresolved_generic_param),
215 Type::ConstBinary { left, right, .. } => has_unresolved_generic_param(left) || has_unresolved_generic_param(right),
216 _ => false,
217 }
218}
219
220fn is_top_level_import_expr(expr: &Expr) -> bool {
221 matches!(
222 &expr.kind,
223 ExprKind::Call { obj, .. } if matches!(&obj.kind, ExprKind::Ident(name) if name.as_str() == "import")
224 )
225}
226
227fn string_value(expr: &Expr) -> Option<&str> {
228 if let ExprKind::Value(Dynamic::String(value)) = &expr.kind { Some(value.as_str()) } else { None }
229}
230
231fn import_decl(stmt: &Stmt) -> Option<(SmolStr, SmolStr)> {
232 let StmtKind::Expr(expr, _) = &stmt.kind else {
233 return None;
234 };
235 let ExprKind::Call { obj, params } = &expr.kind else {
236 return None;
237 };
238 let ExprKind::Ident(name) = &obj.kind else {
239 return None;
240 };
241 if name.as_str() != "import" {
242 return None;
243 }
244
245 match params.as_slice() {
246 [module, path] => Some((string_value(module)?.into(), string_value(path)?.into())),
247 [module] => match &module.kind {
248 ExprKind::Value(Dynamic::String(value)) => Some((value.clone(), format!("{value}.zs").into())),
249 ExprKind::Ident(value) => Some((value.clone(), format!("{value}.zs").into())),
250 _ => None,
251 },
252 _ => None,
253 }
254}
255
256fn generic_arg_for_name<'a>(name: &str, params: &'a [Type], args: &'a [Type]) -> Option<&'a Type> {
257 params.iter().position(|param| matches!(param, Type::Ident { name: param_name, params } if params.is_empty() && param_name == name)).and_then(|idx| args.get(idx))
258}
259
260pub fn infer_generic_args_from_types(generic_params: &[Type], decl_tys: &[Type], arg_tys: &[Type]) -> Vec<Type> {
261 if generic_params.is_empty() {
262 return Vec::new();
263 }
264 let mut inferred = vec![None; generic_params.len()];
265 for (decl, actual) in decl_tys.iter().zip(arg_tys.iter()) {
266 infer_generic_arg_from_type(generic_params, decl, actual, &mut inferred);
267 }
268 if inferred.iter().all(|item| item.is_some()) {
269 return inferred.into_iter().map(Option::unwrap).collect();
270 }
271 if let Some(Type::Struct { params, .. }) = arg_tys.iter().find(|ty| matches!(ty, Type::Struct { params, .. } if params.len() == generic_params.len())) {
272 return params.clone();
273 }
274 for (decl, actual) in decl_tys.iter().zip(arg_tys.iter()) {
275 if let (Type::Ident { params: decl_params, .. }, Type::Ident { params: actual_params, .. }) = (decl, actual)
276 && decl_params.len() == actual_params.len()
277 && decl_params.iter().any(|param| generic_params.contains(param))
278 {
279 return actual_params.clone();
280 }
281 }
282 Vec::new()
283}
284
285fn infer_generic_arg_from_type(generic_params: &[Type], decl: &Type, actual: &Type, inferred: &mut [Option<Type>]) {
286 if let Some(idx) = generic_params.iter().position(|param| param == decl) {
287 inferred[idx] = Some(actual.clone());
288 return;
289 }
290
291 match (decl, actual) {
292 (Type::Vec(decl_elem, decl_len), Type::Vec(actual_elem, actual_len)) | (Type::Array(decl_elem, decl_len), Type::Array(actual_elem, actual_len)) => {
293 infer_generic_arg_from_type(generic_params, decl_elem, actual_elem, inferred);
294 infer_generic_arg_from_type(generic_params, &Type::ConstInt(*decl_len as i64), &Type::ConstInt(*actual_len as i64), inferred);
295 }
296 (Type::ArrayParam(decl_elem, decl_len), Type::Array(actual_elem, actual_len)) => {
297 infer_generic_arg_from_type(generic_params, decl_elem, actual_elem, inferred);
298 infer_generic_arg_from_type(generic_params, decl_len, &Type::ConstInt(*actual_len as i64), inferred);
299 }
300 (Type::Ident { params: decl_params, .. }, Type::Ident { params: actual_params, .. })
301 | (Type::Ident { params: decl_params, .. }, Type::Symbol { params: actual_params, .. })
302 | (Type::Symbol { params: decl_params, .. }, Type::Symbol { params: actual_params, .. })
303 | (Type::Symbol { params: decl_params, .. }, Type::Ident { params: actual_params, .. })
304 | (Type::Struct { params: decl_params, .. }, Type::Struct { params: actual_params, .. }) => {
305 for (decl, actual) in decl_params.iter().zip(actual_params.iter()) {
306 infer_generic_arg_from_type(generic_params, decl, actual, inferred);
307 }
308 }
309 _ => {}
310 }
311}
312
313fn substitute_pattern(pattern: &Pattern, params: &[Type], args: &[Type]) -> Pattern {
314 let kind = match &pattern.kind {
315 PatternKind::Ident { name, ty } => PatternKind::Ident { name: name.clone(), ty: substitute_type(ty, params, args) },
316 PatternKind::Var { idx, ty } => PatternKind::Var { idx: *idx, ty: substitute_type(ty, params, args) },
317 PatternKind::Tuple(items) => PatternKind::Tuple(items.iter().map(|item| substitute_pattern(item, params, args)).collect()),
318 PatternKind::List { elems, has_rest } => PatternKind::List { elems: elems.iter().map(|item| substitute_pattern(item, params, args)).collect(), has_rest: *has_rest },
319 other => other.clone(),
320 };
321 Pattern { kind, span: pattern.span }
322}
323
324fn substitute_expr(expr: &Expr, params: &[Type], args: &[Type]) -> Expr {
325 let kind = match &expr.kind {
326 ExprKind::Ident(name) => match generic_arg_for_name(name, params, args) {
327 Some(Type::ConstInt(value)) => ExprKind::Value(Dynamic::I32(*value as i32)),
328 Some(ty) => eval_const_int_type(ty).map(|value| ExprKind::Value(Dynamic::I32(value as i32))).unwrap_or_else(|| expr.kind.clone()),
329 _ => expr.kind.clone(),
330 },
331 ExprKind::Typed { value, ty } => ExprKind::Typed { value: Box::new(substitute_expr(value, params, args)), ty: substitute_type(ty, params, args) },
332 ExprKind::Unary { op, value } => ExprKind::Unary { op: op.clone(), value: Box::new(substitute_expr(value, params, args)) },
333 ExprKind::Binary { left, op, right } => ExprKind::Binary { left: Box::new(substitute_expr(left, params, args)), op: op.clone(), right: Box::new(substitute_expr(right, params, args)) },
334 ExprKind::Assoc { ty, name } => ExprKind::Assoc { ty: substitute_type(ty, params, args), name: name.clone() },
335 ExprKind::TypedMethod { obj, ty, name } => ExprKind::TypedMethod { obj: Box::new(substitute_expr(obj, params, args)), ty: substitute_type(ty, params, args), name: name.clone() },
336 ExprKind::AssocId { id, params: nested } => ExprKind::AssocId { id: *id, params: nested.iter().map(|param| substitute_type(param, params, args)).collect() },
337 ExprKind::Tuple(items) => ExprKind::Tuple(items.iter().map(|item| substitute_expr(item, params, args)).collect()),
338 ExprKind::List(items) => ExprKind::List(items.iter().map(|item| substitute_expr(item, params, args)).collect()),
339 ExprKind::Repeat { value, len } => ExprKind::Repeat { value: Box::new(substitute_expr(value, params, args)), len: substitute_type(len, params, args) },
340 ExprKind::Dict(items) => ExprKind::Dict(items.iter().map(|(name, value)| (name.clone(), substitute_expr(value, params, args))).collect()),
341 ExprKind::Range { start, stop, inclusive } => ExprKind::Range { start: Box::new(substitute_expr(start, params, args)), stop: Box::new(substitute_expr(stop, params, args)), inclusive: *inclusive },
342 ExprKind::Call { obj, params: call_params } => ExprKind::Call { obj: Box::new(substitute_expr(obj, params, args)), params: call_params.iter().map(|param| substitute_expr(param, params, args)).collect() },
343 ExprKind::Stmt(stmt) => ExprKind::Stmt(Box::new(substitute_stmt(stmt, params, args))),
344 ExprKind::Closure { args: closure_args, body } => {
345 ExprKind::Closure { args: closure_args.iter().map(|(name, ty)| (name.clone(), substitute_type(ty, params, args))).collect(), body: Box::new(substitute_stmt(body, params, args)) }
346 }
347 _ => expr.kind.clone(),
348 };
349 Expr::new(kind, expr.span)
350}
351
352pub fn substitute_stmt(stmt: &Stmt, params: &[Type], args: &[Type]) -> Stmt {
353 let kind = match &stmt.kind {
354 StmtKind::Let { pat, value } => StmtKind::Let { pat: substitute_pattern(pat, params, args), value: Box::new(substitute_stmt(value, params, args)) },
355 StmtKind::Expr(expr, close) => StmtKind::Expr(substitute_expr(expr, params, args), *close),
356 StmtKind::Block(stmts) => StmtKind::Block(stmts.iter().map(|stmt| substitute_stmt(stmt, params, args)).collect()),
357 StmtKind::Return(expr) => StmtKind::Return(expr.as_ref().map(|expr| substitute_expr(expr, params, args))),
358 StmtKind::While { cond, body } => StmtKind::While { cond: substitute_expr(cond, params, args), body: Box::new(substitute_stmt(body, params, args)) },
359 StmtKind::Loop(body) => StmtKind::Loop(Box::new(substitute_stmt(body, params, args))),
360 StmtKind::For { pat, range, body } => StmtKind::For { pat: substitute_pattern(pat, params, args), range: substitute_expr(range, params, args), body: Box::new(substitute_stmt(body, params, args)) },
361 StmtKind::Fn { name, generic_params, args: fn_args, body, is_pub } => StmtKind::Fn {
362 name: name.clone(),
363 generic_params: generic_params.iter().map(|param| substitute_type(param, params, args)).collect(),
364 args: fn_args.iter().map(|(name, ty)| (name.clone(), substitute_type(ty, params, args))).collect(),
365 body: Box::new(substitute_stmt(body, params, args)),
366 is_pub: *is_pub,
367 },
368 StmtKind::Struct { name, def, is_pub } => StmtKind::Struct { name: name.clone(), def: substitute_type(def, params, args), is_pub: *is_pub },
369 StmtKind::Impl { target, body } => StmtKind::Impl { target: substitute_type(target, params, args), body: Box::new(substitute_stmt(body, params, args)) },
370 StmtKind::If { cond, then_body, else_body } => StmtKind::If {
371 cond: substitute_expr(cond, params, args),
372 then_body: Box::new(substitute_stmt(then_body, params, args)),
373 else_body: else_body.as_ref().map(|body| Box::new(substitute_stmt(body, params, args))),
374 },
375 StmtKind::Static { name, ty, value, is_pub } => {
376 StmtKind::Static { name: name.clone(), ty: substitute_type(ty, params, args), value: value.as_ref().map(|value| substitute_expr(value, params, args)), is_pub: *is_pub }
377 }
378 StmtKind::Const { name, ty, value, is_pub } => StmtKind::Const { name: name.clone(), ty: substitute_type(ty, params, args), value: substitute_expr(value, params, args), is_pub: *is_pub },
379 other => other.clone(),
380 };
381 Stmt::new(kind, stmt.span)
382}
383
384#[derive(Debug, Clone, Default)]
385pub struct Capture {
386 pub names: Vec<(SmolStr, Type)>,
387 pub vars: Vec<usize>,
388}
389
390impl Capture {
391 pub fn new(names: Vec<(SmolStr, Type)>) -> Self {
392 Self { names, vars: Vec::new() }
393 }
394
395 pub fn get(&mut self, name: &str) -> Option<usize> {
396 if let Some(idx) = self.names.iter().position(|n| n.0 == name) {
397 if let Some(pos) = self.vars.iter().position(|v| *v == idx) {
398 Some(pos)
399 } else {
400 self.vars.push(idx);
401 Some(self.vars.len() - 1)
402 }
403 } else {
404 None
405 }
406 }
407
408 pub fn get_type(&self, idx: u32) -> Option<Type> {
409 self.names.get(idx as usize).map(|(_, ty)| ty.clone())
410 }
411}
412
413use anyhow::{Context, Result, anyhow};
414use smol_str::SmolStr;
415use thiserror::Error;
416
417#[derive(Debug, Error)]
418#[error("{message}")]
419pub struct SpannedCompilerError {
420 pub message: String,
421 pub span: Span,
422}
423
424#[derive(Debug, Clone)]
425pub struct CompilerDiagnostic {
426 pub message: String,
427 pub span: Span,
428}
429
430impl Compiler {
431 pub fn clear(&mut self) {
432 self.frames.clear();
433 self.names.clear();
434 self.tys.clear();
435 }
436
437 pub fn take_local_state(&mut self) -> (Vec<usize>, Vec<SmolStr>, Vec<Type>) {
438 (std::mem::take(&mut self.frames), std::mem::take(&mut self.names), std::mem::take(&mut self.tys))
439 }
440
441 pub fn restore_local_state(&mut self, state: (Vec<usize>, Vec<SmolStr>, Vec<Type>)) {
442 self.frames = state.0;
443 self.names = state.1;
444 self.tys = state.2;
445 }
446
447 pub fn get_value(&self, expr: &Expr) -> Option<Dynamic> {
448 match &expr.kind {
449 ExprKind::Value(v) => Some(v.clone()),
450 ExprKind::Const(idx) => self.consts.get(*idx).cloned(),
451 _ => None,
452 }
453 }
454
455 pub fn get_const(&mut self, value: Dynamic) -> usize {
456 self.consts.iter().position(|c| c == &value).unwrap_or_else(|| {
457 self.consts.push(value);
458 self.consts.len() - 1
459 })
460 }
461
462 pub fn top(&self) -> usize {
463 self.frames.last().copied().unwrap_or(0)
464 }
465
466 fn add_name(&mut self, name: SmolStr) -> u32 {
467 self.names.push(name);
468 (self.names.len() - self.top() - 1) as u32
469 }
470
471 fn add_ty(&mut self, ty: Type) -> u32 {
472 self.tys.push(ty);
473 (self.tys.len() - self.top() - 1) as u32
474 }
475
476 fn set_ty(&mut self, idx: u32, ty: Type) {
477 let pos = idx as usize + self.top();
478 if pos < self.tys.len() {
479 self.tys[pos] = ty;
480 } else if pos == self.tys.len() {
481 self.tys.push(ty);
482 } else {
483 self.tys.resize(pos + 1, Type::Any);
484 self.tys[pos] = ty;
485 }
486 }
487
488 pub fn add_symbol(&mut self, name: &str, s: Symbol) -> u32 {
489 self.symbols.add(name.into(), s)
490 }
491
492 pub fn new() -> Self {
493 let symbols = SymbolTable::default();
494 Self { symbols, tys: Vec::new(), names: Vec::new(), consts: Vec::with_capacity(10240), frames: Vec::new(), fns: BTreeMap::new(), importing_paths: BTreeSet::new() }
495 }
496
497 fn byte_to_line_col(src: &[u8], pos: usize) -> (usize, usize) {
498 let mut line = 1;
499 let mut col = 1;
500 for &b in src.iter().take(pos.min(src.len())) {
501 if b == b'\n' {
502 line += 1;
503 col = 1;
504 } else {
505 col += 1;
506 }
507 }
508 (line, col)
509 }
510
511 fn line_snippet(code: &[u8], span: Span) -> String {
512 let pos = span.start.min(code.len());
513 let line_start = code[..pos].iter().rposition(|&b| b == b'\n').map(|idx| idx + 1).unwrap_or(0);
514 let line_end = code[pos..].iter().position(|&b| b == b'\n').map(|idx| pos + idx).unwrap_or(code.len());
515 String::from_utf8_lossy(&code[line_start..line_end]).into_owned()
516 }
517
518 fn semantic_error(span: Span, message: impl Into<String>) -> anyhow::Error {
519 SpannedCompilerError { message: message.into(), span }.into()
520 }
521
522 fn format_compile_error(code: &[u8], err: anyhow::Error) -> anyhow::Error {
523 if let Some(err) = err.downcast_ref::<SpannedCompilerError>() {
524 let pos = err.span.start.min(code.len());
525 let (line, col) = Self::byte_to_line_col(code, pos);
526 let snippet = Self::line_snippet(code, err.span);
527 anyhow!("语义错误:第 {line} 行,第 {col} 列(字节偏移 {pos}):{}\n{}", err.message, snippet)
528 } else {
529 err
530 }
531 }
532
533 pub fn parse_code(code: Vec<u8>) -> Result<Vec<Stmt>> {
534 let mut p = Parser::new(code.clone());
535 let mut stmts = Vec::new();
536 loop {
537 match p.stmt(false) {
538 Ok(stmt) => stmts.push(stmt),
539 Err(e) => {
540 if p.is_eof() {
541 return Ok(stmts);
542 }
543 let pos = p.current_pos();
544 let (line, col) = Self::byte_to_line_col(&code, pos);
545 return Err(anyhow!("解析错误:第 {line} 行,第 {col} 列(字节偏移 {pos}):{e:#}\n{}", p.error_stmt()));
546 }
547 }
548 }
549 }
550
551 pub fn import_code(&mut self, name: &str, code: Vec<u8>) -> Result<Vec<u32>> {
552 self.import_code_with_base_dir(name, code, None)
553 }
554
555 pub fn import_code_from_path(&mut self, name: &str, code: Vec<u8>, path: impl AsRef<Path>) -> Result<Vec<u32>> {
556 self.import_code_with_base_dir(name, code, path.as_ref().parent())
557 }
558
559 pub fn import_file(&mut self, name: &str, path: impl AsRef<Path>) -> Result<Vec<u32>> {
560 let path = path.as_ref();
561 let canonical = std::fs::canonicalize(path).with_context(|| format!("failed to resolve import path {}", path.display()))?;
562 if !self.importing_paths.insert(canonical.clone()) {
563 return Ok(Vec::new());
564 }
565 let code = std::fs::read(&canonical).with_context(|| format!("failed to read import path {}", canonical.display()))?;
566 let result = self.import_code_from_path(name, code, &canonical);
567 self.importing_paths.remove(&canonical);
568 result
569 }
570
571 fn import_code_with_base_dir(&mut self, name: &str, code: Vec<u8>, base_dir: Option<&Path>) -> Result<Vec<u32>> {
572 let stmts = Self::parse_code(code.clone())?;
573 log::info!("func->{}", name);
574 for s in stmts.iter() {
575 log::info!("{}", s);
576 }
577 self.resolve_imports(&stmts, base_dir).map_err(|err| Self::format_compile_error(&code, err))?;
578 self.clear();
579 self.compile(name.into(), stmts).map_err(|err| Self::format_compile_error(&code, err))
580 }
581
582 fn resolve_imports(&mut self, stmts: &[Stmt], base_dir: Option<&Path>) -> Result<()> {
583 for stmt in stmts {
584 let Some((module, path)) = import_decl(stmt) else {
585 continue;
586 };
587 if !self.symbols.symbol(module.as_str()).is_empty() {
588 continue;
589 }
590 let path = Path::new(path.as_str());
591 let resolved = if path.is_absolute() {
592 path.to_path_buf()
593 } else if let Some(base_dir) = base_dir {
594 base_dir.join(path)
595 } else {
596 std::env::current_dir()?.join(path)
597 };
598 self.import_file(module.as_str(), &resolved).with_context(|| format!("failed to import {module} from {}", resolved.display()))?;
599 }
600 Ok(())
601 }
602
603 pub fn check_code(name: &str, code: Vec<u8>) -> Vec<CompilerDiagnostic> {
604 let mut parser = Parser::new(code.clone());
605 let mut stmts = Vec::new();
606 loop {
607 match parser.stmt(false) {
608 Ok(stmt) => stmts.push(stmt),
609 Err(err) => {
610 if parser.is_eof() {
611 break;
612 }
613 return vec![CompilerDiagnostic { message: format!("解析错误:{err:#}"), span: Span::empty(parser.current_pos()) }];
614 }
615 }
616 }
617
618 let mut compiler = Self::new();
619 compiler.clear();
620 match compiler.compile(name.into(), stmts) {
621 Ok(_) => Vec::new(),
622 Err(err) => {
623 if let Some(err) = err.downcast_ref::<SpannedCompilerError>() {
624 vec![CompilerDiagnostic { message: err.message.clone(), span: err.span }]
625 } else {
626 vec![CompilerDiagnostic { message: format!("{err:#}"), span: Span::default() }]
627 }
628 }
629 }
630 }
631
632 pub fn get_field(&self, ty: &Type, name: &str) -> Result<(usize, Type)> {
633 self.symbols.get_field(ty, name)
634 }
635
636 pub fn get_ident(&mut self, ident: &str, span: Span) -> Result<Expr> {
637 for idx in (self.top()..self.names.len()).rev() {
638 if self.names[idx].eq(ident) {
639 return Ok(Expr::new(ExprKind::Var((idx - self.top()) as u32), span));
640 }
641 }
642 let id = self.symbols.get_id(ident).map_err(|_| Self::semantic_error(span, format!("未找到标识符 {}", ident)))?;
643 let s = self.symbols.get_symbol(id).map(|(_, v)| v.clone()).unwrap();
644 if let Symbol::Const { value, ty, .. } = s {
645 let c = self.get_const(value);
646 return Ok(Expr::new(ExprKind::Typed { value: Box::new(Expr::new(ExprKind::Const(c), span)), ty }, span));
647 } else if let Symbol::Static { value, ty, .. } = s
648 && let Some(v) = value
649 {
650 let c = self.get_const(v);
651 return Ok(Expr::new(ExprKind::Typed { value: Box::new(Expr::new(ExprKind::Const(c), span)), ty }, span));
652 }
653 Ok(Expr::new(ExprKind::Id(id, None), span))
654 }
655
656 fn field_access_expr(&mut self, left: Expr, idx: usize, ty: Type, key: &str, span: Span) -> Expr {
657 if let Type::Symbol { id, .. } = ty {
658 Expr::new(ExprKind::Id(id, Some(Box::new(left))), span)
659 } else if ty.is_bool() && idx == usize::MAX {
660 Expr::new(ExprKind::Value(Dynamic::Bool(false)), span)
661 } else if ty.is_any() && idx == usize::MAX {
662 let right = Expr::new(ExprKind::Const(self.get_const(Dynamic::String(key.into()))), span);
663 Expr::new(ExprKind::Binary { left: Box::new(left), op: BinaryOp::Idx, right: Box::new(right) }, span)
664 } else {
665 Expr::new(ExprKind::Binary { left: Box::new(left), op: BinaryOp::Idx, right: Box::new(Expr::new(ExprKind::Value(Dynamic::U32(idx as u32)), span)) }, span)
666 }
667 }
668
669 fn literal_field_access_expr(&mut self, left: Expr, key: &str, span: Span) -> Expr {
670 let right = Expr::new(ExprKind::Const(self.get_const(Dynamic::String(key.into()))), span);
671 Expr::new(ExprKind::Binary { left: Box::new(left), op: BinaryOp::Idx, right: Box::new(right) }, span)
672 }
673
674 fn type_field_access_expr(&mut self, left: Expr, key: &str, span: Span, prefer_dynamic_field: bool) -> Option<Expr> {
675 let ty = self.infer_expr(&left).ok()?;
676 if prefer_dynamic_field && ty.is_any() {
677 return Some(self.literal_field_access_expr(left, key, span));
678 }
679 let (idx, field_ty) = self.get_field(&ty, key).ok()?;
680 Some(self.field_access_expr(left, idx, field_ty, key, span))
681 }
682
683 fn global_method_access_expr(&self, left: Expr, method: &str, span: Span) -> Result<Option<Expr>> {
684 let Ok(id) = self.symbols.get_id(method) else {
685 return Ok(None);
686 };
687 if self.symbols.get_symbol(id)?.1.is_fn() { Ok(Some(Expr::new(ExprKind::Id(id, Some(Box::new(left))), span))) } else { Ok(None) }
688 }
689
690 fn method_call_obj_expr(&mut self, obj: &Expr, stmts: &mut Vec<Stmt>, cap: &mut Capture) -> Result<Option<Expr>> {
691 if let ExprKind::TypedMethod { obj: left, ty, name } = &obj.kind {
692 let left = self.eval(left, stmts, cap)?;
693 let base_name = match ty {
694 Type::Ident { name, .. } => name.clone(),
695 Type::Symbol { id, .. } => self.symbols.get_symbol(*id)?.0.clone(),
696 _ => return Err(Self::semantic_error(obj.span, format!("方法调用类型提示必须是类型: {:?}", ty))),
697 };
698 let method = format!("{}::{}", base_name, name);
699 let id = self.symbols.get_id(&method).map_err(|_| Self::semantic_error(obj.span, format!("未找到类型方法 {}", method)))?;
700 return Ok(Some(Expr::new(ExprKind::Id(id, Some(Box::new(left))), obj.span)));
701 }
702
703 let ExprKind::Binary { left, op: BinaryOp::Idx, right } = &obj.kind else {
704 return Ok(None);
705 };
706 let Some(method) = self.get_value(right).and_then(|v| if v.is_str() { Some(v.as_str().to_string()) } else { None }) else {
707 return Ok(None);
708 };
709 let left = self.eval(left, stmts, cap)?;
710 if let Some(field) = self.type_field_access_expr(left.clone(), &method, obj.span, false) {
711 return Ok(Some(field));
712 }
713 if let Some(method_fn) = self.global_method_access_expr(left.clone(), &method, obj.span)? {
714 return Ok(Some(method_fn));
715 }
716 Ok(Some(self.literal_field_access_expr(left, &method, obj.span)))
717 }
718
719 pub fn compile_fn(&mut self, args: &[SmolStr], tys: &mut Vec<Type>, body: Stmt, cap: &mut Capture) -> Result<Vec<Stmt>> {
720 let top = self.tys.len();
721 self.frames.push(top);
722 let result = (|| -> Result<Vec<Stmt>> {
723 for (arg, ty) in args.iter().zip(tys.iter_mut()) {
724 *ty = self.symbols.get_type(ty)?;
725 self.add_name(arg.clone());
726 self.add_ty(ty.clone());
727 }
728 if cap.names.is_empty() && tys.iter().all(|ty| !ty.is_any()) {
729 let saved_state = (self.frames.clone(), self.names.clone(), self.tys.clone());
730 let result = self.check_return_type(&body);
731 self.restore_local_state(saved_state);
732 result?;
733 }
734 let mut compiled = Vec::new();
735 self.compile_stmt(body, &mut compiled, cap)?;
736 if !compiled.last_mut().map(|stmt| stmt.last_return()).unwrap_or(false) {
737 compiled.push(Stmt::new(StmtKind::Return(None), Span::default()));
738 }
739 Ok(compiled)
740 })();
741 if let Some(top) = self.frames.pop() {
742 self.tys.truncate(top);
743 self.names.truncate(top);
744 }
745 result
746 }
747
748 pub fn compile(&mut self, mod_name: SmolStr, stmts: Vec<Stmt>) -> Result<Vec<u32>> {
749 self.symbols.add_module(mod_name.clone());
750 for stmt in stmts {
751 match stmt.kind {
752 StmtKind::Struct { name, def, is_pub } => {
753 self.symbols.add(name, Symbol::Struct(def, is_pub));
754 }
755 StmtKind::Static { name, ty, value, is_pub } => {
756 self.symbols.add(name, Symbol::Static { value: value.and_then(|v| v.value().ok()), ty, is_pub });
757 }
758 StmtKind::Const { name, ty, value, is_pub } => {
759 let value = self.const_expr_value(&value)?;
760 self.symbols.add(name, Symbol::Const { value, ty, is_pub });
761 }
762 StmtKind::Fn { name, generic_params, args, body, is_pub } => {
763 let (ty, args) = Type::from_args(args);
764 self.symbols.add(name, Symbol::Fn { ty, args, generic_params, cap: Capture::default(), body: Arc::new(*body), is_pub });
765 }
766 StmtKind::Impl { target, body } => {
767 let name = impl_target_name(&target)?;
768 let def_id = match self.symbols.get_id(&name) {
769 Ok(id) => id,
770 Err(_) if name.as_str() == "Vec" => self.symbols.add(name.clone(), Symbol::Struct(Type::Struct { params: Vec::new(), fields: Vec::new() }, true)),
771 Err(err) => return Err(err),
772 };
773 if let StmtKind::Block(fns) = body.kind {
774 for f in fns {
775 if let StmtKind::Fn { name: fn_name, generic_params: fn_generic_params, args, body, is_pub } = f.kind {
776 let (ty, args) = Type::from_args(args);
777 let mut generic_params = if has_unresolved_generic_param(&target) {
778 match &target {
779 Type::Ident { params, .. } => params.clone(),
780 _ => Vec::new(),
781 }
782 } else {
783 Vec::new()
784 };
785 for param in fn_generic_params {
786 if !generic_params.contains(¶m) {
787 generic_params.push(param);
788 }
789 }
790 let fn_id = self.symbols.add(SmolStr::from(format!("{}::{}", name, fn_name)), Symbol::Fn { ty, args, generic_params, cap: Capture::default(), body: Arc::new(*body), is_pub });
791 if let Symbol::Struct(ty, _) = &mut self.symbols.symbols[def_id as usize] {
792 ty.add_field(fn_name.into(), Type::Symbol { id: fn_id, params: Vec::new() })?;
793 }
794 } else {
795 println!("impl 包含非函数语句 {:?}", f);
796 }
797 }
798 }
799 }
800 StmtKind::Expr(expr, _) if is_top_level_import_expr(&expr) => {}
801 _ => {
802 println!("未知的顶层语句 {:?}", stmt);
803 }
804 }
805 }
806 let mut fn_ids = Vec::new();
807 for (name, id) in self.symbols.symbol(&mod_name) {
808 log::info!("compile symbol {:?}[{}]", name, id);
809 if let Some((_, Symbol::Fn { ty, generic_params, .. })) = self.symbols.get_symbol(id).ok() {
810 let resolved_ty = self.symbols.get_type(ty).unwrap_or_else(|_| ty.clone());
811 if has_unresolved_generic_param(&resolved_ty) || !generic_params.is_empty() {
812 continue;
813 }
814 }
815 if let Some(s) = self.symbols.take(id) {
816 match s {
817 Symbol::Fn { ty, args, generic_params, mut cap, body, is_pub } => {
818 if let Type::Fn { mut tys, ret } = ty {
819 let compiled = self.compile_fn(&args, &mut tys, Arc::try_unwrap(body).unwrap(), &mut cap)?;
820 for s in compiled.iter() {
821 log::info!("{}", s);
822 }
823 self.symbols.symbols[id as usize] = Symbol::Fn { ty: Type::Fn { tys, ret }, args, generic_params, cap, body: Arc::new(Stmt::new(StmtKind::Block(compiled), Span::default())), is_pub };
824 fn_ids.push(id);
825 }
826 }
827 _ => {
828 self.symbols.symbols[id as usize] = s;
829 }
830 }
831 }
832 }
833 self.symbols.pop_module();
834 Ok(fn_ids)
835 }
836
837 fn pat_to_var(&mut self, pat: Pattern, expr_ty: Type) -> Result<Pattern> {
838 match pat.kind {
839 PatternKind::Var { idx, ty } => Ok(Pattern { kind: PatternKind::Var { idx, ty }, span: pat.span }),
840 PatternKind::Ident { name, ty } => {
841 let ty = self.symbols.get_type(&ty)?;
842 let ty = if ty.is_any() { expr_ty } else { ty };
843 self.add_ty(ty.clone());
844 Ok(Pattern { kind: PatternKind::Var { idx: self.add_name(name), ty }, span: pat.span })
845 }
846 PatternKind::Tuple(pats) => {
847 if let Type::Tuple(tys) = &expr_ty {
848 let pats: Vec<Pattern> = pats.into_iter().zip(tys).filter_map(|p| self.pat_to_var(p.0, p.1.clone()).ok()).collect();
849 if pats.len() == tys.len() { Ok(Pattern { kind: PatternKind::Tuple(pats), span: pat.span }) } else { Err(Self::semantic_error(pat.span, format!("模式与元组类型不匹配: {:?}", expr_ty))) }
850 } else {
851 let pats = pats.into_iter().filter_map(|p| self.pat_to_var(p, Type::Any).ok()).collect();
852 Ok(Pattern { kind: PatternKind::Tuple(pats), span: pat.span })
853 }
854 }
855 PatternKind::List { elems, has_rest } => {
856 if expr_ty.is_any() {
857 let elems: Vec<Pattern> = elems.into_iter().filter_map(|p| self.pat_to_var(p, Type::Any).ok()).collect();
858 Ok(Pattern { kind: PatternKind::List { elems, has_rest }, span: pat.span })
859 } else {
860 Err(Self::semantic_error(pat.span, format!("列表模式 {:?} 与类型 {:?} 不匹配", elems, expr_ty)))
861 }
862 }
863 PatternKind::Wildcard => {
864 self.add_ty(expr_ty.clone());
865 Ok(Pattern { kind: PatternKind::Var { idx: self.add_name(SmolStr::new_static("")), ty: expr_ty }, span: pat.span })
866 }
867 _ => panic!("未知的模式 {:?}", pat),
868 }
869 }
870
871 fn infer_range_type(&self, range: &Expr) -> Type {
872 if let ExprKind::Range { start, stop, .. } = &range.kind {
873 let start_ty = start.get_type();
874 let stop_ty = stop.get_type();
875 if start_ty.is_any() {
876 stop_ty
877 } else if stop_ty.is_any() {
878 start_ty
879 } else {
880 stop_ty
881 }
882 } else {
883 range.get_type()
884 }
885 }
886
887 fn dyn_init(&mut self, expr: Expr, stmts: &mut Vec<Stmt>, items: Vec<(Expr, Expr)>, ty: Type) -> Expr {
888 self.add_name("".into());
889 let temp = self.add_ty(ty);
890 let span = expr.span;
891 stmts.push(Stmt::new(StmtKind::Expr(Expr::new(ExprKind::Binary { left: Box::new(Expr::new(ExprKind::Var(temp), span)), op: BinaryOp::Assign, right: Box::new(expr) }, span), true), span));
892 for (idx, item) in items {
893 let item_span = idx.span.merge(item.span);
894 let left = Expr::new(ExprKind::Binary { left: Box::new(Expr::new(ExprKind::Var(temp), item_span)), op: BinaryOp::Idx, right: Box::new(idx) }, item_span);
895 stmts.push(Stmt::new(StmtKind::Expr(Expr::new(ExprKind::Binary { left: Box::new(left), op: BinaryOp::Assign, right: Box::new(item) }, item_span), false), item_span));
896 }
897 Expr::new(ExprKind::Var(temp), span)
898 }
899
900 fn static_composite_literal(&self, expr: &Expr) -> Result<Option<Dynamic>> {
901 match &expr.kind {
902 ExprKind::List(items) | ExprKind::Tuple(items) => {
903 let mut values = Vec::with_capacity(items.len());
904 for item in items {
905 let Some(value) = self.static_literal_value(item)? else {
906 return Ok(None);
907 };
908 values.push(value);
909 }
910 Ok(Some(Dynamic::list(values)))
911 }
912 ExprKind::Dict(items) => {
913 let mut values = BTreeMap::new();
914 for (key, item) in items {
915 let Some(value) = self.static_literal_value(item)? else {
916 return Ok(None);
917 };
918 values.insert(key.clone(), value);
919 }
920 Ok(Some(Dynamic::map(values)))
921 }
922 _ => Ok(None),
923 }
924 }
925
926 fn static_literal_value(&self, expr: &Expr) -> Result<Option<Dynamic>> {
927 match &expr.kind {
928 ExprKind::Value(value) => Ok(Some(value.clone())),
929 ExprKind::Const(idx) => Ok(self.consts.get(*idx).cloned()),
930 ExprKind::Typed { value, ty } if ty.is_native() => Ok(self.static_literal_value(value)?.map(|value| ty.force(value)).transpose()?),
931 _ => self.static_composite_literal(expr),
932 }
933 }
934
935 fn const_expr_value(&self, expr: &Expr) -> Result<Dynamic> {
936 match &expr.kind {
937 ExprKind::Value(value) => Ok(value.clone()),
938 ExprKind::Const(idx) => self.consts.get(*idx).cloned().ok_or_else(|| Self::semantic_error(expr.span, format!("常量索引 {} 不存在", idx))),
939 ExprKind::Ident(ident) => {
940 let id = self.symbols.get_id(ident).map_err(|_| Self::semantic_error(expr.span, format!("未找到常量 {}", ident)))?;
941 match self.symbols.get_symbol(id).map(|(_, symbol)| symbol) {
942 Ok(Symbol::Const { value, .. }) => Ok(value.clone()),
943 Ok(Symbol::Static { value: Some(value), .. }) => Ok(value.clone()),
944 _ => Err(Self::semantic_error(expr.span, format!("{} 不是可用于 const 的静态值", ident))),
945 }
946 }
947 ExprKind::Typed { value, ty } if ty.is_native() => Ok(ty.force(self.const_expr_value(value)?)?),
948 ExprKind::Typed { value, .. } => self.const_expr_value(value),
949 ExprKind::List(items) | ExprKind::Tuple(items) => {
950 let values = items.iter().map(|item| self.const_expr_value(item)).collect::<Result<Vec<_>>>()?;
951 Ok(Dynamic::list(values))
952 }
953 ExprKind::Dict(items) => {
954 let mut values = BTreeMap::new();
955 for (key, item) in items {
956 values.insert(key.clone(), self.const_expr_value(item)?);
957 }
958 Ok(Dynamic::map(values))
959 }
960 ExprKind::Unary { op, value } => {
961 let value = self.const_expr_value(value)?;
962 match op {
963 parser::UnaryOp::Neg => Ok(-value),
964 parser::UnaryOp::Not => Ok(!value),
965 parser::UnaryOp::Unknow => Err(Self::semantic_error(expr.span, "const 一元表达式无法在编译期求值")),
966 }
967 }
968 ExprKind::Binary { left, op, right } => {
969 let left = Expr::new(ExprKind::Value(self.const_expr_value(left)?), left.span);
970 let right = Expr::new(ExprKind::Value(self.const_expr_value(right)?), right.span);
971 Expr::new(ExprKind::Binary { left: Box::new(left), op: op.clone(), right: Box::new(right) }, expr.span).compact().ok_or_else(|| Self::semantic_error(expr.span, "const 二元表达式无法在编译期求值"))
972 }
973 _ => Err(Self::semantic_error(expr.span, "const 只能使用字面量、已声明常量和静态 composite literal")),
974 }
975 }
976
977 fn eval_stmt_expr(&mut self, stmt: &Stmt, stmts: &mut Vec<Stmt>, cap: &mut Capture, span: Span) -> Result<Expr> {
978 self.compile_stmt(stmt.clone(), stmts, cap)?;
979 let expr_ty = if let Some(stmt) = stmts.last() { if let StmtKind::Expr(expr, _) = &stmt.kind { self.infer_expr(expr)? } else { self.infer_stmt(stmt)? } } else { Type::Any };
980 self.add_name("".into());
981 let temp = self.add_ty(expr_ty.clone());
982 let pat = Pattern { kind: PatternKind::Var { idx: temp, ty: expr_ty }, span };
983 stmts.last_mut().ok_or_else(|| Self::semantic_error(span, "没有生成可求值语句表达式")).and_then(|stmt| stmt.bind_pattern(pat))?;
984 Ok(Expr::new(ExprKind::Var(temp), span))
985 }
986
987 fn eval(&mut self, expr: &Expr, stmts: &mut Vec<Stmt>, cap: &mut Capture) -> Result<Expr> {
988 match &expr.kind {
989 ExprKind::Stmt(stmt) => self.eval_stmt_expr(stmt, stmts, cap, expr.span),
990 ExprKind::Closure { args, body } => {
991 let (mut names, mut tys): (Vec<SmolStr>, Vec<Type>) = args.clone().into_iter().unzip();
992 let cap_vars: Vec<(SmolStr, Type)> = self.names.iter().zip(self.tys.iter()).map(|(n, ty)| (n.clone(), ty.clone())).collect();
993 let mut local_cap = Capture::new(cap_vars);
994 let _ = self.compile_fn(names.as_slice(), &mut tys.clone(), *body.clone(), &mut local_cap)?;
995 for cap_idx in local_cap.vars.iter() {
996 names.push(local_cap.names[*cap_idx].0.clone());
997 tys.push(local_cap.names[*cap_idx].1.clone());
998 }
999 let mut compiled = self.compile_fn(names.as_slice(), &mut tys.clone(), *body.clone(), &mut Capture::default())?;
1000 let (ty, args) = Type::from_args(args.clone());
1001 let body_stmt = if compiled.len() == 1 { compiled.pop().unwrap() } else { Stmt::new(StmtKind::Block(compiled), expr.span) };
1002 let name = SmolStr::from(format!("__closure_{}_{}", expr.span.start, expr.span.end));
1003 let fn_id = self.symbols.add(name, Symbol::Fn { ty, args, generic_params: Vec::new(), cap: local_cap, body: Arc::new(body_stmt), is_pub: false });
1004 Ok(Expr::new(ExprKind::Id(fn_id, None), expr.span))
1005 }
1006 ExprKind::Value(v) => {
1007 if v.is_native() {
1008 Ok(Expr::new(ExprKind::Value(v.clone()), expr.span))
1009 } else {
1010 Ok(Expr::new(ExprKind::Const(self.get_const(v.clone())), expr.span))
1011 }
1012 }
1013 ExprKind::Typed { value, ty } => {
1014 let ty = self.symbols.get_type(ty)?;
1015 if let Type::Struct { fields, .. } = &ty
1016 && let ExprKind::Dict(dict) = &value.kind
1017 {
1018 let mut items = Vec::new();
1019 for field in fields {
1020 if let Some((_, v)) = dict.iter().find(|(name, _)| name == &field.0) {
1021 items.push(self.eval(v, stmts, cap)?);
1022 }
1023 }
1024 Ok(Expr::new(ExprKind::Typed { value: Box::new(Expr::new(ExprKind::List(items), expr.span)), ty }, expr.span))
1025 } else if let Type::Struct { .. } = &ty
1026 && let ExprKind::List(list) = &value.kind
1027 {
1028 let items = list.iter().map(|item| self.eval(item, stmts, cap)).collect::<Result<Vec<_>>>()?;
1029 Ok(Expr::new(ExprKind::Typed { value: Box::new(Expr::new(ExprKind::List(items), expr.span)), ty }, expr.span))
1030 } else if let Type::Array(_, _) = &ty
1031 && let ExprKind::List(list) = &value.kind
1032 {
1033 let items = list.iter().map(|item| self.eval(item, stmts, cap)).collect::<Result<Vec<_>>>()?;
1034 Ok(Expr::new(ExprKind::Typed { value: Box::new(Expr::new(ExprKind::List(items), expr.span)), ty }, expr.span))
1035 } else if value.is_value() {
1036 let value = value.clone().value()?;
1037 if ty.is_str() && value.is_str() {
1038 log::warn!("常量 String 只能作为动态值使用,已忽略 string 类型约束");
1039 Ok(Expr::new(ExprKind::Const(self.get_const(value)), expr.span))
1040 } else {
1041 Ok(Expr::new(ExprKind::Value(ty.force(value)?), expr.span))
1042 }
1043 } else {
1044 Ok(Expr::new(ExprKind::Typed { value: Box::new(self.eval(value, stmts, cap)?), ty }, expr.span))
1045 }
1046 }
1047 ExprKind::Ident(ident) => match self.get_ident(ident, expr.span) {
1048 Ok(id) => Ok(id),
1049 Err(_) => {
1050 if let Some(idx) = cap.get(ident) {
1051 Ok(Expr::new(ExprKind::Capture(idx as u32), expr.span))
1052 } else {
1053 Err(Self::semantic_error(expr.span, format!("未找到标识符 {}", ident)))
1054 }
1055 }
1056 },
1057 ExprKind::Assoc { ty, name } => {
1058 let base_name = match ty {
1059 Type::Ident { name, .. } => name.clone(),
1060 Type::Symbol { id, .. } => self.symbols.get_symbol(*id)?.0.clone(),
1061 _ => return Err(Self::semantic_error(expr.span, format!("关联函数目标必须是类型: {:?}", ty))),
1062 };
1063 let id = self.symbols.get_id(&format!("{}::{}", base_name, name)).map_err(|_| Self::semantic_error(expr.span, format!("未找到关联函数 {}::{}", base_name, name)))?;
1064 let params = match ty {
1065 Type::Ident { params, .. } | Type::Symbol { params, .. } => params.iter().map(|param| self.symbols.get_type(param).unwrap_or_else(|_| param.clone())).collect(),
1066 _ => Vec::new(),
1067 };
1068 Ok(Expr::new(ExprKind::AssocId { id, params }, expr.span))
1069 }
1070 ExprKind::Unary { op, value } => {
1071 let value = Expr::new(ExprKind::Unary { op: op.clone(), value: Box::new(self.eval(value, stmts, cap)?) }, expr.span);
1072 if let Some(v) = value.compact() { Ok(Expr::new(ExprKind::Value(v), expr.span)) } else { Ok(value) }
1073 }
1074 ExprKind::Binary { left, op, right } => {
1075 let left = self.eval(left, stmts, cap)?;
1076 if *op == BinaryOp::Idx {
1077 if let Some(key) = self.get_value(right).and_then(|v| if v.is_str() { Some(v.as_str().to_string()) } else { None }) {
1078 if let Some(field) = self.type_field_access_expr(left.clone(), &key, expr.span, true) {
1079 return Ok(field);
1080 }
1081 return Ok(self.literal_field_access_expr(left, &key, expr.span));
1082 } else if let Ok(ident) = right.ident() {
1083 if let Ok(found) = self.get_ident(ident, right.span) {
1084 return Ok(if let Some(id) = found.id() {
1085 Expr::new(ExprKind::Id(id, Some(Box::new(left))), expr.span)
1086 } else {
1087 Expr::new(ExprKind::Binary { left: Box::new(left), op: BinaryOp::Idx, right: Box::new(found) }, expr.span)
1088 });
1089 }
1090 if let Ok(ty) = self.infer_expr(&left)
1091 && let Ok((idx, ty)) = self.get_field(&ty, ident)
1092 {
1093 return Ok(if let Type::Symbol { id, .. } = ty {
1094 Expr::new(ExprKind::Id(id, Some(Box::new(left))), expr.span)
1095 } else if ty.is_bool() && idx == usize::MAX {
1096 Expr::new(ExprKind::Value(Dynamic::Bool(false)), expr.span)
1097 } else if ty.is_any() && idx == usize::MAX {
1098 let right = Expr::new(ExprKind::Const(self.get_const(Dynamic::String(ident.into()))), expr.span);
1099 Expr::new(ExprKind::Binary { left: Box::new(left), op: BinaryOp::Idx, right: Box::new(right) }, expr.span)
1100 } else {
1101 Expr::new(ExprKind::Binary { left: Box::new(left), op: BinaryOp::Idx, right: Box::new(Expr::new(ExprKind::Value(Dynamic::U32(idx as u32)), expr.span)) }, expr.span)
1102 });
1103 } else {
1104 let right = Expr::new(ExprKind::Const(self.get_const(Dynamic::String(ident.into()))), expr.span);
1105 return Ok(Expr::new(ExprKind::Binary { left: Box::new(left), op: BinaryOp::Idx, right: Box::new(right) }, expr.span));
1106 }
1107 }
1108 }
1109 let right = Box::new(self.eval(right, stmts, cap)?);
1110 let value = Expr::new(ExprKind::Binary { left: Box::new(left), op: op.clone(), right }, expr.span);
1111 if let Some(v) = value.compact() { Ok(Expr::new(ExprKind::Value(v), expr.span)) } else { Ok(value) }
1112 }
1113 ExprKind::Call { obj, params } => {
1114 let params: Vec<Expr> = params.iter().map(|p| self.eval(p, stmts, cap)).collect::<Result<Vec<_>>>()?;
1115 let obj_result = if let Some(method_obj) = self.method_call_obj_expr(obj, stmts, cap)? { Ok(method_obj) } else { self.eval(obj, stmts, cap) };
1116 match obj_result {
1117 Ok(obj) if obj.is_value() && params.is_empty() => Ok(obj),
1118 Ok(obj) => Ok(Expr::new(ExprKind::Call { obj: Box::new(obj), params }, expr.span)),
1119 Err(e) => {
1120 if let ExprKind::Ident(ident) = &obj.kind {
1121 let fn_id = if ident.contains("::") { self.symbols.add_global(ident.clone(), Symbol::Null) } else { self.symbols.add(ident.clone(), Symbol::Null) };
1122 Ok(Expr::new(ExprKind::Call { obj: Box::new(Expr::new(ExprKind::Id(fn_id, None), obj.span)), params }, expr.span))
1123 } else {
1124 Err(e)
1125 }
1126 }
1127 }
1128 }
1129 ExprKind::Range { start, stop, inclusive } => {
1130 let start = Box::new(self.eval(start, stmts, cap)?);
1131 let stop = Box::new(self.eval(stop, stmts, cap)?);
1132 Ok(Expr::new(ExprKind::Range { start, stop, inclusive: *inclusive }, expr.span))
1133 }
1134 ExprKind::List(list) | ExprKind::Tuple(list) => {
1135 if let Some(value) = self.static_composite_literal(expr)? {
1136 let idx = self.get_const(value);
1137 return Ok(Expr::new(ExprKind::Const(idx), expr.span));
1138 }
1139 let mut v = Vec::new();
1140 let mut items = Vec::new();
1141 for (idx, item) in list.iter().enumerate() {
1142 if item.is_value() {
1143 v.push(item.clone().value().unwrap());
1144 } else {
1145 items.push((Expr::new(ExprKind::Value((idx as u32).into()), item.span), self.eval(item, stmts, cap)?));
1146 v.push(Dynamic::Null);
1147 }
1148 }
1149 let list = Expr::new(ExprKind::Const(self.get_const(Dynamic::list(v))), expr.span);
1150 Ok(self.dyn_init(list, stmts, items, Type::Any))
1151 }
1152 ExprKind::Repeat { value, len } => {
1153 let len = self.symbols.get_type(len)?;
1154 let Type::ConstInt(len) = len else {
1155 return Err(Self::semantic_error(expr.span, format!("重复数组长度必须是编译期整数: {:?}", len)));
1156 };
1157 if len < 0 {
1158 return Err(Self::semantic_error(expr.span, "重复数组长度不能为负数"));
1159 }
1160 Ok(Expr::new(ExprKind::Repeat { value: Box::new(self.eval(value, stmts, cap)?), len: Type::ConstInt(len) }, expr.span))
1161 }
1162 ExprKind::Dict(dict) => {
1163 if let Some(value) = self.static_composite_literal(expr)? {
1164 let idx = self.get_const(value);
1165 return Ok(Expr::new(ExprKind::Const(idx), expr.span));
1166 }
1167 let mut dyn_kv = Vec::new();
1168 let mut m = BTreeMap::new();
1169 for (k, v) in dict {
1170 if v.is_value() {
1171 m.insert(k.clone(), v.clone().value()?);
1172 } else {
1173 let key = Expr::new(ExprKind::Const(self.get_const(Dynamic::String(k.clone()))), v.span);
1174 dyn_kv.push((key, self.eval(v, stmts, cap)?));
1175 m.insert(k.clone(), Dynamic::Null);
1176 }
1177 }
1178 let dict = Expr::new(ExprKind::Const(self.get_const(Dynamic::map(m))), expr.span);
1179 Ok(self.dyn_init(dict, stmts, dyn_kv, Type::Any))
1180 }
1181 ExprKind::Id(_, _) | ExprKind::AssocId { .. } => Ok(expr.clone()),
1182 _ => Ok(expr.clone()),
1183 }
1184 }
1185
1186 fn get_stmt(&mut self, stmt: Stmt, cap: &mut Capture) -> Result<Stmt> {
1187 let span = stmt.span;
1188 let mut stmts = Vec::new();
1189 self.compile_stmt(stmt, &mut stmts, cap)?;
1190 Ok(Stmt::new(StmtKind::Block(stmts), span))
1191 }
1192
1193 fn compile_stmt(&mut self, stmt: Stmt, compiled: &mut Vec<Stmt>, cap: &mut Capture) -> Result<()> {
1194 let stmt_span = stmt.span;
1195 match stmt.kind {
1196 StmtKind::Let { mut pat, value } => {
1197 let value = *value;
1198 let string_literal_constraint = matches!(
1199 (&pat.kind, &value.kind),
1200 (
1201 PatternKind::Ident { ty: Type::Str, .. },
1202 StmtKind::Expr(
1203 Expr {
1204 kind: ExprKind::Value(value),
1205 ..
1206 },
1207 _
1208 )
1209 ) if value.is_str()
1210 );
1211 if string_literal_constraint {
1212 log::warn!("常量 String 只能作为动态值使用,已忽略 string 类型约束");
1213 if let PatternKind::Ident { ty, .. } = &mut pat.kind {
1214 *ty = Type::Any;
1215 }
1216 }
1217 let annotated_ty = if let PatternKind::Ident { ty, .. } = &pat.kind {
1218 let ty = self.symbols.get_type(ty)?;
1219 if ty.is_any() { None } else { Some(ty) }
1220 } else {
1221 None
1222 };
1223 if let Some(ty) = annotated_ty {
1224 if let StmtKind::Expr(expr, close) = value.kind {
1225 let span = expr.span;
1226 let typed = Expr::new(ExprKind::Typed { value: Box::new(expr), ty }, span);
1227 self.compile_stmt(Stmt::new(StmtKind::Expr(typed, close), value.span), compiled, cap)?;
1228 } else {
1229 self.compile_stmt(value, compiled, cap)?;
1230 }
1231 } else {
1232 self.compile_stmt(value, compiled, cap)?;
1233 }
1234 let expr_ty = if let Some(stmt) = compiled.last() { if let StmtKind::Expr(expr, _) = &stmt.kind { self.infer_expr(expr)? } else { self.infer_stmt(stmt)? } } else { Type::Any };
1235 let pat = self.pat_to_var(pat, expr_ty)?;
1236 compiled.last_mut().ok_or_else(|| Self::semantic_error(stmt_span, "没有生成可绑定模式的编译语句")).and_then(|stmt| stmt.bind_pattern(pat))?;
1237 }
1238 StmtKind::Expr(expr, close) => {
1239 let e = self.eval(&expr, compiled, cap)?;
1240 compiled.push(Stmt::new(StmtKind::Expr(e, close), stmt_span));
1241 }
1242 StmtKind::Block(stmts) => {
1243 let mut block = Vec::new();
1244 for stmt in stmts {
1245 self.compile_stmt(stmt, &mut block, cap)?;
1246 }
1247 compiled.push(Stmt::new(StmtKind::Block(block), stmt_span));
1248 }
1249 StmtKind::Fn { name, generic_params, args, body, is_pub } => {
1250 let (ty, args) = Type::from_args(args);
1251 if let Type::Fn { mut tys, ret } = ty {
1252 let mut fn_cap = Capture::default();
1253 let compiled_body = self.compile_fn(&args, &mut tys, *body, &mut fn_cap)?;
1254 self.symbols.add(name, Symbol::Fn { ty: Type::Fn { tys, ret }, args, generic_params, cap: fn_cap, body: Arc::new(Stmt::new(StmtKind::Block(compiled_body), stmt_span)), is_pub });
1255 } else {
1256 panic!("nested functions are not supported here")
1257 }
1258 }
1259 StmtKind::Return(expr) => {
1260 let expr = expr.and_then(|e| self.eval(&e, compiled, cap).ok());
1261 compiled.push(Stmt::new(StmtKind::Return(expr), stmt_span));
1262 }
1263 StmtKind::If { cond, then_body, else_body } => {
1264 let cond = self.eval(&cond, compiled, cap)?;
1265 if let Some(cond_value) = cond.compact()
1266 && let Some(cond_bool) = cond_value.as_bool()
1267 {
1268 if cond_bool {
1269 self.compile_stmt(*then_body, compiled, cap)?;
1270 } else if let Some(body) = else_body {
1271 self.compile_stmt(*body, compiled, cap)?;
1272 }
1273 } else {
1274 let then_body = Box::new(self.get_stmt(*then_body, cap)?);
1275 let else_body = if let Some(body) = else_body { Some(Box::new(self.get_stmt(*body, cap)?)) } else { None };
1276 compiled.push(Stmt::new(StmtKind::If { cond, then_body, else_body }, stmt_span));
1277 }
1278 }
1279 StmtKind::Loop(body) => {
1280 compiled.push(Stmt::new(StmtKind::Loop(Box::new(self.get_stmt(*body, cap)?)), stmt_span));
1281 }
1282 StmtKind::While { cond, body } => {
1283 let cond = self.eval(&cond, compiled, cap)?;
1284 compiled.push(Stmt::new(StmtKind::While { cond, body: Box::new(self.get_stmt(*body, cap)?) }, stmt_span));
1285 }
1286 StmtKind::For { pat, range, body } => {
1287 let range = self.eval(&range, compiled, cap)?;
1288 let range_ty = self.infer_range_type(&range);
1289 let pat = self.pat_to_var(pat, range_ty)?;
1290 compiled.push(Stmt::new(StmtKind::For { pat, range, body: Box::new(self.get_stmt(*body, cap)?) }, stmt_span));
1291 }
1292 stmt_kind => {
1293 compiled.push(Stmt::new(stmt_kind, stmt_span));
1294 }
1295 }
1296 Ok(())
1297 }
1298}