Procházet zdrojové kódy

guard against `null_pos` in `is_display_file`

Simon Krajewski před 9 roky
rodič
revize
e971ea13b8
1 změnil soubory, kde provedl 1 přidání a 1 odebrání
  1. 1 1
      src/display/display.ml

+ 1 - 1
src/display/display.ml

@@ -28,7 +28,7 @@ exception DisplayFields of (string * t * display_field_kind option * documentati
 exception DisplayToplevel of identifier_type list
 
 let is_display_file file =
-	Common.unique_full_path file = (!Parser.resume_display).pfile
+	file <> "?" && Common.unique_full_path file = (!Parser.resume_display).pfile
 
 let encloses_position p_target p =
 	p.pmin <= p_target.pmin && p.pmax >= p_target.pmax