bug#66165: 30.0.50; Issue with process-get as a place

[Michael Heerdegen]

Augusto Stoffel <arstoffel@gmail.com> writes:

> In some buffer with a process, I get this result:
>
>   (let ((proc (get-buffer-process (current-buffer))))
>     (process-put proc 'test 0)
>     (cl-incf (process-get proc 'test))
> )
>
>   => (test 1)

> This happens because process-put doesn't follow the convention of
> returning VALUE.  If it's too late to change that,

I guess it is.

> perhaps process-get needs a special implementation as a generalized
> variable.

AFAIK we can use the optional arg of `gv-define-simple-setter' in
this case:

  (gv-define-simple-setter process-get process-put 'fix)

Does that work as expected?


Michael.