1  typedef struct gfc_formal_arglist
       2  {
       3    int next;
       4  }
       5  gfc_actual_arglist;
       6  update_arglist_pass (gfc_actual_arglist* lst, int po, unsigned argpos,
       7         const char *name)
       8  {
       9    ((void)(__builtin_expect(!(argpos > 0), 0) ? __builtin_unreachable(), 0 : 0));
      10    if (argpos == 1)
      11        return 0;
      12    if (lst)
      13      lst->next = update_arglist_pass (lst->next, po, argpos - 1, name);
      14    else
      15      lst = update_arglist_pass (((void *)0), po, argpos - 1, name);
      16  }