qb_jack_s

integer qb_jack_s(&, decq q);

is 0 if the q sequence is empty or if the data in the last position is not of the same data type as the first argument, non zero otherwise. Sets the first argument as the data in the last position and moves it in the first position for the latter case (links data if the data type allows, copies it otherwise).