String-Read-Quad!

(string-read-quad! string) -> integer or #f

Destructively reads a byte "word" from the given string. If the string is empty, or does not contain a full quad, #f is returned, and the string is not altered.

Examples:

>> (define a "abcdefghijklmnopqrstuvwxyz")
:: "abcdefghijklmnopqrstuvwxyz"
>> (string-read-quad! a)
:: 1633837924
>> (define b "1")
:: "1"
>> (string-read-quad! b)
:: #f
>> b
:: "1"