Mercurial > repo

view interps/clc-intercal/CLC-INTERCAL-Base-1.-94.-2/t/09compiler-1972.t @ 9554:23f43464694e

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
<Zarutian> le/rn Frams\xc3\xb3knarflokkurinn/A, now defunct, political party in Iceland. Like its sister party Sj\xc3\xa1lfst\xc3\xa6\xc3\xb0isflokkurinn it is named by the antonym of what it is. (The name means the Progressive Party but they have nearly always been highly regressive). Think dumb Hill-Billies in ill fitting suits and you get their constiuents.
author HackBot
date Sun, 30 Oct 2016 14:33:24 +0000
parents 859f9b4339e6
children
line wrap: on
line source

# test INTERCAL-1972 compiler

# Copyright (c) 2006-2008 Claudio Calvelli, all rights reserved.

# CLC-INTERCAL is copyrighted software. However, permission to use, modify,
# and distribute it is granted provided that the conditions set out in the
# licence agreement are met. See files README and COPYING in the distribution.

my @all_tests = (
    ['Comment', '', "*000 COMMENT\n", 0, "COMMENT"],
    ['READ OUT', '', "\nXII\n", undef, "DO .1 <- #12\nPLEASE READ OUT .1"],
    # XXX more tests would be nice
);

require 't/compiler-test';

runtest('1972', 'DO GIVE UP', \@all_tests);