;;; .EnTete "Le-Lisp (c) version 15.2" " " "Test de l'interpre`te"
;;; .EnPied "testfn.ll" "%" " "
;;;
;;; .SuperTitre "Test des fonctions interpre'te'es"
;;;
;;;
;;; .Centre "*****************************************************************"
;;; .Centre " Ce fichier est en lecture seule hors du projet ALE de l'INRIA.  "
;;; .Centre " Il est maintenu par ILOG SA, 2 Avenue Gallie'ni, 94250 Gentilly "
;;; .Centre " (c) Le-Lisp est une marque de'pose'e de l'INRIA                 "
;;; .Centre "*****************************************************************"
;;;
;;; .Centre "$Header: testfn.ll,v 4.1 88/01/13 12:31:28 kuczynsk Rel213 $"


(unless (>= (version) 15.2)
        (error 'load "fichier non compatible" 'testfn))
 

(unless (featurep 'testcomm)
        (libload testcomm))


(testfn ()
        (catenate #:system:lltest-directory 
                  'testdata
                  #:system:lelisp-extension))