https://github.com/willf/xsdf

Extremely Simple Defsystem
https://github.com/willf/xsdf

Last synced: 4 months ago
JSON representation

Extremely Simple Defsystem

• Host: GitHub
• URL: https://github.com/willf/xsdf
• Owner: willf
• License: other
• Created: 2012-06-27T13:35:13.000Z (almost 14 years ago)
• Default Branch: master
• Last Pushed: 2012-06-27T13:41:15.000Z (almost 14 years ago)
• Last Synced: 2025-11-23T18:06:47.009Z (7 months ago)
• Language: Common Lisp
• Size: 93.8 KB
• Stars: 1
• Watchers: 1
• Forks: 0
• Open Issues: 0
• Metadata Files:
  • Readme: README
  • License: LICENSE

Awesome Lists containing this project

README

          
;;;-*- Mode: Lisp; Package: xsdf -*-

;;;

;;; The extremely simple defsystem facility.

;;;

;;; 

(defpackage :xsdf

  (:use :common-lisp)

  (:export

   #:load-file

   #:load-system

   #:compile-system

   #:check-system

   #:clean-system

   ))

(in-package :xsdf)

;;;

;;;(setf (logical-pathname-translations "Home")

;;;  `(("**;*.*.*" ,(make-pathname 

;;;		  :directory (append (butlast (pathname-directory *load-truename*))

;;;				    (list :wild-inferiors))

;;;		  :name :wild

;;;		  :type :wild))))

;;;

;;;(defparameter *asystem*

;;;	    '("Home:test;one.lisp"

;;;	      "Home:test;two.lisp"

;;;	      "Home:test;three.lisp"

;;;	      )))

;;;