I'm trying to translate [urlhttp://www.gameprogrammer.com/fastevents/fastevents2.html]an SDL add-on library[/url] to Object Pascal, but I'm running up against some very strange syntax.

while (0 >= (val = SDL_PollEvent(event)))

I have no idea what this conditional is supposed to be evaluating. It looks like it's checking the numeric result of an assignment operation? ("val" is declared as an integer.)

Any idea what's going on here?