@@ -501,9 +501,9 @@ Use PYVALUE* if you want to refer to names containing full-stops."
501
501
(string slot-name)
502
502
(symbol (pythonize-symbol slot-name))))
503
503
(return-value (pyforeign-funcall " PyObject_GetAttrString"
504
- :pointer object-pointer
505
- :string slot-name
506
- :pointer )))
504
+ :pointer object-pointer
505
+ :string slot-name
506
+ :pointer )))
507
507
(ensure-non-null-pointer return-value
508
508
:format-control
509
509
" ~A~% in python does not have the attribute ~A "
@@ -561,7 +561,7 @@ Use PYVALUE* if you want to refer to names containing full-stops."
561
561
(when previous-value
562
562
(setf (%pyslot-value previous-value previous-name) new-value)))))
563
563
564
- (defun pyvalue (python-value -or-variable)
564
+ (defun pyvalue (python-name -or-variable)
565
565
" Get the value of a python-name-or-variable.
566
566
Example:
567
567
@@ -573,13 +573,13 @@ Example:
573
573
\" /home/user/miniconda3/lib/python3.10/lib-dynload\"
574
574
\" /home/user/miniconda3/lib/python3.10/site-packages\" )
575
575
"
576
- (declare (type (or python-object string ) python-value -or-variable))
576
+ (declare (type (or python-object string ) python-name -or-variable))
577
577
(python-start-if-not-alive)
578
578
(if *in-with-remote-objects-p*
579
- (pyvalue* python-value -or-variable)
580
- (with-pygc (lispify (pyvalue* python-value -or-variable)))))
579
+ (pyvalue* python-name -or-variable)
580
+ (with-pygc (lispify (pyvalue* python-name -or-variable)))))
581
581
582
- (defun (setf pyvalue ) (new-value python-value -or-variable)
582
+ (defun (setf pyvalue ) (new-value python-name -or-variable)
583
583
" Set the value of a python-name-or-variable.
584
584
Example:
585
585
@@ -596,10 +596,10 @@ Example:
596
596
\" /home/user/miniconda3/lib/python3.10/lib-dynload\"
597
597
\" /home/user/miniconda3/lib/python3.10/site-packages\" )
598
598
"
599
- (declare (type string python-value -or-variable))
599
+ (declare (type string python-name -or-variable))
600
600
(python-start-if-not-alive)
601
601
(with-pygc
602
- (setf (pyvalue* python-value -or-variable)
602
+ (setf (pyvalue* python-name -or-variable)
603
603
; ; UNTRACK because we do not want to lose reference to this object!
604
604
(pyuntrack (%pythonize new-value)))
605
605
new-value))
0 commit comments