Drop PGET and revert read access to Lisp_Objects slots of Lisp_Process.

* process.h (PGET): Remove.
(struct Lisp_Process): Do not use INTERNAL_FIELD.
* gnutls.c, print.c, process.c, sysdep.c, w32.c, xdisp.c: Adjust users.

1 files changed, 2 insertions, 2 deletions

diff --git a/src/print.c b/src/print.c
index ffa8a9b1b48..4a8c3fda319 100644
--- a/src/print.c
+++ b/src/print.c
@@ -1697,11 +1697,11 @@ print_object (Lisp_Object obj, register Lisp_Object printcharfun, int escapeflag
           if (escapeflag)
             {
               strout ("#<process ", -1, -1, printcharfun);
-              print_string (PGET (XPROCESS (obj), name), printcharfun);
+              print_string (XPROCESS (obj)->name, printcharfun);
               PRINTCHAR ('>');
             }
           else
-            print_string (PGET (XPROCESS (obj), name), printcharfun);
+            print_string (XPROCESS (obj)->name, printcharfun);
         }
       else if (BOOL_VECTOR_P (obj))
         {