--- asis-gpl-2017-src/asis/asis-extensions-strings.adb
+++ asis-gpl-2017-src-new/asis/asis-extensions-strings.adb
@@ -62,8 +62,8 @@
      Table_Index_Type     => Integer,
      Table_Low_Bound      => 1,
      Table_Initial        => 10000,
-     Table_Increment      => 1000,
-     Table_Name           => "character container");
+     Table_Increment      => 1000);
+--     Table_Name           => "character container");
 
    Table : Chars.Table_Ptr renames Chars.Table;