diff --git a/tryme.scm b/tryme.scm index 91511ed..8185bd7 100644 --- a/tryme.scm +++ b/tryme.scm @@ -5,6 +5,21 @@ (ordo task) (ordo handler)) +;; TODO: Consider how vars might be used in task args Currently a task argument +;; can be a context refrence, for example we could write: +;; +;; (install-directory (context-ref 'base-dir)) +;; +;; but there's no way to nest these, so we this will not work: +;; +;; (install-file (file-name-join (context-ref 'base-dir) "foo")) +;; +;; Maybe we could implement something like: +;; +;; (install-file (context-fn (file-name-join (context-ref 'base-dir) "foo"))) +;; +;; where context-fn is some syntax that returns (lambda (ctx) ...) + (define test-play (play "Test play" #:connection (local-connection)