Waiting for a condition

Waiting for a condition

[spamfilteraccount]

I have a code where I'd like to perform an asynchronous operation and
then wait for the result of the operation synchronously in place. When
the operation is finished it calls a function, so I can do a signalling
there. If the operation was successful then the synchronous code should
continue, otherwise it should abort.

I came up with this solution which works, but inelegant imho:

  ...
  (let ((timeout 5))
    (while (and (not condition)
                (> timeout 0)
                (message (format "Waiting for condition... (%s)"
timeout))
                (sit-for 1))
      (decf timeout)))
  (unless condition
    (error "nope!")))
  ...

Is there a way to yield the execution here and wake it up when the
operation is finished (with timeout), without having to poll the
condition? I know sit-for returns is input is available. Should I
generate some kind of dummy event to wake sit-for up? But what event?
Mouse move?

Re: Waiting for a condition

[spamfilteraccount]

spamfilteraccount@gmail.com wrote:
>
> Is there a way to yield the execution here and wake it up when the
> operation is finished (with timeout), without having to poll the
> condition? I know sit-for returns is input is available. Should I
> generate some kind of dummy event to wake sit-for up? But what event?
> Mouse move?

I thought this question was trivial and someone could answer it right
away. Is it not possible to do it in emacs?

I can generate an input event, but then I think that event should be
consumed by someone and it should not affect the user experience, so it
may not be rivial.

Or am I using the wrong approach and there is an other mechanism which
is more suitable here than sit-for?