summaryrefslogtreecommitdiff
path: root/c/bfhello/bfhello.c
blob: 95d22097e2eeca1355d28a286c253d02b04989dd (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
/* This is a translation of bfhello.b, generated by bftoc.py (by Paul Kaefer)
 * It was generated on Sunday, May 17, 2026 at 12:17AM
 */

#include "rvcontroller-ecalls.h"

void main(void)
{
    int size = 1000;
    int tape[size];
    int i = 0;

    /* Clearing the tape (array) */
    for (i=0; i<size; i++)
        tape[i] = 0;

    int ptr = 0;

    tape[ptr] += 8;
    while (tape[ptr] != 0)
    {
        ptr += 1;
        tape[ptr] += 9;
        ptr -= 1;
        tape[ptr] -= 1;
    }
    ptr += 1;
    printchar(tape[ptr]);
    tape[ptr] += 29;
    printchar(tape[ptr]);
    tape[ptr] += 7;
    printchar(tape[ptr]);
    printchar(tape[ptr]);
    tape[ptr] += 3;
    printchar(tape[ptr]);
    ptr += 1;
    tape[ptr] += 4;
    while (tape[ptr] != 0)
    {
        ptr += 1;
        tape[ptr] += 8;
        ptr -= 1;
        tape[ptr] -= 1;
    }
    ptr += 1;
    printchar(tape[ptr]);
    ptr += 1;
    tape[ptr] += 5;
    while (tape[ptr] != 0)
    {
        ptr -= 1;
        tape[ptr] += 11;
        ptr += 1;
        tape[ptr] -= 1;
    }
    ptr -= 1;
    printchar(tape[ptr]);
    ptr += 1;
    tape[ptr] += 4;
    while (tape[ptr] != 0)
    {
        ptr -= 1;
        tape[ptr] += 6;
        ptr += 1;
        tape[ptr] -= 1;
    }
    ptr -= 1;
    printchar(tape[ptr]);
    tape[ptr] += 3;
    printchar(tape[ptr]);
    tape[ptr] -= 6;
    printchar(tape[ptr]);
    tape[ptr] -= 8;
    printchar(tape[ptr]);
    ptr += 1;
    tape[ptr] += 3;
    while (tape[ptr] != 0)
    {
        ptr += 1;
        tape[ptr] += 11;
        ptr -= 1;
        tape[ptr] -= 1;
    }
    ptr += 1;
    printchar(tape[ptr]);
    ptr += 1;
    tape[ptr] += 10;
    printchar(tape[ptr]);
    return;
}