% From the book
% PROLOG PROGRAMMING IN DEPTH
% by Michael A. Covington, Donald Nute, and Andre Vellino
% (Prentice Hall, 1997).
% Copyright 1997 Prentice-Hall, Inc.
% For educational use only

% File TYPEWRIT.PL
% Program to accept characters until the user hits Return

typewriter :- repeat,
                get0(C),
              C = 13.         % 10 in some Prologs