diff options
Diffstat (limited to 'erts/lib_src/yielding_c_fun/test/examples/nested_call_consume_reds.c')
-rw-r--r-- | erts/lib_src/yielding_c_fun/test/examples/nested_call_consume_reds.c | 91 |
1 files changed, 91 insertions, 0 deletions
diff --git a/erts/lib_src/yielding_c_fun/test/examples/nested_call_consume_reds.c b/erts/lib_src/yielding_c_fun/test/examples/nested_call_consume_reds.c new file mode 100644 index 0000000000..239de1a334 --- /dev/null +++ b/erts/lib_src/yielding_c_fun/test/examples/nested_call_consume_reds.c @@ -0,0 +1,91 @@ +/* + * %CopyrightBegin% + * + * Copyright Ericsson AB and Kjell Winblad 2019. All Rights Reserved. + * + * Licensed under the Apache License, Version 2.0 (the "License"); + * you may not use this file except in compliance with the License. + * You may obtain a copy of the License at + * + * http://www.apache.org/licenses/LICENSE-2.0 + * + * Unless required by applicable law or agreed to in writing, software + * distributed under the License is distributed on an "AS IS" BASIS, + * WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied. + * See the License for the specific language governing permissions and + * limitations under the License. + * + * %CopyrightEnd% + */ + +/* + * Description: + * + * Author: Kjell Winblad + * + */ + +#include <stdio.h> +#include <stdlib.h> + +#define YCF_YIELD() +#define YCF_CONSUME_REDS(X) + +int sub_fun(int x){ + int i; + int count = 0; + for(i = 0; i < 100; i++){ + count = count + 2; + YCF_CONSUME_REDS(10); + } + return count + x; +} + +int fun(int x){ + int ret; + ret = sub_fun(x); + return ret; +} + +void* allocator(size_t size, void* context){ + (void)context; + return malloc(size); +} + +void freer(void* data, void* context){ + (void)context; + free(data); +} + +int main( int argc, const char* argv[] ) +{ +#ifdef YCF_YIELD_CODE_GENERATED + void* wb = NULL; +#endif + int ret = 0; + int nr_of_yields = 0; + long nr_of_reductions; +#ifdef YCF_YIELD_CODE_GENERATED + do{ + nr_of_reductions = 101; + ret = fun_ycf_gen_yielding(&nr_of_reductions,&wb,NULL,allocator,freer,NULL,0,NULL,1); + if(wb != NULL){ + printf("TRAPPED %ld\n", nr_of_reductions); + nr_of_yields++; + } + }while(wb != NULL); + if(wb != NULL){ + free(wb); + } +#else + ret = fun(1); +#endif + printf("Number of yields %d\n", nr_of_yields); + printf("RETURNED %d\n", ret); + if(ret != 201){ + return 1; + }else{ + return 0; + } +} + |