concurrency.promises: fix formatting
parent
7692bd1715
commit
be8a0f7779
|
@ -12,6 +12,7 @@ TUPLE: promise mailbox ;
|
||||||
mailbox>> mailbox-empty? not ;
|
mailbox>> mailbox-empty? not ;
|
||||||
|
|
||||||
ERROR: promise-already-fulfilled promise ;
|
ERROR: promise-already-fulfilled promise ;
|
||||||
|
|
||||||
: fulfill ( value promise -- )
|
: fulfill ( value promise -- )
|
||||||
dup promise-fulfilled? [
|
dup promise-fulfilled? [
|
||||||
promise-already-fulfilled
|
promise-already-fulfilled
|
||||||
|
|
Loading…
Reference in New Issue