v03i080: Re: v03i076: Just for fun (something which once appeared on the net)
Peter da Silva
peter at sugar.UUCP
Wed Jul 13 15:07:49 AEST 1988
Posting-number: Volume 3, Issue 80
Submitted-by: "Peter da Silva" <peter at sugar.UUCP>
Archive-name: more-xmas
[Introducing the major motion picture: THE CHRISTMAS THAT WOULDN'T DIE! Now
showing at theaters near you!!! ;-) ++bsa]
Ratfor (from the book, with the DEC F4P Fortran):
do(i=1,15) type *, 'Merry Christmas'
end
Ratforth (AKA Fifth, a language I hacked up to make Forth less ugly):
define christmas {
do(15,0) {
type(count("Merry Christmas"));
CR;
}
}
This produces, by the way:
: christmas 15 0 do " Merry Christmas" count type CR ;
AREXX:
/* Say Merry Christmas 15 times */
do i=1 to 15
say 'Merry Christmas'
end i
---
-- `-_-' Peter (have you hugged your wolf today?) da Silva.
-- U Mail to ...!uunet!sugar!peter, flames to alt.dev.null.
-- "Running OS/2 on a '386 is like pulling your camper with an Indy car"
More information about the Comp.sources.misc
mailing list