view paper/src/cbc_example_test.cbc @ 91:4232c9dc1431

update
author anatofuz <anatofuz@cr.ie.u-ryukyu.ac.jp>
date Fri, 05 Feb 2021 19:09:08 +0900
parents 45395005373f
children
line wrap: on
line source

extern int printf(const char*,...);

typedef struct test {
    int number;
    char* string;
} TEST;


__code codegear1(TEST);
__code codegear2(TEST);
__code codegear3(TEST);

__code codegear1(TEST testin){
    TEST testout;
    testout.number = testin.number + 1;
    testout.string = testin.string;
    goto codegear2(testout);
}

__code codegear2(TEST testin){
    TEST testout;
    testout.number = testin.number;
    testout.string = "Hello";
    goto codegear3(testout);
}

__code codegear3(TEST testin){
    printf("number = %d\t string= %s\n",testin.number,testin.string);
    goto exit(0);
}

int main(){
    TEST test = {0,0};
    goto codegear1(test);
}