sphinx-lang 0.8.6

use core::fmt;
use std::error::Error;

use crate::utils;
use crate::debug::{DebugSymbol, SourceError};


pub type CompileResult<T> = Result<T, CompileError>;

#[derive(Debug)]
pub struct CompileError {
    message: String,
    symbol: Option<DebugSymbol>,
    cause: Option<Box<dyn Error>>,
}

impl CompileError {
    pub fn new(message: &str) -> Self {
        Self { message: message.to_string(), symbol: None, cause: None }
    }
    
    pub fn with_symbol(mut self, symbol: DebugSymbol) -> Self {
        self.symbol.get_or_insert(symbol); self 
    }
    
    pub fn caused_by(mut self, error: impl Error + 'static) -> Self {
        self.cause.replace(Box::new(error)); self
    }
}

impl<S> From<S> for CompileError where S: AsRef<str> {
    fn from(message: S) -> Self {
        Self::new(message.as_ref())
    }
}

impl Error for CompileError {
    fn source(&self) -> Option<&(dyn Error + 'static)> {
        self.cause.as_ref().map(|o| o.as_ref())
    }
}

impl SourceError for CompileError {
    fn debug_symbol(&self) -> Option<&DebugSymbol> { self.symbol.as_ref() }
}

impl fmt::Display for CompileError {
    fn fmt(&self, fmt: &mut fmt::Formatter<'_>) -> Result<(), fmt::Error> {
        
        // let message = match self.kind() {
        //     ErrorKind::CantAssignImmutable => "can't assign to immutable local variable",
        //     ErrorKind::CantAssignNonLocal => "can't assign to a non-local variable without the \"nonlocal\" keyword",
        //     ErrorKind::TupleLenMismatch => "can't assign tuples of different lengths",
        //     ErrorKind::CantUpdateAssignTuple => "can't use update-assigment when assigning to a tuple",
            
        //     ErrorKind::CantResolveBreak(label) => 
        //         if label.is_some() { "can't find loop or block with matching label for \"break\"" }
        //         else { "\"break\" outside of loop or block" },
            
        //     ErrorKind::CantResolveContinue(label) => 
        //         if label.is_some() { "can't find loop with matching label for \"continue;\"" }
        //         else { "\"continue\" outside of loop" },
            
        //     ErrorKind::InvalidBreakWithValue => "\"break\" with value outside of block expression",
        //     ErrorKind::InvalidLValueModifier => "assignment modifier is not allowed here",
        //     ErrorKind::InternalLimit(message) => message,
        // };
        
        let message =
            if self.message.is_empty() { None }
            else { Some(self.message.as_str()) };
        
        utils::format_error(fmt, "Compile error", message, self.source())
    }
}