More parsing debugging changes

schala-lang/language/src/debugging.rs

@@ -0,0 +1,10 @@
+use crate::ast::*;
+
+impl AST {
+  pub fn compact_debug(&self) -> String {
+    format!("{:?}", self)
+  }
+  pub fn expanded_debug(&self) -> String {
+    format!("{:#?}", self)
+  }
+}

schala-lang/language/src/lib.rs

@@ -26,6 +26,7 @@ macro_rules! bx {
 mod util;
 #[macro_use]
 mod typechecking;
+mod debugging;
 
 mod tokenizing;
 mod ast;

schala-lang/language/src/schala.rs

@@ -104,11 +104,11 @@ fn parsing(input: Vec<tokenizing::Token>, handle: &mut Schala, comp: Option<&mut
     let debug_format = comp.parsing.as_ref().unwrap_or(&CompactAST);
     let debug_info = match debug_format {
       CompactAST => match ast{
-        Ok(ref ast) => format!("{:?}", ast),
+        Ok(ref ast) => ast.compact_debug(),
         Err(_) => "Error - see output".to_string(),
       },
       ExpandedAST => match ast{
-        Ok(ref ast) => format!("{:#?}", ast),
+        Ok(ref ast) => ast.expanded_debug(),
         Err(_) => "Error - see output".to_string(),
       },
       Trace => parser.format_parse_trace(),