Improve the types in bfs/generalized and dfs/generalized.
This commit is contained in:
parent
6d32fcecfc
commit
2460d56d04
1 changed files with 4 additions and 4 deletions
|
@ -275,8 +275,8 @@
|
|||
[bfs/generalized (->* (Graph Any)
|
||||
(#:init-queue Any ; TODO: Add a proper type.
|
||||
#:break (-> Graph Any Any Any Boolean)
|
||||
#:init (-> Graph Any Void)
|
||||
#:visit? (-> Graph Any Any Any Boolean)
|
||||
#:init (U (-> Graph Any Void) Void)
|
||||
#:visit? (U (-> Graph Any Any Any Boolean) False)
|
||||
#:discover (-> Graph Any Any Any Any Any)
|
||||
#:visit (-> Graph Any Any Any Any)
|
||||
#:return (-> Graph Any Any Any))
|
||||
|
@ -290,9 +290,9 @@
|
|||
[dfs/generalized (->* (Graph)
|
||||
(#:order (-> (Listof Any) (Listof Any))
|
||||
#:break (-> Graph Any Any Any Boolean)
|
||||
#:init (-> Graph Void)
|
||||
#:init (U (-> Graph Void) Void)
|
||||
#:inner-init (-> Any Any)
|
||||
#:visit? (-> Graph Any Any Boolean)
|
||||
#:visit? (U (-> Graph Any Any Boolean) False)
|
||||
#:prologue (-> Graph Any Any Any Any)
|
||||
#:epilogue (-> Graph Any Any Any Any)
|
||||
#:process-unvisited? (-> Graph Any Any Boolean)
|
||||
|
|
Loading…
Reference in a new issue