summaryrefslogtreecommitdiff
path: root/save.pl
diff options
context:
space:
mode:
Diffstat (limited to 'save.pl')
-rw-r--r--save.pl3
1 files changed, 3 insertions, 0 deletions
diff --git a/save.pl b/save.pl
index 5990d16..2e192b4 100644
--- a/save.pl
+++ b/save.pl
@@ -81,9 +81,12 @@ chain_atom_x(C, A0, A) :-
).
commit(Msg) :-
+ write('creating process'), nl,
process_create(path(git), ['commit', '-m', Msg],
[process(PID)]),
+ write(waiting), nl,
process_wait(PID, S),
+ write(waited), nl,
commited(S).
commited(1) :-