Article View: comp.lang.misc
Article #8Re: Copmaring Power (Expressivity) of Two Languages
From: peter da silva
Date: Tue, 27 Oct 1992 16:34
Date: Tue, 27 Oct 1992 16:34
28 lines
1233 bytes
1233 bytes
In article <Bwqs8L.1v3@phage.cshl.org> boutell@isis.cshl.org (Tom Boutell) writes:
> So why haven't replaced C with Cterse:
> i m(){
> i x;
> f(x=0;(x<10);x++){
> pf("%d\n",x);
> }
> }
Too many characters!
: m 10 0 do i . cr loop ;
Or, in ratforth (yes, I really have a compiler for this):
def m {
do(0,10) {
.(i); cr;
}
}
Which compiles to the above Forth code.
--
/L{lineto}def /M{moveto}def 72 72 translate 24 24 scale newpath 0 19 M 0 25 L 4
21 L 0 16 M 5 16 L 8 13 L 4 13 L 1 16 L 8 13 M 8 8 L 12 8 M 12 13 L 10 8 M 12 8
L 10 6 L 8 8 L 10 8 L 20 16 M 15 16 L 12 13 L 16 13 L 19 16 L 20 19 M 20 25 L
16 21 L stroke showpage % Peter da Silva % 77487-5012 USA % +1 713 274 5180
Technical Details
Message-ID:
<id.LIGU.R93@ferranti.com>Path:
arc1-ca.pugleaf.net!sparky!uunet!ogicse!uwm.edu!zaphod.mps.ohio-state.edu!menudo.uh.edu!sugar!ficc!peterReferences:
<BwJ4Ms.1Mo@rice.edu> <1992Oct23.132146.20784@eua.ericsson.se> <Bwqs8L.1v3@phage.cshl.org>Show Full Headers
Complete Article Headers
Path: arc1-ca.pugleaf.net!sparky!uunet!ogicse!uwm.edu!zaphod.mps.ohio-state.edu!menudo.uh.edu!sugar!ficc!peter From: peter@ferranti.com (peter da silva) Newsgroups: comp.lang.misc,comp.programming Subject: Re: Copmaring Power (Expressivity) of Two Languages Message-ID: <id.LIGU.R93@ferranti.com> Date: 27 Oct 92 16:34:25 GMT Article-I.D.: ferranti.id.LIGU.R93 References: <BwJ4Ms.1Mo@rice.edu> <1992Oct23.132146.20784@eua.ericsson.se> <Bwqs8L.1v3@phage.cshl.org> Organization: Xenix Support, FICC Lines: 28