fix debugging info (obs from Jose Santos).
This commit is contained in:
parent
9f27ab5ab3
commit
1136597f6f
@ -178,7 +178,7 @@ find_free(Index, Size, Keys, NewIndex) :-
|
||||
|
||||
hash_f(Key, Size, Index, F) :-
|
||||
var(F), !,
|
||||
term_hash(Key,-1,Size,Index), writeln(Key:Index).
|
||||
term_hash(Key,-1,Size,Index).
|
||||
hash_f(Key, Size, Index, F) :-
|
||||
call(F, Key, Size, Index).
|
||||
|
||||
|
Reference in New Issue
Block a user