• [^] # /love goto

    Posté par (site web personnel, Mastodon) . En réponse au journal <3 goto. Évalué à 6.

    Oh merci, très bonne lecture ce papier !

    Cet article m’a fait découvrir ioccc.org/1987/hines.c :

    #include <stdio.h>
    #include <malloc.h>
    main(togo,toog)
    int togo;
    char *toog[];
    {char *ogto, tgoo[80];FILE *ogot; int oogt=0, ootg, otog=79,
    ottg=1;if ( togo== ottg) goto gogo; goto goog; ggot:
    if ( fgets( tgoo, otog, ogot)) goto gtgo; goto gott;
    gtot: exit(); ogtg: ++oogt; goto ogoo; togg: if ( ootg > 0)
    goto oggt; goto ggot; ogog: if ( !ogot) goto gogo;
    goto ggto; gtto: printf( "%d goto \'s\n", oogt); goto
    gtot; oggt: if ( !memcmp( ogto, "goto", 4)) goto otgg;
    goto gooo; gogo: exit( ottg); tggo: ootg= strlen(tgoo);
    goto tgog; oogo: --ootg; goto togg; gooo: ++ogto; goto
    oogo; gott: fclose( ogot); goto gtto; otgg: ogto= ogto +3;
    goto ogtg; tgog: ootg-=4;goto togg; gtgo: ogto= tgoo;
    goto tggo; ogoo: ootg-=3;goto gooo; goog: ogot= fopen(
    toog[ ottg], "r"); goto ogog; ggto: ogto= tgoo; goto
    ggot;}
    

    ce commentaire est sous licence cc by 4 et précédentes