How do I read a line of input from a user, until an EOF is hit, in GNU Prolog?

Question

I have been reading the GNU Prolog documentation to figure out how to read a line of input until an end_of_file atom is reached. Here is my pseudocode for writi