Jak podzielić długą listę na kawałki w Qore

Question

Chciałbym podzielić listę na Qore tak:

list a = (1,2,3,4,5,6); 
list pieces = split_list_into_pieces(a, 2); 
printf("%y\n", pieces); 

pożądany wynik:

[[1,2], [3,4], [5,6]] 

Tj Chcę wziąć (podobno długą) listę i podzielić ją na fragmenty o zadanej (maksymalnej) długości.

mogę zrobić to lubią:

list sub split_list_into_pieces(list a, int length) 
{ 
    int i = 0; 
    list ret =(); 
    list temp =(); 
    foreach any x in (a) 
    { 
     temp += x; 
     i++; 
     if (i == length) 
     { 
      push ret, temp; 
      temp =(); 
      i = 0; 
     } 
    } 
    if (temp) 
    { 
     push ret, temp; 
    } 
    return ret; 
} 

Ale to nie jest bardzo elegancki, prawda?

Jakieś lepsze rozwiązanie?

Answer 1

można zrobić to w ten sposób:

list sub list_chunk(list a, int length) { 
    list result =(); 
    while (a) 
     push (result, extract (a, 0, length)); 
    return result; 
}