[OpenBIOS] [PATCH] Zero-pad byte properties

[Blue Swirl]

Thanks, applied.

On Mon, Oct 4, 2010 at 8:08 PM, Andreas Färber <andreas.faerber at web.de> wrote:
> .properties before:
> someproperty              -- 3 : 1 42 3
>
> Now:
> someproperty              -- 3 : 01 42 03
>
> Signed-off-by: Andreas Färber <andreas.faerber at web.de>
> ---
>  forth/admin/devices.fs |    2 +-
>  1 files changed, 1 insertions(+), 1 deletions(-)
>
> diff --git a/forth/admin/devices.fs b/forth/admin/devices.fs
> index e24c6da..dbb4646 100644
> --- a/forth/admin/devices.fs
> +++ b/forth/admin/devices.fs
> @@ -283,7 +283,7 @@
>     dup r@ + c@
>     ( len n ch )
>
> -    pocket tohexstr type ."  "
> +    pocket tohexstr dup 2 <> if ." 0" then type ."  "
>     1+
>   repeat
>   2drop r> drop 1
> --
> 1.7.3
>
>
> --
> OpenBIOS                 http://openbios.org/
> Mailinglist:  http://lists.openbios.org/mailman/listinfo
> Free your System - May the Forth be with you