Fix SEE for DEFERed words

2025-08-09 01:25:00 +00:00 · 2024-02-05 17:38:56 -08:00
parent 211ce933b2
commit 67960518b0
5 changed files with 1 additions and 1 deletions
--- a/images/apple/PLASMA-2.1-INST.po
+++ b/images/apple/PLASMA-2.1-INST.po
--- a/images/apple/PLASMA-2.1.po
+++ b/images/apple/PLASMA-2.1.po
--- a/images/apple/PLASMA2.2mg
+++ b/images/apple/PLASMA2.2mg
--- a/images/apple/apple3.hd
+++ b/images/apple/apple3.hd
--- a/src/toolsrc/plforth.pla
+++ b/src/toolsrc/plforth.pla
@@ -1869,7 +1869,7 @@ def _see_#0
        pfa = _pfa_(dentry)
        break
      is @_dodefer_
-        pfa = *_pfa_(*_pfa_(dentry))
+        pfa = _pfa_(*_pfa_(dentry))
        break
      is @_dodoes_
        pfa = *_pfa_(dentry)