diff --git a/forth/bootstrap/bootstrap.fs b/forth/bootstrap/bootstrap.fs index 220e29f..7c59c7b 100644 --- a/forth/bootstrap/bootstrap.fs +++ b/forth/bootstrap/bootstrap.fs @@ -1310,7 +1310,8 @@ false value capital-hex? : dump ( addr len -- ) over + swap - do i . space + cr + do i u. space 10 0 do j i + c@ dup 10 / todigit emit