Правило Геррита Пролога - адекватное определение количества голосов - PullRequest
0 голосов
/ 11 июня 2018

Я хочу создать следующее правило:

  • Патч станет доступным только для 3 голосов и более с +1, но НЕ ДОЛЖЕН БЫТЬ голос с +2, только голосас +1 будет рассматриваться для этого критерия.

Правило, которое у меня есть:

% rule      : 1+1+1=2 Code-Review                                       
% rationale : introduce accumulative voting to determine if a change    
%             is submittable or not and make the change submittable        
%             if the total score is 3 or higher.                                                                                                                                                                   

sum_list([], 0).                                                        
sum_list([H | Rest], Sum) :- sum_list(Rest,Tmp), Sum is H + Tmp.        

add_category_min_score(In, Category, Min,  P) :-                        
    findall(X, gerrit:commit_label(label(Category,X),R),Z),             
    sum_list(Z, Sum),                                                   
    Sum >= Min, !,                                                      
    gerrit:commit_label(label(Category, V), U),                         
    V >= 1,                                                             
    !,                                                                  
    P = [label(Category,ok(U)) | In].                                   

add_category_min_score(In, Category,Min,P) :-                           
    P = [label(Category,need(Min)) | In].                               

submit_rule(S) :-                                                       
    gerrit:default_submit(X),                                           
    X =.. [submit | Ls],                                                
    gerrit:remove_label(Ls,label('Code-Review',_),NoCR),                
    add_category_min_score(NoCR,'Code-Review', 3, Labels),              
    S =.. [submit | Labels].

это правило не работает вообще, проблема с +2голос.Как я могу переработать это правило, чтобы оно работало так, как я хочу?

1 Ответ

0 голосов
/ 28 мая 2019

Таким образом, вы хотите, чтобы минимум три обозревателя, которые могут добавлять +1 и +2, не допускаются.

Что если вы удалите права разработчиков, чтобы дать +2 из конфигурации проекта, и будете использовать пролог поваренную книгу, пример 13, с небольшиммодификации?

submit_rule(submit(CR)) :-
  sum(3, 'Code-Review', CR),
  % gerrit:max_with_block(-1, 1, 'Verified', V).

% Sum the votes in a category. Uses a helper function score/2
% to select out only the score values the given category.
sum(VotesNeeded, Category, label(Category, ok(_))) :-
  findall(Score, score(Category, Score), All),
  sum_list(All, Sum),
  Sum >= VotesNeeded,
  !.
sum(VotesNeeded, Category, label(Category, need(VotesNeeded))).

score(Category, Score) :-
  gerrit:commit_label(label(Category, Score), User).

% Simple Prolog routine to sum a list of integers.
sum_list(List, Sum)   :- sum_list(List, 0, Sum).
sum_list([X|T], Y, S) :- Z is X + Y, sum_list(T, Z, S).
sum_list([], S, S).
...