Alla faccia di discoteche, pub, bar......

[djordj]

Ogni tanto mi domando PERCHE' sei attratto dai linguaggi di programmazione che non servono a un cazzo...

Ogni tanto????

[diego72]

Ogni tanto????

Guarda, il prossimo con cui si cimenta è questo:
http://www.smalltalk.org/

[fedex]

Guarda, il prossimo con cui si cimenta è questo:
http://www.smalltalk.org/

Perchè mi hanno obbligato in università.

Devo realizzare un progetto sull'analisi dei grafi in LISP e in Prolog.
Se fosse per me scapperei sia da LISP sia da Prolog e comunque da ogni linguaggio che non sia imperativo e ad alto livello

[djordj]

Perchè mi hanno obbligato in università.

Devo realizzare un progetto sull'analisi dei grafi in LISP e in Prolog.
Se fosse per me scapperei sia da LISP sia da Prolog e comunque da ogni linguaggio che non sia imperativo e ad alto livello

LISP?

()(((((((((((())))))))))))((((((((((((((((((())))++=)))((()) ))

[diego72]

LISP?

()(((((((((((())))))))))))((((((((((((((((((())))++=)))((()) ))

Non va.
Devi mettere tutto tra parentesi.

[kabodie]

LISP?

()(((((((((((())))))))))))((((((((((((((((((())))++=)))((()) ))

vuoi mettere con questo?
http://it.wikipedia.org/wiki/Brainfuck

[Tubular]

Svaccatori che non siete altro.

[djordj]

vuoi mettere con questo?
http://it.wikipedia.org/wiki/Brainfuck

Ah sì, questo l'avevo già visto!

Potremmo iscrivere Fedex a questo concorso
http://www.de.ioccc.org/main.html

Uno dei vincitori dell'edizione 2005

typedef unsigned char B;B*x[]={
#include "dict.h"
0};typedef struct L{B*s;struct L*n;}L;
L*h[128],*l[128],*s[128],Z[sizeof x/sizeof*x],*F=Z;int c[256],m,a=1;
int k(B*q){int g=0;B*p=q;while(*p)g|=!c[*p++]--;return g-1&p-q;}
void u(B*p){while(*p)c[*p++]++;}
void S(int N,int r,int t,L*W){L*w;int i,n;
 for(n=r<N?r:N;n>0;n--)for(w=n==N?W:h[n];s[t]=w;u(w->s),w=w->n)if(k(w->s))
  if(n==r){if(t==m-1)for(i=a=0;i<=t;i++)printf("%s%c",s[i]->s,i<t?' ':'\n');}
  else if(t<m-1)S(n,r-n,t+1,s[t]=w);}
int main(int C,B**A){int i=0,g,n=0;B*p;while(--C)for(p=*++A;n<127&&*p;)c[*p++]++,n++;
 for(;p=x[i++];u(p))if(g=k(p))(l[g]=*(l[g]?&l[g]->n:&h[g])=F++)->s=p;
 while(++m<128)S(127,n,0,h[127]);
 return a;}

[djordj]

Guarda, il prossimo con cui si cimenta è questo:
http://www.smalltalk.org/

Uhm...

"Smalltalk is a computer language designed specifically for a wide range of humans rather than a narrow group of computer specialists."

Si presenta bene

[Thuban]

Che bello!!!l'importante è che tu stia bene..il resto non conta...