Here is a predicate that uses an Object Expression:
Code: Select all
% -------------------------- PERFT -------------------------------
clauses
get_perft() = Object :-
if isErroneous(movelist_) then
calc_board()
end if,
Object =
implement : perft
clauses
perft(Depth, Divide) = Count :-
make_move_count := 0,
Count = calc_perft(Depth, 0, Divide),
calc_board().
clauses
new() :- allmoves := true.
end implement.
oe∙get_perft∙1010;13@board'c.scope
oe∙get_perft∙1010;13@board'p.scope
I simply delete all of the files in the "deb64" directory, and ZIP up my project (obviously I don't really need to backup those file anyways). I've had the issue for a while but haven't reported since it is such a small issue, but I thought you should be aware of the ZIP issue.
Sincerely,
Craig Hoibakk