| 3118 | int32_t * num_arguments ); |
| 3119 | |
| 3120 | FUNCTION * function_builtin( LIST * ( * func )( FRAME * frame, int32_t flags ), |
| 3121 | int32_t flags, char const * * args ) |
| 3122 | { |
| 3123 | BUILTIN_FUNCTION * result = (BUILTIN_FUNCTION*)BJAM_MALLOC( sizeof( BUILTIN_FUNCTION ) ); |
| 3124 | result->base.type = FUNCTION_BUILTIN; |
| 3125 | result->base.reference_count = 1; |
| 3126 | result->base.rulename = 0; |
| 3127 | result->base.formal_arguments = arg_list_compile_builtin( args, |
| 3128 | &result->base.num_formal_arguments ); |
| 3129 | result->func = func; |
| 3130 | result->flags = flags; |
| 3131 | return (FUNCTION *)result; |
| 3132 | } |
| 3133 | |
| 3134 | FUNCTION * function_compile( PARSE * parse ) |
| 3135 | { |
no test coverage detected