2.2.6. Funciones Visual LISP ara Tratamiento de Cadenas

(vl-prin1-to-string object)
Devuelve la representación como cadena de cualquier objeto LISP talcomo si fuera la salida de la función PRIN1
_$ (setq file_id (open "test.tmp" "w"))
#<file "test.tmp">
_$ (vl-prin1-to-string file_id)
"#<file \"test.tmp\">"
(vl-princ-to-string object)
Devuelve la representación como cadena de cualquier objeto LISP talcomo si fuera la salida de la función PRINC
_$ (setq file_id (open "test.tmp" "w"))
#<file "test.tmp">
_$ (vl-princ-to-string file_id)
"#<file test.tmp>"
(vl-string->list string)
Convierte una cadena en una lista de códigos de carácternuméricos ASCII
_$ (vl-string->list "Madrid")
(77 97 100 114 105 100)

(vl-string-elt string position)
Devuelve la representación ASCII del carácter situado en laposición especificada en una cadena. El primer carácter ocupa laposición cero
_$ (vl-string-elt "Madrid" 0)
77
_$ (chr 77)
"M"
_$
(vl-string-left-trim character-set string)
Quita los caracteres especificados del inicio de una cadena
_$ (vl-string-left-trim "PRE" "PREFIJO")
"FIJO"
(vl-string-mismatch cad1 cad2 [pos1 pos2 ignorar-caja])
Devuelve la longitud del prefijo común más largo para doscadenas (cad1 cad2), comenzando en las posiciones que se especifican (pos1pos2) teniendo en cuenta o no la diferencia entre mayúsculas yminúsculas (ignorar-caja)
_$ (vl-string-mismatch "vl-fun" "avl-var")
0
_$ (vl-string-mismatch "vl-fun" "avl-var" 0 1)
3
_$ (vl-string-mismatch "VL-FUN" "VL-VAR")
3
_$ (vl-string-mismatch "VL-FUN" "Vl-vAR")
1
_$ (vl-string-mismatch "VL-FUN" "Vl-vAR" 0 0 T)
3
(vl-string-position code-car cad [pos-inic [desde-final]])
Busca el carácter con el código ASCII especificado en unacadena
_$ (vl-string-position 100 "Madrid")
2
_$ (vl-string-position 100 "Madrid" nil T)
5 ;a partir de la derecha se encuentra la última 'd'
(vl-string-right-trim conj-caracteres cadena)
Quita los caracteres especificados del final de una cadena
_$ (vl-string-right-trim "FIJO" "PREFIJO")
"PRE"
(vl-string-search patron cadena [pos-inicial])
Busca el patrón especificado dentro de una cadena
_$ (vl-string-search "dr" "Madrid")
2
(vl-string-subst nueva-cad patron cadena [pos-inicial])
Sustituye una subcadena (patron) por otra (nueva-cad) dentro de una cadenadada, a partir de la posición (pos-inicial) especificada
_$ (vl-string-subst "leyenda" "cadena" "Una cadena sustituida")
"Una leyenda sustituida"
_$ (vl-string-subst "esta" "cadena" "Una cadena u otra cadena a sustituir" 0)
"Una esta u otra cadena a sustituir"
_$ (vl-string-subst "esta" "cadena" "Una cadena u otra cadena a sustituir" 10)
"Una cadena u otra esta a sustituir"
(vl-string-translate conj-origen conj-dest cad)
Reemplaza caracteres en una cadena con un conjunto especificado decaracteres
_$ (vl-string-translate "abcABC" "123123" "A = a, B = b, C = C")
"1 = 1, 2 = 2, 3 = 3"
_$ (vl-string-translate "abc" "123" "A = a, B = b, C = C")
"A = 1, B = 2, C = C"
(vl-string-trim conj-caract cadena)
Quita los caracteres especificados del inicio y del final de una cadena
_$ (vl-string-trim "Ser" "Ser o no Ser")
" o no "