Fixed minor typos (#582)

* Update words.adoc * Update iec.fs * Update testcore.fs
jkotlinski · Dec 15, 2024 · 5334847 · 5334847
1 parent f9bcc21
commit 5334847
Show file tree

Hide file tree

Showing 3 changed files with 4 additions and 4 deletions.
diff --git a/forth/iec.fs b/forth/iec.fs
@@ -103,7 +103,7 @@ over split ciout ciout
                     \ send load addr
 over dup
 0 do i + dup c@ ciout loop
-1+ \ keep saveb compatability
+1+ \ keep saveb compatibility
 unlisten $ba c@ listen
 $e1 second \ $E0 + $01 close
 unlisten

diff --git a/manual/words.adoc b/manual/words.adoc
@@ -272,7 +272,7 @@ If the definition is not found, return _cstr_ and 0, otherwise return the execut
 If the definition is immediate, also return 1, otherwise also return -1.
 ((find-name)) _( caddr u -- 0 | nt )_ :: Get the name token (dictionary pointer) of the word named by _caddr u_, or 0 if the word is not found.
 ((execute)) _( xt -- )_ :: Execute the execution token _xt_.
-((>xt)) _( addr -- xt )_ :: Get execution token of word at adress _addr_.
+((>xt)) _( addr -- xt )_ :: Get execution token of word at address _addr_.
 
 === Debugging
 
@@ -290,7 +290,7 @@ If the definition is immediate, also return 1, otherwise also return -1.
 ((required)) _( filenameptr filenamelen -- )_ :: Like included, except that load is skipped if the file is already loaded.
 ((loadb)) _( filenameptr filenamelen dst -- endaddr )_ :: Load file to _dst_.
 Returns the address after last written byte, or 0 on failure.
-((saveb)) _( start end+1 filenameptr filenamelength -- )_ :: Save file. _Start_ = start address of memory area. _End+1_ = end adress of memory area plus 1.
+((saveb)) _( start end+1 filenameptr filenamelength -- )_ :: Save file. _Start_ = start address of memory area. _End+1_ = end address of memory area plus 1.
 ((device)) _( device# -- )_ :: Switch the current device.
 ((save-forth)) _( "filename" -- )_ :: Save the forth to the given filename.
 ((ls)) :: Load and print disk directory with optional drive # and wildcards. Example: `ls $1:*=p` Load directory for drive 1, only prg files.

diff --git a/test/testcore.fs b/test/testcore.fs
@@ -60,7 +60,7 @@ T{ MSB 2* -> 0S }T
 T{ 0S 2/ -> 0S }T
 T{ 1 2/ -> 0 }T
 T{ 4000 2/ -> 2000 }T
-T{ 1S 2/ -> 1S }T            \ MSB PROPOGATED
+T{ 1S 2/ -> 1S }T            \ MSB PROPAGATED
 T{ 1S 1 XOR 2/ -> 1S }T
 T{ MSB 2/ MSB AND -> MSB }T