2011-01-10 Michael Snyder <msnyder@vmware.com>

	* nto-procfs.c: Comment cleanup, mostly periods and spaces.
	* nto-tdep.c: Ditto.
	* nto-tdep.h: Ditto.
	* objc-exp.y: Ditto.
	* objc-lang.c: Ditto.
	* objfiles.c: Ditto.
	* objfiles.h: Ditto.
	* observer.c: Ditto.
	* opencl-lang.c: Ditto.
	* osabi.c: Ditto.
	* parse.c: Ditto.
	* parser-defs.h: Ditto.
	* p-exp.y: Ditto.
	* p-lang.c: Ditto.
	* posix-hdep.c: Ditto.
	* ppcbug-rom.c: Ditto.
	* ppc-linux-nat.c: Ditto.
	* ppc-linux-tdep.c: Ditto.
	* ppc-linux-tdep.h: Ditto.
	* ppcnbsd-tdep.c: Ditto.
	* ppcobsd-tdep.c: Ditto.
	* ppcobsd-tdep.h: Ditto.
	* ppc-sysv-tdep.c: Ditto.
	* ppc-tdep.h: Ditto.
	* printcmd.c: Ditto.
	* proc-abi.c: Ditto.
	* proc-flags.c: Ditto.
	* procfs.c: Ditto.
	* proc-utils.h: Ditto.
	* progspace.h: Ditto.
	* prologue-value.c: Ditto.
	* prologue-value.h: Ditto.
	* psympriv.h: Ditto.
	* psymtab.c: Ditto.
	* p-typeprint.c: Ditto.
	* p-valprint.c: Ditto.
	* ravenscar-sparc-thread.c: Ditto.
	* ravenscar-thread.c: Ditto.
	* ravenscar-thread.h: Ditto.
	* record.c: Ditto.
	* regcache.c: Ditto.
	* regcache.h: Ditto.
	* remote.c: Ditto.
	* remote-fileio.c: Ditto.
	* remote-fileio.h: Ditto.
	* remote.h: Ditto.
	* remote-m32r-sdi.c: Ditto.
	* remote-mips.c: Ditto.
	* remote-sim.c: Ditto.
	* rs6000-aix-tdep.c: Ditto.
	* rs6000-nat.c: Ditto.
	* rs6000-tdep.c: Ditto.

1 files changed, 17 insertions, 17 deletions

diff --git a/gdb/p-typeprint.c b/gdb/p-typeprint.c
index cee9c81cf83..54a761d464a 100644
--- a/gdb/p-typeprint.c
+++ b/gdb/p-typeprint.c
@@ -83,7 +83,7 @@ pascal_print_type (struct type *type, const char *varstring,
 
   pascal_type_print_base (type, stream, show, level);
   /* For demangled function names, we have the arglist as part of the name,
-     so don't print an additional pair of ()'s */
+     so don't print an additional pair of ()'s.  */
 
   demangled_args = varstring ? strchr (varstring, '(') != NULL : 0;
   pascal_type_print_varspec_suffix (type, stream, show, 0, demangled_args);
@@ -107,7 +107,7 @@ pascal_print_typedef (struct type *type, struct symbol *new_symbol,
 
 /* If TYPE is a derived type, then print out derivation information.
    Print only the actual base classes of this type, not the base classes
-   of the base classes.  I.E.  for the derivation hierarchy:
+   of the base classes.  I.e. for the derivation hierarchy:
 
    class A { int a; };
    class B : public A {int b; };
@@ -127,7 +127,7 @@ pascal_print_typedef (struct type *type, struct symbol *new_symbol,
    }
 
    In general, gdb should try to print the types as closely as possible to
-   the form that they appear in the source code. */
+   the form that they appear in the source code.  */
 
 static void
 pascal_type_print_derivation_info (struct ui_file *stream, struct type *type)
@@ -169,7 +169,7 @@ pascal_type_print_method_args (char *physname, char *methodname,
   if (physname && (*physname != 0))
     {
       fputs_filtered (" (", stream);
-      /* we must demangle this */
+      /* We must demangle this.  */
       while (isdigit (physname[0]))
 	{
 	  int len = 0;
@@ -222,8 +222,8 @@ pascal_type_print_varspec_prefix (struct type *type, struct ui_file *stream,
     case TYPE_CODE_PTR:
       fprintf_filtered (stream, "^");
       pascal_type_print_varspec_prefix (TYPE_TARGET_TYPE (type), stream, 0, 1);
-      break;			/* pointer should be handled normally
-				   in pascal */
+      break;			/* Pointer should be handled normally
+				   in pascal.  */
 
     case TYPE_CODE_METHOD:
       if (passed_a_ptr)
@@ -319,7 +319,7 @@ pascal_print_func_args (struct type *type, struct ui_file *stream)
 	  fputs_filtered (", ", stream);
 	  wrap_here ("    ");
 	}
-      /*  can we find if it is a var parameter ??
+      /*  Can we find if it is a var parameter ??
          if ( TYPE_FIELD(type, i) == )
          {
          fprintf_filtered (stream, "var ");
@@ -503,7 +503,7 @@ pascal_type_print_base (struct type *type, struct ui_file *stream, int show,
     case TYPE_CODE_METHOD:
       /*
          pascal_type_print_base (TYPE_TARGET_TYPE (type), stream, show, level);
-         only after args !! */
+         only after args !!  */
       break;
     case TYPE_CODE_STRUCT:
       if (TYPE_TAG_NAME (type) != NULL)
@@ -552,7 +552,7 @@ pascal_type_print_base (struct type *type, struct ui_file *stream, int show,
 
 	  /* Start off with no specific section type, so we can print
 	     one for the first field we find, and use that section type
-	     thereafter until we find another type. */
+	     thereafter until we find another type.  */
 
 	  section_type = s_none;
 
@@ -569,7 +569,7 @@ pascal_type_print_base (struct type *type, struct ui_file *stream, int show,
 		continue;
 
 	      /* If this is a pascal object or class we can print the
-	         various section labels. */
+	         various section labels.  */
 
 	      if (HAVE_CPLUS_STRUCT (type))
 		{
@@ -620,12 +620,12 @@ pascal_type_print_base (struct type *type, struct ui_file *stream, int show,
 	      fprintf_filtered (stream, ";\n");
 	    }
 
-	  /* If there are both fields and methods, put a space between. */
+	  /* If there are both fields and methods, put a space between.  */
 	  len = TYPE_NFN_FIELDS (type);
 	  if (len && section_type != s_none)
 	    fprintf_filtered (stream, "\n");
 
-	  /* Pbject pascal: print out the methods */
+	  /* Object pascal: print out the methods.  */
 
 	  for (i = 0; i < len; i++)
 	    {
@@ -635,7 +635,7 @@ pascal_type_print_base (struct type *type, struct ui_file *stream, int show,
 
 	      /* this is GNU C++ specific
 	         how can we know constructor/destructor?
-	         It might work for GNU pascal */
+	         It might work for GNU pascal.  */
 	      for (j = 0; j < len2; j++)
 		{
 		  char *physname = TYPE_FN_FIELD_PHYSNAME (f, j);
@@ -699,7 +699,7 @@ pascal_type_print_base (struct type *type, struct ui_file *stream, int show,
 		    {
 		      fprintf_filtered (stream, "procedure ");
 		    }
-		  /* this does not work, no idea why !! */
+		  /* This does not work, no idea why !!  */
 
 		  pascal_type_print_method_args (physname,
 						 method_name,
@@ -731,7 +731,7 @@ pascal_type_print_base (struct type *type, struct ui_file *stream, int show,
 	    fputs_filtered (" ", stream);
 	}
       /* enum is just defined by
-         type enume_name = (enum_member1,enum_member2,...) */
+         type enume_name = (enum_member1,enum_member2,...)  */
       fprintf_filtered (stream, " = ");
       wrap_here ("    ");
       if (show < 0)
@@ -776,7 +776,7 @@ pascal_type_print_base (struct type *type, struct ui_file *stream, int show,
       fprintf_filtered (stream, "%s", TYPE_ERROR_NAME (type));
       break;
 
-      /* this probably does not work for enums */
+      /* this probably does not work for enums.  */
     case TYPE_CODE_RANGE:
       {
 	struct type *target = TYPE_TARGET_TYPE (type);
@@ -805,7 +805,7 @@ pascal_type_print_base (struct type *type, struct ui_file *stream, int show,
       /* Handle types not explicitly handled by the other cases,
          such as fundamental types.  For these, just print whatever
          the type name is, as recorded in the type itself.  If there
-         is no type name, then complain. */
+         is no type name, then complain.  */
       if (TYPE_NAME (type) != NULL)
 	{
 	  fputs_filtered (TYPE_NAME (type), stream);