[Coco] REPEAT UNTIL Problems in Basic09 ?

[coco at jechar.ca]

System: Emulator 6309 Basic09

Problem: This Code Fails the error says

ENDNTIL
ERROR #27
which is a MISSING ASSIGNMENT STATEMENT

THIS IS THE CODE

PROCEDURE t

DIM alpha$:STRING
DIM numeric,i:INTEGER
DIM DONE:BOOLEAN

DONE=FALSE
i=65
REPEAT
   numeric=1
   REPEAT
     alpha$=CHR$(i)
     PRINT alpha$;numeric
     numeric=numeric+1
   UNTIL (numeric>10)
   IF alpha$="Z" THEN
      DONE=TRUE
   ENDIF
UNTIL DONE

END


IS IT ME OR IS THERE SOMETHING
WRONG WITH THE COMPILER?

Charlie