; Function defined on pp272-273 of C64 Programmers Reference Guide vector: ;; XXX adapt restor when this is implemented rts