diff options
Diffstat (limited to 'src/str_table.adb')
| -rw-r--r-- | src/str_table.adb | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/str_table.adb b/src/str_table.adb index 947c98792..32a44b58b 100644 --- a/src/str_table.adb +++ b/src/str_table.adb @@ -30,8 +30,8 @@ package body Str_Table is Nul : constant Character := Character'Val (0); In_String : Boolean := False; - function Start return String_Id - is + + function Start return String_Id is begin pragma Assert (In_String = False); In_String := True; |