alx/ueforth
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

Narrow vlist.

Browse Source
This commit is contained in:
Brad Nelson
2022-01-31 09:04:13 -08:00
parent f593274aca
commit b38c57ccf8
1 changed files with 1 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
ueforth/common/utils.fs
View File

@ -78,7 +78,7 @@ only forth definitions
( List words in Dictionary / Vocabulary ) ( List words in Dictionary / Vocabulary )
internals definitions internals definitions
75 value line-width 70 value line-width
: onlines ( n xt -- n xt ) : onlines ( n xt -- n xt )
swap dup line-width > if drop 0 cr then over >name nip + 1+ swap ; swap dup line-width > if drop 0 cr then over >name nip + 1+ swap ;
forth definitions also internals forth definitions also internals