43 lines
1.3 KiB
Scheme
43 lines
1.3 KiB
Scheme
;; (define d "~/.tmp")
|
|
;;
|
|
;; (makefile
|
|
;; (makefile-rule (expand-file-name "skills.tex" d)
|
|
;; '()
|
|
;; (lambda ()
|
|
;; (with-cwd d (display "Top: skills.tex"))))
|
|
;; (makefile-rule (expand-file-name "skills.dvi" d)
|
|
;; (expand-file-name "skills.tex" d)
|
|
;; (lambda ()
|
|
;; (with-cwd d
|
|
;; (run (latex ,(expand-file-name "skills.tex" d))))))
|
|
;; (makefile-rule (expand-file-name "skills.pdf" d)
|
|
;; (expand-file-name "skills.dvi" d)
|
|
;; (lambda ()
|
|
;; (with-cwd d (run
|
|
;; (dvipdfm -o
|
|
;; ,(expand-file-name "skills.pdf" d)
|
|
;; ,(expand-file-name "skills.dvi" d)))))))
|
|
;;
|
|
;; (make (expand-file-name "skills.pdf" d))
|
|
|
|
(makefile
|
|
(makefile-rule "/home/johannes/.tmp/skills.tex"
|
|
'()
|
|
(lambda ()
|
|
(with-cwd "/home/johannes/.tmp"
|
|
(display "Top: /home/johannes/.tmp/skills.tex"))))
|
|
(makefile-rule "/home/johannes/.tmp/skills.dvi"
|
|
"/home/johannes/.tmp/skills.tex"
|
|
(lambda ()
|
|
(with-cwd "/home/johannes/.tmp"
|
|
(run (latex ,"/home/johannes/.tmp/skills.tex")))))
|
|
(makefile-rule "/home/johannes/.tmp/skills.pdf"
|
|
"/home/johannes/.tmp/skills.dvi"
|
|
(lambda ()
|
|
(with-cwd "/home/johannes/.tmp"
|
|
(run (dvipdfm -o ,"/home/johannes/.tmp/skills.pdf"
|
|
,"/home/johannes/.tmp/skills.dvi"))))))
|
|
|
|
(make "/home/johannes/.tmp/skills.pdf")
|
|
|