;;; -*- Mode:LISP; Package:USER; Base:10 -*- (fs:add-logical-pathname-host "ill" "LAM3" '(("code;" "Illustrate;") ("patch;" "Illustrate.LMI;") ("demo;" "Illustrate.Demo;") ("fonts;" "Illustrate.Fonts;"))) (si:set-system-source-file "ill" "ill:code;illustrate.lisp") (si:set-system-source-file "illustrate" "ill:code;illustrate.lisp")