syndicate-lang
/
syndicate-2017
1
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

fixup format of task performer spec

This commit is contained in:
Sam Caldwell 2019-12-30 17:13:29 -05:00
parent 8afed87e99
commit 33ef42818d
1 changed files with 18 additions and 18 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

36
racket/typed/proto.rkt
View File

@ -2308,38 +2308,38 @@
(listen) (listen)
(Reacts (Reacts
(Asserted (Asserted
(Observe- (Observe
(TaskPerformance- (TaskPerformance
Symbol Symbol
(Task- (Task
(Tuple- Int Symbol) (Tuple Int Symbol)
(U (U
(MapWork- String) (MapWork String)
(ReduceWork- (Hash- String Int) (Hash- String Int)))) (ReduceWork (Hash String Int) (Hash String Int))))
★/t))) ★/t)))
(Role (Role
(during-inner) (during-inner)
(Reacts (Reacts
(Retracted (Retracted
(Observe- (Observe
(TaskPerformance- (TaskPerformance
Symbol Symbol
(Task- (Task
(Tuple- Int Symbol) (Tuple Int Symbol)
(U (U
(MapWork- String) (MapWork String)
(ReduceWork- (Hash- String Int) (Hash- String Int)))) (ReduceWork (Hash String Int) (Hash String Int))))
★/t))) ★/t)))
(Stop during-inner)) (Stop during-inner))
(Shares (Shares
(TaskPerformance- (TaskPerformance
Symbol Symbol
(Task- (Task
(Tuple- Int Symbol) (Tuple Int Symbol)
(U (U
(MapWork- String) (MapWork String)
(ReduceWork- (Hash- String Int) (Hash- String Int)))) (ReduceWork (Hash String Int) (Hash String Int))))
(U (Finished- (Hash- String Int)) Symbol))))))) (U (Finished (Hash String Int)) Symbol)))))))
(module+ test (module+ test
(test-case "parse and compile task-performer-spec" (test-case "parse and compile task-performer-spec"