Search code examples
swi-prolog

Who gave SWI-Prolog a sense of humor?


Who gave SWI-Prolog a sense of humor?

Welcome to SWI-Prolog (threaded, 64 bits, version 7.3.35)
SWI-Prolog comes with ABSOLUTELY NO WARRANTY. This is free software.
Please run ?- license. for legal details.

For online help and background, visit http://www.swi-prolog.org
For built-in help, use ?- help(Topic). or ?- apropos(Word).


1 ?- Input.  
% ... 1,000,000 ............ 10,000,000 years later  
%   
%       >> 42 << (last release gives the question)
1 ?-   

Solution

  • Jan Wielemaker at The Beginning of Time! (Time!...Time...time...)

    Commit 97f1b0bbcedbb7598775a40caacbe16f139f28d8 on May 26, 1992:

    $execute(Var, _) :-
        var(Var), !,
        $ttyformat('... 1,000,000 ............ 10,000,000 years later~n~n'),
        $ttyformat('~t~8|>> 42 << (last release gives the question)~n'),
    fail.