public
Description: Rake in Io.
Clone URL: git://github.com/defunkt/ike.git
some io style changes, thanks to cdcarter and bugfux
defunkt (author)
Thu Feb 14 15:13:04 -0800 2008
commit  40bc587a64745195132b9379075ce2a3b6c11715
tree    2186e722a4f2cd10b253b27e7917cc99aaba0013
parent  02c40bc6df1fd96d3f3e53d696257aa0d2f0544e
0
...
4
5
6
 
...
4
5
6
7
0
@@ -4,3 +4,4 @@
0
 [x] namespaces
0
 [x] default task
0
 [ ] dependencies
0
+[ ] sh
0
...
11
12
13
14
15
16
17
18
19
 
 
 
 
 
20
21
22
...
26
27
28
29
 
30
31
32
...
79
80
81
82
 
 
83
84
85
86
87
 
 
88
89
90
...
11
12
13
 
 
 
 
 
 
14
15
16
17
18
19
20
21
...
25
26
27
 
28
29
30
31
...
78
79
80
 
81
82
83
84
85
86
 
87
88
89
90
91
0
@@ -11,12 +11,11 @@ Ike do(
0
   ////
0
   // Task object
0
   Task := Object clone do(
0
- new := method(name, body, desc,
0
- child := self clone
0
- child setSlot("name", name)
0
- child setSlot("body", body)
0
- child setSlot("desc", desc)
0
- child
0
+ with := method(name, body, desc,
0
+ self setSlot("name", name)
0
+ self setSlot("body", body)
0
+ self setSlot("desc", desc)
0
+ self
0
     )
0
 
0
     invoke := method(doMessage(body))
0
@@ -26,7 +25,7 @@ Ike do(
0
   // api
0
   task := method(name,
0
     if(currentNamespace) then(name = "#{currentNamespace}:#{name}" interpolate)
0
- tasks << Ike Task new(name, call message arguments last, nextDesc)
0
+ tasks << Ike Task clone with(name, call message arguments last, nextDesc)
0
     nextDesc = nil
0
   )
0
 
0
@@ -79,12 +78,14 @@ Ike do(
0
 
0
 ////
0
 // ext
0
-List setSlot("<<", method(other, append(other)))
0
+List << := method(other, append(other))
0
+Object new := method(clone with(call message arguments))
0
 
0
 ////
0
 // setup our dsl
0
 list("task", "desc", "namespace") foreach(slot,
0
- setSlot(slot, method(call delegateTo(Ike)))
0
+ setSlot(slot, method(call delegateTo(Ike))
0
+ )
0
 )
0
 
0
 ////

Comments

    No one has commented yet.