[OpenBIOS] [PATCH 10/10] Adding filll Forth primitive (v2)

[Segher Boessenkool]

> +static void
> +filll(void)
> +{
> +    uint32_t value = POP();
> +    int count = POP();
> +    uint32_t *dest = (uint32_t*)cell2pointer(POP());
> +
> +    int i;
> +    for (i = count; i > 0; i -= sizeof(uint32_t)) {
> +        *dest++ = value;
> +    }
> +}

This isn't going to work with -fstrict-aliasing, but I guess
openbios has that disabled anyway?


Segher