geekinney/etaf
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

docs: clear core checkdoc warnings

Browse Source
This commit is contained in:
Kinneyzhang 2026-08-28 01:27:47 +08:00
parent d63cf1a813
commit 7e5f55c286
3 changed files with 15 additions and 8 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
etaf-context.el
View File

@ -177,7 +177,8 @@ also accepted and remains tracked by the current render effect."
validated)))) validated))))
(defun etaf--theme-source (&optional default) (defun etaf--theme-source (&optional default)
"Return the inherited Theme source without reading its reactive value." "Return the inherited Theme source, using DEFAULT when none is provided.
This does not read the source's reactive value."
(etaf-inject 'theme default)) (etaf-inject 'theme default))
(defun etaf--theme-source-value (source &optional default tracked-p) (defun etaf--theme-source-value (source &optional default tracked-p)

8
etaf-renderer.el
View File

@ -78,7 +78,8 @@
(string-prefix-p "on-" (substring (symbol-name property) 1)))) (string-prefix-p "on-" (substring (symbol-name property) 1))))
(defun etaf--generated-host-ref (props path &optional site-token) (defun etaf--generated-host-ref (props path &optional site-token)
"Return the explicit or generated opaque Host reference." "Return PROPS' explicit Host reference or one generated for PATH.
SITE-TOKEN replaces PATH as the generated call-site identity when non-nil."
(or (plist-get props :ref) (or (plist-get props :ref)
(list 'etaf-host (or site-token (copy-sequence path))))) (list 'etaf-host (or site-token (copy-sequence path)))))
@ -326,7 +327,8 @@ the ordinary layout lowering path instead."
(t nil))) (t nil)))
(defun etaf--ebox-properties (props path &optional site-token) (defun etaf--ebox-properties (props path &optional site-token)
"Project ETAF PROPS at PATH to canonical Ebox author facts." "Project ETAF PROPS at PATH to canonical Ebox author facts.
SITE-TOKEN supplies the stable generated Host identity when non-nil."
(let* ((source-props (etaf--resolve-property-plist props)) (let* ((source-props (etaf--resolve-property-plist props))
(props (copy-sequence source-props)) (props (copy-sequence source-props))
ebox-props) ebox-props)
@ -441,7 +443,7 @@ the ordinary layout lowering path instead."
props etaf--ebox-source-fields))))) props etaf--ebox-source-fields)))))
(defun etaf--ebox-box-node (tag props children) (defun etaf--ebox-box-node (tag props children)
"Return one typed Ebox BoxNode TAG over canonical CHILDREN." "Return one typed Ebox BoxNode TAG with PROPS over canonical CHILDREN."
(let* ((declarations (etaf--ebox-declarations tag props)) (let* ((declarations (etaf--ebox-declarations tag props))
(layout (etaf--ebox-layout-config tag props declarations)) (layout (etaf--ebox-layout-config tag props declarations))
(outer (if (plist-member props :outer) (outer (if (plist-member props :outer)

12
etaf-runtime.el
View File

@ -373,7 +373,8 @@ the sequential `etaf--pvec-put' contract."
(defun etaf--runtime-theme-paint-value (defun etaf--runtime-theme-paint-value
(runtime property token source resolved) (runtime property token source resolved)
"Return RUNTIME's stable paint slot for PROPERTY TOKEN and RESOLVED value." "Return RUNTIME's stable paint slot for PROPERTY TOKEN from SOURCE.
RESOLVED is the current projected paint value."
(if (not (and runtime (if (not (and runtime
(etaf--runtime-theme-paint-property-p property) (etaf--runtime-theme-paint-property-p property)
(or (etaf-ref-p source) (etaf-computed-p source)))) (or (etaf-ref-p source) (etaf-computed-p source))))
@ -1384,7 +1385,8 @@ reading Runtime storage fields."
(defun etaf--runtime-register-host (defun etaf--runtime-register-host
(runtime props path &optional site-token old-semantic) (runtime props path &optional site-token old-semantic)
"Register PROPS contributions for one semantic Host at PATH. "Register PROPS contributions in RUNTIME for one semantic Host at PATH.
SITE-TOKEN supplies its stable author call-site identity when non-nil.
OLD-SEMANTIC supplies the already-read committed Host, when any." OLD-SEMANTIC supplies the already-read committed Host, when any."
(let ((host-ref (etaf--generated-host-ref props path site-token)) (let ((host-ref (etaf--generated-host-ref props path site-token))
(tail props) (tail props)
@ -4017,7 +4019,7 @@ Generation, including its effects and Host contributions."
found)) found))
(defun etaf--runtime-render-dirty-host-properties (runtime effect semantic) (defun etaf--runtime-render-dirty-host-properties (runtime effect semantic)
"Resolve one reactive Host SEMANTIC into RUNTIME's candidate graph." "Resolve EFFECT for Host SEMANTIC into RUNTIME's candidate graph."
(let* ((base (let* ((base
(or (gethash (etaf--semantic-host-semantic-id semantic) (or (gethash (etaf--semantic-host-semantic-id semantic)
(etaf-runtime-candidate-graph-nodes runtime)) (etaf-runtime-candidate-graph-nodes runtime))
@ -4258,7 +4260,9 @@ Generation, including its effects and Host contributions."
(defun etaf--runtime-render-keyed-range (defun etaf--runtime-render-keyed-range
(runtime effect range component instance) (runtime effect range component instance)
"Render only changed items in dirty keyed RANGE, or return nil." "Render EFFECT's changed items in keyed RANGE for RUNTIME.
COMPONENT and INSTANCE supply the retained owner environment. Return nil when
the range is not eligible for keyed incremental rendering."
(let* ((expr (etaf--generation-effect-target effect)) (let* ((expr (etaf--generation-effect-target effect))
(snapshot-function (and (etaf--expr-p expr) (snapshot-function (and (etaf--expr-p expr)
(etaf--expr-range-snapshot expr))) (etaf--expr-range-snapshot expr)))