compose-external-formats

Function

Package: excl

Arguments: name1 name2 &optional name

All arguments should be symbols.

compose-external-formats creates a new external-format with name name, or, if name is nil, a keyword symbol whose symbol-name is the concatenation of names name1 followed by #\- followed by name2. The composed external-format is returned.

name1 is called the composer and name2 is called the composee. External formats have slots for the composer and composee. If the value in those slots is nil, the external format is not composed. The functions ef-composer-ef and ef-composee-ef access those slots. The function composed-external-format-p returns true or false as its argument is or is not a composed external format.

The chars-to-octets and octets-to-char macros of the composed external-format are formed as if by evaluation of forms equivalent to the following:

(def-char-to-octets-macro name (char state
				&key put-next-octet external-format)
   `(chars-to-octets NAME1
		     ,char
		     ,state
		   :put-next-octet ,put-next-octet
		   :external-format NAME2))

(def-octets-to-chars-macro name (state
				 &key get-next-octet external-format)
   `(octets-to-char NAME1
		    ,state
		    :get-next-octet ,get-next-octet
		    :external-format NAME2))

See iacl.htm for more information on international character support in Allegro CL.

The documentation is described in introduction.htm and the index is in index.htm.

Created 2000.10.5.