local result = ; local element ; for element in $(B) { if ! ( $(element) in $(A) ) { result += $(element) ; } } return $(result) ; */
| 18 | return $(result) ; |
| 19 | */ |
| 20 | LIST *set_difference( FRAME *frame, int flags ) |
| 21 | { |
| 22 | |
| 23 | LIST* b = lol_get( frame->args, 0 ); |
| 24 | LIST* a = lol_get( frame->args, 1 ); |
| 25 | |
| 26 | LIST* result = L0; |
| 27 | LISTITER iter = list_begin( b ), end = list_end( b ); |
| 28 | for( ; iter != end; iter = list_next( iter ) ) |
| 29 | { |
| 30 | if (!list_in(a, list_item(iter))) |
| 31 | result = list_push_back(result, object_copy(list_item(iter))); |
| 32 | } |
| 33 | return result; |
| 34 | } |
| 35 | |
| 36 | void init_set() |
| 37 | { |
nothing calls this directly
no test coverage detected