Fix hang when printing dot graphs from the CLI

cli/src/parse.rs

@@ -104,6 +104,8 @@ pub fn parse_file_at_path(parser: &mut Parser, opts: ParseFileOptions) -> Result
         _ => parser.parse(&source_code, None),
     };
 
+    parser.stop_printing_dot_graphs();
+
     let stdout = io::stdout();
     let mut stdout = stdout.lock();
 

cli/src/test.rs

@@ -90,6 +90,8 @@ pub fn run_tests_at_path(
         &mut corrected_entries,
     )?;
 
+    parser.stop_printing_dot_graphs();
+
     if failures.len() > 0 {
         println!("");
 
@@ -719,7 +721,7 @@ code
 ---
 
 ; Line start comment
-(a 
+(a
 ; ignore this
     (b)
     ; also ignore this