A blast from the past

A blast from the past

Postby xilman » Sat May 16, 2015 11:04 am

Old timers might find this screen shot amusing.
Code: Select all
par4:~/Algol-68/algol68g-2.8.1> cat demo.a68
BEGIN
    [1:4]INT row := (1, 2, 3, 4);
    FOR i TO UPB row DO
        print ((row[i] * (row[i] + 1) % 2, newline))
    OD
END
par4:~/Algol-68/algol68g-2.8.1> ./a68g demo.a68
         +1
         +3
         +6
        +10
par4:~/Algol-68/algol68g-2.8.1> ./a68g -v
Algol 68 Genie 2.8.1
Copyright 2015 Marcel van der Veer <algol68g@xs4all.nl>.

This is free software covered by the GNU General Public License.
There is ABSOLUTELY NO WARRANTY for Algol 68 Genie;
not even for MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
See the GNU General Public License for more details.

Please report bugs to Marcel van der Veer <algol68g@xs4all.nl>.

Compilation is supported.
Parallel-clause is supported.
Curses is supported.
Regular expressions are supported.
TCP/IP is supported.
GNU libplot is not supported.
GNU Scientific Library is not supported.
PostgreSQL is not supported.
GNU libc version glibc 2.19.
GNU libpthread version NPTL 2.19.
par4:~/Algol-68/algol68g-2.8.1>

The compiler/interpreter built like a dream. No Epiphany support yet, of course.
xilman
 
Posts: 80
Joined: Sat May 10, 2014 8:10 pm
Location: UK

Return to Just for Fun

Who is online

Users browsing this forum: No registered users and 1 guest