Un exemple : Sabrina (INRIA années 80)

• Définition d'un ADT dans Sabrina

SQL > lisp;

LISP ? (DD #:T:POINT (X)

LISP ? (AND (NUMBERP (CAR X))

LISP ? (NUMBERP (CAR (CDR x)))

LISP ? (NULL (CDR (CDR X))))))

LISP T

LISP ? (save #:T:POINT)

LISP #:T:POINT

LISP ? fin

SQL > create table LOC (station character, lieu point);

Diapositive précédente

Diapositive suivante

Revenir à la première diapositive

Afficher la version graphique