qualify command-line specified goals with user: (#820)
This commit is contained in:
@@ -90,9 +90,9 @@ run_goals([g(Gs0)|Goals]) :-
|
|||||||
),
|
),
|
||||||
read_term_from_chars(Gs1, Goal),
|
read_term_from_chars(Gs1, Goal),
|
||||||
( catch(
|
( catch(
|
||||||
Goal,
|
user:Goal,
|
||||||
Exception,
|
Exception,
|
||||||
(write(Gs0), write(' causes: '), write(Exception), nl) % halt?
|
(write(Goal), write(' causes: '), write(Exception), nl) % halt?
|
||||||
)
|
)
|
||||||
; write('Warning: initialization failed for '),
|
; write('Warning: initialization failed for '),
|
||||||
write(Gs0), nl
|
write(Gs0), nl
|
||||||
|
|||||||
Reference in New Issue
Block a user