ANSI-TEST FILE-POSITION.8: Not an ivector subtag: 182

[phoe]

CCL fails some of the ANSI-TESTs with the following error:

Test CL-TEST::FILE-POSITION.8 failed
Form: (LOOP CL-TEST::FOR CL-TEST::LEN CL-TEST::FROM 33 CL-TEST::TO 100 CL-TEST::FOR CL-TEST::N = (ASH 1 CL-TEST::LEN) DO (WITH-OPEN-FILE (CL-TEST::OS "tmp.dat" :DIRECTION :OUTPUT :IF-EXISTS :SUPERSEDE :ELEMENT-TYPE (LIST* 'UNSIGNED-BYTE (LIST CL-TEST::LEN))) (LOOP CL-TEST::FOR CL-TEST::I CL-TEST::FROM 0 CL-TEST::BELOW 100 CL-TEST::FOR CL-TEST::R = (LOGAND (1- CL-TEST::N) CL-TEST::I) CL-TEST::FOR CL-TEST::POS = (FILE-POSITION CL-TEST::OS) DO (ASSERT (OR (NOT CL-TEST::POS) (EQL CL-TEST::POS CL-TEST::I))) DO (WRITE-BYTE CL-TEST::R CL-TEST::OS))) DO (WITH-OPEN-FILE (CL-TEST::IS "tmp.dat" :DIRECTION :INPUT :ELEMENT-TYPE (LIST* 'UNSIGNED-BYTE (LIST CL-TEST::LEN))) (LOOP CL-TEST::FOR CL-TEST::I CL-TEST::FROM 0 CL-TEST::BELOW 100 CL-TEST::FOR CL-TEST::POS = (FILE-POSITION CL-TEST::IS) DO (ASSERT (OR (NOT CL-TEST::POS) (EQL CL-TEST::POS CL-TEST::I))) DO (LET ((BYTE (READ-BYTE CL-TEST::IS))) (ASSERT (EQL BYTE (LOGAND (1- CL-TEST::N) CL-TEST::I)))))))
Expected value:
          NIL
Actual value:
          #<SIMPLE-ERROR #x302001F2C65D> [Not an ivector subtag: 182]

Reproduced on v1.11.5 and the latest bootstrapping bianries.

I will try to find a minimal working test case.