Re: [openfirmware] [commit] r1834 - forth/lib

[Mitch Bradley]

Actually should be @ / ! everywhere.  Thanks for finding the problem.

Segher Boessenkool wrote:
> > +: getq  ( q -- char )
> > dup >qgetp @                                         ( q getptr )
> > +: qempty?  ( q -- flag )  dup >qgetp l@  swap >qputp @ =  ;
> > +: qfull?   ( q -- flag )  dup >qputp l@  decqp  swap >qgetp @ =  ;
>
> @ should be l@ everywhere here?
>
> Segher
>
> openfirmware mailing list
> [e-mail]
> https://openfirmware.info/mailman/listinfo/openfirmware