* moved parsing interface/implementation to -vu

compiler/errore.msg

@@ -627,10 +627,10 @@ parser_m_macro_set_to=M_Macro $1 set to $2
 parser_i_compiling=I_Compiling $1
 % When you turn on information messages (\var{-vi}), the compiler tells you
 % what units it is recompiling.
-parser_i_reading_interface=I_Parsing interface of unit $1
+parser_u_parsing_interface=U_Parsing interface of unit $1
 % This tells you that the reading of the interface
 % of the current unit starts
-parser_i_parsing_implementation=I_Parsing implementation of $1
+parser_u_parsing_implementation=U_Parsing implementation of $1
 % This tells you that the code reading of the implementation
 % of the current unit, library or program starts
 parser_d_compiling_second_time=D_Compiling $1 for the second time
@@ -772,6 +772,8 @@ parser_e_cant_use_inittable_here=E_Data types which requires initialization/fina
 % code which is implicitly generated by the compiler. Such data types
 % can't be used in the variant part of a record.
 parser_e_resourcestring_only_sg=E_Resourcestrings can be only static or global
+% Resourcestring can not be declared local, only global or using the static
+% directive.
 parser_e_exit_with_argument_not__possible=E_Exit with argument can't be used here
 % an exit statement with an argument for the return value can't be used here, this
 % can happen e.g. in \var{try..except} or \var{try..finally} blocks

compiler/msgidx.inc

@@ -160,8 +160,8 @@ type tmsgconst=(
   parser_m_macro_undefined,
   parser_m_macro_set_to,
   parser_i_compiling,
-  parser_i_reading_interface,
-  parser_i_parsing_implementation,
+  parser_u_parsing_interface,
+  parser_u_parsing_implementation,
   parser_d_compiling_second_time,
   parser_e_no_paras_allowed,
   parser_e_no_property_found_to_override,

compiler/msgtxt.inc

@@ -169,8 +169,8 @@ const msgtxt : array[0..000100,1..240] of char=(
   'M_Macro undefined: $1'#000+
   'M_Macro $','1 set to $2'#000+
   'I_Compiling $1'#000+
-  'I_Parsing interface of unit $1'#000+
-  'I_Parsing implementation of $1'#000+
+  'U_Parsing interface of unit $1'#000+
+  'U_Parsing implementation of $1'#000+
   'D_Compiling $1 for the second time'#000+
   'E_Array properties aren'#039't allowed at this point'#000+
   'E_No property found to override'#000+

compiler/pmodules.pas

@@ -1019,7 +1019,7 @@ unit pmodules;
          numberunits;
 
          { ... parse the declarations }
-         Message1(parser_i_reading_interface,current_module^.modulename^);
+         Message1(parser_u_parsing_interface,current_module^.modulename^);
          read_interface_declarations;
 
          { leave when we got an error }
@@ -1095,7 +1095,8 @@ unit pmodules;
          allow_special:=false;
 {$endif Splitheap}
 
-         Message1(parser_i_parsing_implementation,current_module^.modulename^);
+         Message1(parser_u_parsing_implementation,current_module^.modulename^);
+
          { Generate a procsym }
          gen_main_procsym(current_module^.modulename^+'_init',potype_unitinit,st);
 
@@ -1350,7 +1351,7 @@ unit pmodules;
          { the elements of enumeration types are inserted       }
          constsymtable:=st;
 
-         Message1(parser_i_parsing_implementation,current_module^.mainsource^);
+         Message1(parser_u_parsing_implementation,current_module^.mainsource^);
          { Generate a procsym for main }
          gen_main_procsym('main',potype_proginit,st);
 
@@ -1456,7 +1457,10 @@ unit pmodules;
 end.
 {
   $Log$
-  Revision 1.151  1999-08-31 15:51:10  pierre
+  Revision 1.152  1999-09-01 22:18:42  peter
+    * moved parsing interface/implementation to -vu
+
+  Revision 1.151  1999/08/31 15:51:10  pierre
    * in_second_compile cleaned up, in_compile and in_second_load added
 
   Revision 1.150  1999/08/30 16:21:40  pierre