Commit 3de1b873 authored by Raymond Toy's avatar Raymond Toy
Browse files

Oops. Need to tell precompile-ef-slot about +ef-osc+.

parent 38f32e9f

src/code/extfmts.lisp

+2 −1
Original line number Diff line number Diff line
@@ -1171,7 +1171,8 @@ character and illegal outputs are replaced by a question mark.") 
	(#.+ef-os+ (%ef-octets-to-string ef))

	(#.+ef-so+ (%ef-string-to-octets ef))

	(#.+ef-en+ (%ef-encode ef))

	(#.+ef-de+ (%ef-decode ef))))

	(#.+ef-de+ (%ef-decode ef))

	(#.+ef-osc+ (%ef-octets-to-string-counted ef))))

    `(setf (aref (ef-cache (find-external-format ,(ef-name ef))) ,slot)

	 ,(subst (ef-name ef) ef

		 (function-lambda-expression (aref (ef-cache ef) slot))))))