4.3.3 El fichero lelisp.h

El fichero lelisp.h se encuentra dentro de la distribución estándar de LE-LISP y contiene las estructuras C necesarias para trabajar con objetos LE-LISP desde funciones escritas en lenguaje C. Se debe incluir la directiva #include "lelisp.h" en todos aquellos programas que precisen manipular objetos LE-LISP, aunque dicha manipulación sea una actividad desaconsejada por los propios constructores del sistema LE-LISP.

A continuación se muestra una lista de las declaraciones de estructuras y tipos más interesantes incluidas en lelisp.h:

• El tipo LL_OBJECT es un tipo polimórfico que cubre todos los tipos de objetos LE-LISP, como por ejemplo LL_SYMBOL y LL_CONS:

          typedef char *LL_OBJECT;

• La estructura LL_CONS permite manipular objetos cons desde C:

          struct LL_CONS {
            LL_OBJECT ll_car;
            LL_OBJECT ll_cdr;
          };

• La estructura LL_SYMBOL permite manipular símbolos LE-LISP desde funciones C. El significado de los distintos campos se explica en la sección B.1.1, página . Los campos ll_alink y ll_pname no se deben tocar en ningún caso.

          struct LL_SYMBOL {
            LL_OBJECT ll_cval;
            LL_OBJECT ll_plist;
            LL_OBJECT ll_fval;
            LL_OBJECT ll_alink;
            LL_OBJECT ll_pkgc;
            LL_OBJECT ll_oval;
            char      ll_ftype;
            char      ll_ptype;
            short     ll_pad;
            LL_OBJECT ll_pname;
          };

• Las cadenas de caracteres y los vectores son punteros a punteros sobre estructuras de tamaño variable. La doble indirección resulta necesaria para gestionar la desasignación de memoria en el proceso de recolección de basura. Puesto que en C no existen estructuras de tamaño variable, las declaraciones de LL_STRING y de LL_VECTOR corresponden a objetos de 1 byte. Los campos ll_strsize y ll_vecsiz indican el tamaño real de los objetos. No se deben modificar los campos ll_strobj, ll_strarr, ll_strtyp, ll_vecobj, ll_vecarr ni ll_vectyp.

          struct LL_STRING {
            struct {
              struct LL_STRING *ll_strarr; /* enlace a otros strings */
              int              ll_strsiz;  /* numero de caracteres */
              char             ll_strfil;  /* direccion del primer 
                                            * caracter */
              } *ll_strobj;
            LL_OBJECT ll_strtyp;           /* puntero al simbolo LE-LISP */
          };
                     
  
          struct LL_VECTOR {
            struct {
              struct LL_VECTOR *ll_vecarr; /* enlace a otros vectores */
              int              ll_vecsiz;  /* numero de elementos */
              LL_OBJECT        ll_vecfil;  /* direccion del primer 
                                            * elemento */
            } *ll_vecobj;
            LL_OBJECT ll_vectyp;           /* puntero al simbolo LE-LISP */
          };

• La macro C llamada LL_C_FLOAT transforma un número de punto flotante en LE-LISP en el correspondiente número de punto flotante en C.
• Las funciones relacionadas con las llamadas al sistema LE-LISP desde funciones C se muestran en la sección 4.4, página .