Skip to content

Instantly share code, notes, and snippets.

@kowey
Created October 21, 2014 11:04
Show Gist options
  • Star 0 You must be signed in to star a gist
  • Fork 0 You must be signed in to fork a gist
  • Save kowey/7c9b54f200853da8c939 to your computer and use it in GitHub Desktop.
Save kowey/7c9b54f200853da8c939 to your computer and use it in GitHub Desktop.
main :- do_loop(10).
do_loop(N) :- N =< 0.
do_loop(N) :-
jpl_new('java.lang.Integer', [0], _),
%garbage_collect_atoms,
statistics(atoms, NumAtoms),
write(NumAtoms), nl,
Nm1 is N-1,
do_loop(Nm1).
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment