1つの簡単なGOTOでプログラムを構築する

あなたの仕事は、プログラム全体（または少なくともその大部分）を完全に再構築しなければならないGOTOを1つだけ使用することができる最大のプログラムを構築することです。スコアは、GOTOなしでコードが再構築されたときに、場所を変更したり、新しく導入された（ステートメントを削除してもスコアに追加されない）コード内のステートメントの数としてカウントされます（他のユーザーは、エレガントなもの）。これはコードボウリングなので、最高得点が勝ちます。

注：この挑戦を試みることによって、ヴェロキラプトル攻撃に対する責任を主張しません。

C fizzbuzz

このソリューションは、割り込みとラベル変数（gccのみ、申し訳ありません）のアイデアを回避します。プログラムは、定期的にmainを呼び出すタイマーを設定します。ここで、割り込みハンドラー（main）の最後の実行が必要な場所に移動します。

私はタイマーやラベル変数を使用したことがないので、ここにはたくさんのことを考えています。

#include <sys/time.h>
#include <signal.h>
#include <stdio.h>

int main(int argc)
{
    static int run = 1;
    static int* gotoloc = &&init;
    static int num = 0;
    static int limit = 50;

    goto *gotoloc;
init:
    signal(SIGVTALRM, (void (*)(int)) main);
    gotoloc = &&loop;

    struct itimerval it_val;

    it_val.it_value.tv_sec = 0;
    it_val.it_value.tv_usec = 100000;
    it_val.it_interval.tv_sec = 0;
    it_val.it_interval.tv_usec = 100000;
    setitimer(ITIMER_VIRTUAL, &it_val, NULL);

    while(run);

loop:
    num = num + 1;
    run = num < limit;
    gotoloc = &&notfizz + (&&fizz - &&notfizz) * !(num % 3);
    return 1;

fizz:
    printf("fizz");
    gotoloc = &&notbuzz + (&&buzz - &&notbuzz) * !(num % 5);
    return 1;

notfizz:
    gotoloc = &&notfizzbuzz + (&&buzz - &&notfizzbuzz) * !(num % 5);
    return 1;

buzz:
    printf("buzz\n");
    gotoloc = &&loop;
    return 1;

notbuzz:
    printf("\n");
    gotoloc = &&loop;
    return 1;

notfizzbuzz:
    printf("%d\n", num);
    gotoloc = &&loop;
    return 1;
}

Perl

私はボウリングがあまり得意ではありませんが、これはOPに興味があるかもしれません。これは、変数gotoを使用したエラトステネスのふるいです。これが「リファクタリング」された場合、おそらく最初の数行を除いて、再利用可能になるとは思いません。Sieveが終了すると1、@primes配列内の残りのsはすべて素数に対応します。

追加の楽しみのために、AND、OR、三項、条件、またはあらゆる種類の比較演算子は使用されません。

@primes[2..1e4]=(1)x9999;
$a=2;
Y:
  $b=$a*~-$a;
X:
  $primes[$b+=$a+=$c=$a/100%2+$b/1e4%2]=0;
  goto"$c"^h;
Z:

C

私のマクロの使用法は、おそらく「1つのGOTO」にしません。
そしてそれは非常に短いので、「完全に再構築された」ことはそれほど多くありません。
とにかく、これが私の試みです。

標準入力から数値を読み取り、それをmodulu 3で出力します。

int main() {
    char s[100], *p, r=0;
    void *pl[] = { &&a, &&b, &&c, &&d, &&e, &&f, &&g, &&h, &&i, &&j, &&a, &&b, &&x, &&y, &&z }, *p1;
    p = gets(s);
    #define N(n) (pl+n)[!*p*60+*p-48];p++;goto *p1
    a: p1=N(0);
    b: p1=N(1);
    c: p1=N(2);
    d: p1=N(0);
    e: p1=N(1);
    f: p1=N(2);
    g: p1=N(0);
    h: p1=N(1);
    i: p1=N(2);
    j: p1=N(0);
    z: r++;
    y: r++;
    x: printf("%d\n", r);

    return 0;
}