hardenedbsd/HardenedBSD
1
0
Fork 0
mirror of https://git.hardenedbsd.org/hardenedbsd/HardenedBSD.git synced 2024-11-15 14:56:13 +01:00
Code Issues Actions Packages Projects Releases Wiki Activity

The word environment? returns a flag indicating whether the variable

Browse Source 
was found or not. Fix it's usage. Alas, it caused no problem before,
besides leaving garbage in the stack, because refill, used by [if]
[else] [then], was broken.
This commit is contained in:
Daniel C. Sobral 2000-06-12 16:45:01 +00:00
parent 23bab6002c
commit d742bdfc76
Notes: svn2git 2020-12-20 02:59:44 +00:00 
svn path=/head/; revision=61585
1 changed files with 22 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

28
sys/boot/forth/loader.4th
View File

@ -24,13 +24,29 @@
\
\ $FreeBSD$
s" arch-alpha" environment? [if]
s" loader_version" environment? 3 < abort" Loader version 0.3+ required"
[then]
s" arch-alpha" environment? [if] [if]
s" loader_version" environment? [if]
3 < [if]
.( Loader version 0.3+ required) cr
abort
[then]
[else]
.( Could not get loader version!) cr
abort
[then]
[then] [then]
s" arch-i386" environment? [if]
s" loader_version" environment? 8 < abort" Loader version 0.8+ required"
[then]
s" arch-i386" environment? [if] [if]
s" loader_version" environment? [if]
8 < [if]
.( Loader version 0.8+ required) cr
abort
[then]
[else]
.( Could not get loader version!) cr
abort
[then]
[then] [then]
include /boot/support.4th