Mercurial > repo

view interps/clc-intercal/clc-intercal @ 4295:e3a8730487a4

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
<shachaf> echo >bin/rnooodl \'perl -pe \'\\\'\'s/([Nn])ooodl/"\\1@{[o x(3+rand 7)]}dl"/ge\'\\\'
author HackBot
date Tue, 14 Jan 2014 01:18:58 +0000
parents 859f9b4339e6
children
line wrap: on
line source

#!/bin/bash
if [ ! "$1" ]
then
    exit 1
fi

INTERCAL="`dirname $0`/inst"
export PERL5LIB="$INTERCAL/lib/perl5"

cp "$1" /tmp/$$.i
$INTERCAL/bin/sick /tmp/$$.i
if [ -e /tmp/$$.io ]
then
    /tmp/$$.io
fi
rm -f /tmp/$$.i /tmp/$$.io