Slightly improved peq ?

[barrym95838]

If we're only concerned about the Z flag, we could shave two bytes and a few cycles here, right?:

peq
    lda stackh,x    ; [4]
    eor tos+1       ; [3]
    bne peq99       ; [2*]
    lda stackl,x    ; [4]
    eor tos         ; [3]
peq99
    rts             ; [6]       ; Z flag is (TOS = 2OS)