diff --git a/Scanner.pas b/Scanner.pas
index c88b71d..076d6b7 100644
--- a/Scanner.pas
+++ b/Scanner.pas
@@ -4710,6 +4710,9 @@ var
       token.lval := result;
       end; {else if}
 
+   if saveNumber then                   {TODO: support token merging}
+      token.numString := @'?';
+
    charStrPrefix := prefix_none;        {no prefix for next char/str (so far)}
    end; {CharConstant}