Mercurial > hg > CbC > CbC_gcc
comparison gcc/function.c @ 127:4c56639505ff
fix function.c and add CbC-example Makefile
author | mir3636 |
---|---|
date | Wed, 11 Apr 2018 18:46:58 +0900 |
parents | ab0bcb71f44d |
children | d34655255c78 |
comparison
equal
deleted
inserted
replaced
126:5d30d517ebed | 127:4c56639505ff |
---|---|
3666 assign_parm_setup_stack (&all, pbdata->bounds_parm, | 3666 assign_parm_setup_stack (&all, pbdata->bounds_parm, |
3667 &pbdata->parm_data); | 3667 &pbdata->parm_data); |
3668 } | 3668 } |
3669 } | 3669 } |
3670 | 3670 |
3671 #ifndef noCbC | |
3672 #include "c/cbc-tree.h" | |
3673 #endif | |
3674 | |
3671 /* Assign RTL expressions to the function's parameters. This may involve | 3675 /* Assign RTL expressions to the function's parameters. This may involve |
3672 copying them into registers and using those registers as the DECL_RTL. */ | 3676 copying them into registers and using those registers as the DECL_RTL. */ |
3673 | 3677 |
3674 static void | 3678 static void |
3675 assign_parms (tree fndecl) | 3679 assign_parms (tree fndecl) |
3872 | 3876 |
3873 set_parm_rtl (result, x); | 3877 set_parm_rtl (result, x); |
3874 } | 3878 } |
3875 | 3879 |
3876 #ifndef noCbC | 3880 #ifndef noCbC |
3877 // if (CbC_IS_CODE_SEGMENT(TREE_TYPE(fndecl)) ) | 3881 if (CbC_IS_CODE_SEGMENT(TREE_TYPE(fndecl)) ) |
3878 // all.stack_args_size.constant = CbC_STACK_SIZE; | 3882 all.stack_args_size.constant = CbC_PRETENDED_STACK_SIZE; |
3879 #endif | 3883 #endif |
3880 | 3884 |
3881 /* We have aligned all the args, so add space for the pretend args. */ | 3885 /* We have aligned all the args, so add space for the pretend args. */ |
3882 crtl->args.pretend_args_size = all.pretend_args_size; | 3886 crtl->args.pretend_args_size = all.pretend_args_size; |
3883 all.stack_args_size.constant += all.extra_pretend_bytes; | 3887 all.stack_args_size.constant += all.extra_pretend_bytes; |