| 1 | ;;; -*- mode: lisp; -*- |
|---|
| 2 | |
|---|
| 3 | (defpackage cl-darcs-system |
|---|
| 4 | (:use :cl :asdf)) |
|---|
| 5 | |
|---|
| 6 | (in-package :cl-darcs-system) |
|---|
| 7 | |
|---|
| 8 | (defsystem cl-darcs |
|---|
| 9 | :description "Darcs client" |
|---|
| 10 | :version "0.2.0" |
|---|
| 11 | :licence "GPL" |
|---|
| 12 | :author "Magnus Henoch <henoch@dtek.chalmers.se>" |
|---|
| 13 | :depends-on (:split-sequence |
|---|
| 14 | ;; HTTP client |
|---|
| 15 | :aserve |
|---|
| 16 | :trivial-gray-streams |
|---|
| 17 | ;; SHA1, hex etc |
|---|
| 18 | :ironclad |
|---|
| 19 | ;; Ironclad's SHA1 doesn't work with CLISP yet |
|---|
| 20 | #+clisp :sb-sha1 |
|---|
| 21 | ;; Files and directories |
|---|
| 22 | :cl-fad |
|---|
| 23 | ;; Regexps |
|---|
| 24 | :cl-ppcre |
|---|
| 25 | ;; Diff |
|---|
| 26 | :cl-difflib) |
|---|
| 27 | |
|---|
| 28 | :components |
|---|
| 29 | ((:file "packages") |
|---|
| 30 | (:file "util" :depends-on ("packages" #-allegro "inflate")) |
|---|
| 31 | (:file "unreadable-stream" :depends-on ("packages")) |
|---|
| 32 | (:file "upath" :depends-on ("util" #|"binary-text"|#)) |
|---|
| 33 | |
|---|
| 34 | (:file "patchinfo" :depends-on ("util")) |
|---|
| 35 | (:file "get" :depends-on ("util")) |
|---|
| 36 | (:file "pull" :depends-on ("util")) |
|---|
| 37 | (:file "init" :depends-on ("util")) |
|---|
| 38 | (:file "prefs" :depends-on ("util")) |
|---|
| 39 | (:file "repo" :depends-on ("util")) |
|---|
| 40 | (:file "diff" :depends-on ("util")) |
|---|
| 41 | (:file "record" :depends-on ("util")) |
|---|
| 42 | |
|---|
| 43 | (:file "patch-core" :depends-on ("util")) |
|---|
| 44 | (:file "read-patch" :depends-on ("patch-core")) |
|---|
| 45 | (:file "write-patch" :depends-on ("patch-core")) |
|---|
| 46 | (:file "apply-patch" :depends-on ("patch-core")) |
|---|
| 47 | (:file "invert-patch" :depends-on ("patch-core")) |
|---|
| 48 | (:file "display-patch" :depends-on ("patch-core")) |
|---|
| 49 | (:file "pristine" :depends-on ("patch-core")) |
|---|
| 50 | (:file "touching" :depends-on ("patch-core")) |
|---|
| 51 | (:file "commute" :depends-on ("patch-core")) |
|---|
| 52 | (:file "merge" :depends-on ("patch-core")) |
|---|
| 53 | (:file "unwind" :depends-on ("patch-core")) |
|---|
| 54 | (:file "equal" :depends-on ("patch-core")) |
|---|
| 55 | |
|---|
| 56 | ;; Franz' inflate implementation |
|---|
| 57 | #-allegro (:file "ifstar") |
|---|
| 58 | #-allegro (:file "inflate" :depends-on ("ifstar")))) |
|---|
| 59 | |
|---|
| 60 | #+allegro |
|---|
| 61 | (eval-when (:compile-toplevel :load-toplevel :execute) |
|---|
| 62 | (require :inflate)) |
|---|
