Virtualization/openbios
1
0
Fork 0
mirror of https://gitlab.com/qemu-project/openbios.git synced 2024-02-13 08:34:06 +08:00
Code Issues Projects Releases Wiki Activity

Fix pad alignment

Browse Source 
git-svn-id: svn://coreboot.org/openbios/openbios-devel@231 f158a5a8-5612-0410-a976-696ce0be7e32
This commit is contained in:
Blue Swirl
2008-08-30 10:51:55 +00:00
parent baaa1bb85c
commit a7188cc237
1 changed files with 1 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
forth/bootstrap/bootstrap.fs
View File

@@ -1083,7 +1083,7 @@ defer key
false value capital-hex? false value capital-hex?
: pad ( -- addr ) here 100 + ; : pad ( -- addr ) here 100 + aligned ;
: todigit ( num -- ascii ) : todigit ( num -- ascii )
dup 9 > if dup 9 > if