1 files changed, 3 insertions, 0 deletions
diff --git a/scan.adb b/scan.adb
index 67379c9fd..6b191025b 100644
--- a/scan.adb
+++ b/scan.adb
@@ -1425,6 +1425,9 @@ package body Scan is
                      Current_Token := Tok_Match_Greater;
                      Pos := Pos + 2;
                   end if;
+               elsif Source (Pos + 1) = '?' then
+                  Current_Token := Tok_Condition;
+                  Pos := Pos + 2;
                elsif Source (Pos + 1) = '=' then
                   Current_Token := Tok_Match_Equal;
                   Pos := Pos + 2;