From 5ed065f92d76d74369b9fefbc7e52cb024c2d0d4 Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?V=C3=ADtor=20Santos=20Costa?= Date: Mon, 5 Oct 2015 10:38:20 +0100 Subject: [PATCH] separated from debug.yap --- pl/spy.yap | 24 +++--------------------- 1 file changed, 3 insertions(+), 21 deletions(-) diff --git a/pl/spy.yap b/pl/spy.yap index 06b4f682b..a57ffc710 100644 --- a/pl/spy.yap +++ b/pl/spy.yap @@ -1,20 +1,3 @@ -/************************************************************************* -* * - * YAP Prolog * -* * - * Yap Prolog was developed at NCCUP - Universidade do Porto * -* * -* Copyright L.Damas, V.S.Costa and Universidade do Porto 1985-1997 * -* * -************************************************************************** -* * -* File: spy.pl * -* Last rev: * -* mods: * -* comments: YAP debugger: managing tracing and spy-points * -* * -*************************************************************************/ - :- system_module( '$_debug', [debug/0, debugging/0, leash/1, @@ -23,9 +6,8 @@ nospyall/0, notrace/0, (spy)/1, - trace/0], ['$do_spy'/4, - '$init_debugger'/0, - '$skipeol'/1]). + trace/0], [ + '$init_debugger'/0]). :- use_system_module( '$_boot', ['$find_goal_definition'/4, '$system_catch'/4]). @@ -89,7 +71,7 @@ mode and the existing spy-points, when the debugger is on. '__NB_setval__'('$debug_jump',false). - % setting and reseting spy points + % First part : setting and reseting spy points % $suspy does most of the work '$suspy'(V,S,M) :- var(V) , !,