Author: tsoome
Date: Mon Sep 16 20:26:53 2019
New Revision: 352420
URL: https://svnweb.freebsd.org/changeset/base/352420
Log:
loader_4th: scan_buffer can leave empty string on stack
When the file processing is done, we will have string with lenght 0 in stack
and we will attempt to
allocate 0 bytes.
Modified:
head/stand/forth/support.4th
Modified: head/stand/forth/support.4th
==============================================================================
--- head/stand/forth/support.4th Mon Sep 16 18:40:27 2019
(r352419)
+++ head/stand/forth/support.4th Mon Sep 16 20:26:53 2019
(r352420)
@@ -363,6 +363,7 @@ variable fd
;
: line_buffer_resize ( len -- len )
+ dup 0= if exit then
>r
line_buffer .len @ if
line_buffer .addr @
@@ -376,6 +377,7 @@ variable fd
;
: append_to_line_buffer ( addr len -- )
+ dup 0= if 2drop exit then
line_buffer strget
2swap strcat
line_buffer .len !
_______________________________________________
svn-src-head@freebsd.org mailing list
https://lists.freebsd.org/mailman/listinfo/svn-src-head
To unsubscribe, send any mail to "svn-src-head-unsubscr...@freebsd.org"
