prolog_xref.pl -- Prolog cross-referencer data collection

This module implements to data-collection part of the cross-referencer. This code is used in two places:

• gxref/0 (part of XPCE) provides a graphical front-end for this module
• PceEmacs (also part of XPCE) uses the cross-referencer to color goals and predicates depending on their references.

bug

- meta_predicate/1 declarations take the module into consideration. Predicates that are both available as meta-predicate and normal (in different modules) are handled as meta-predicate in all places.

 prolog:called_by(+Goal, +Module, +Context, -Called) is semidet[multifile]

True when Called is a list of callable terms called from Goal, handled by the predicate Module:Goal and executed in the context of the module Context. Elements of Called may be qualified. If not, they are called in the context of the module Context.

 prolog:called_by(+Goal, -ListOfCalled)[multifile]

If this succeeds, the cross-referencer assumes Goal may call any of the goals in ListOfCalled. If this call fails, default meta-goal analysis is used to determine additional called goals.

deprecated

- New code should use prolog:called_by/4

 prolog:meta_goal(+Goal, -Pattern)[multifile]

Define meta-predicates. See the examples in this file for details.

 prolog:hook(Goal)[multifile]

True if Goal is a hook that is called spontaneously (e.g., from foreign code).

 hide_called(:Callable, +Src) is semidet[private]

True when the cross-referencer should not include Callable as being called. This is determined by the option register_called.

 built_in_predicate(+Callable)[private]

True if Callable is a built-in

 xref_source(+Source) is det

 xref_source(+Source, +Options) is det

Generate the cross-reference data for Source if not already done and the source is not modified. Checking for modifications is only done for files. Options processed:

silent(+Boolean)

If true (default false), emit warning messages.

module(+Module)

Define the initial context module to work in.

register_called(+Which)

Determines which calls are registerd. Which is one of all, non_iso or non_built_in.

comments(+CommentHandling)

How to handle comments. If store, comments are stored into the database as if the file was compiled. If collect, comments are entered to the xref database and made available through xref_mode/2 and xref_comment/4. If ignore, comments are simply ignored. Default is to collect comments.

process_include(+Boolean)

Process the content of included files (default is true).

Arguments:

Source

- File specification or XPCE buffer

 xref_cleanup(+State) is det[private]

Restore processing state according to the saved State.

 set_initial_mode(+Stream, +Options) is det[private]

Set the initial mode for processing this file in the cross-referencer. If the file is loaded, we use information from the previous load context, setting the appropriate module and dialect.

 xref_input_stream(-Stream) is det[private]

Current input stream for cross-referencer.

 xref_push_op(Source, +Prec, +Type, :Name)[private]

Define operators into the default source module and register them to be undone by pop_operators/0.

 xref_set_prolog_flag(+Flag, +Value, +Src, +Line)[private]

Called when a directive sets a Prolog flag.

 xref_clean(+Source) is det

Reset the database for the given source.

 xref_current_source(?Source)

Check what sources have been analysed.

 xref_done(+Source, -Time) is det

Cross-reference executed at Time

 xref_called(?Source, ?Called, ?By) is nondet

 xref_called(?Source, ?Called, ?By, ?Cond) is nondet

Enumerate the predicate-call relations. Predicate called by directives have a By '<directive>'.

 xref_defined(?Source, +Goal, ?How) is nondet

Test if Goal is accessible in Source. If this is the case, How specifies the reason why the predicate is accessible. Note that this predicate does not deal with built-in or global predicates, just locally defined and imported ones. How is one of of the terms below. Location is one of Line (an integer) or File:Line if the definition comes from an included (using :- include(File)) directive.

• dynamic(Location)
• thread_local(Location)
• multifile(Location)
• public(Location)
• local(Location)
• foreign(Location)
• constraint(Location)
• imported(From)

 xref_definition_line(+How, -Line)

If the 3th argument of xref_defined contains line info, return this in Line.

 xref_exported(?Source, ?Head) is nondet

True when Source exports Head.

 xref_module(?Source, ?Module) is nondet

True if Module is defined in Source.

 xref_uses_file(?Source, ?Spec, ?Path) is nondet

True when Source tries to load a file using Spec.

Arguments:

Spec	- is a specification for absolute_file_name/3
Path	- is either an absolute file name of the target file or the atom <not_found>.

 xref_op(?Source, Op) is nondet

Give the operators active inside the module. This is intended to setup the environment for incremental parsing of a term from the source-file.

Arguments:

Op	- Term of the form op(Priority, Type, Name)

 xref_prolog_flag(?Source, ?Flag, ?Value, ?Line) is nondet

True when Flag is set to Value at Line in Source. This is intended to support incremental parsing of a term from the source-file.

 collect(+Source, +File, +Stream, +Options)[private]

Process data from Source. If File \== Source, we are processing an included file. Stream is the stream from shich we read the program.

 update_condition(+Term) is det[private]

Update the condition under which the current code is compiled.

 current_condition(-Condition) is det[private]

Condition is the current compilation condition as defined by the :- if/1 directive and friends.

 process(+Term, +Comments, +TermPos, +Src) is det[private]

 xref_comments(+Comments, +FilePos, +Src) is det[private]

 xref_comment(?Source, ?Title, ?Comment) is nondet

Is true when Source has a section comment with Title and Comment

 xref_comment(?Source, ?Head, ?Summary, ?Comment) is nondet

Is true when Head in Source has the given PlDoc comment.

 xref_mode(?Source, ?Mode, ?Det) is nondet

Is true when Source provides a predicate with Mode and determinism.

 xref_option(?Source, ?Option) is nondet

True when Source was processed using Option. Options are defined with xref_source/2.

 process_meta_predicate(+Decl, +Src)[private]

Create meta_goal/3 facts from the meta-goal declaration.

 xref_meta(+Source, +Head, -Called) is semidet

True when Head calls Called in Source.

Arguments:

Called

- is a list of called terms, terms of the form Term+Extra or terms of the form //(Term).

 xref_meta(+Head, -Called) is semidet

 xref_meta_src(+Head, -Called, +Src) is semidet

True when Called is a list of terms called from Head. Each element in Called can be of the form Term+Int, which means that Term must be extended with Int additional arguments. The variant xref_meta/3 first queries the local context.

deprecated

- New code should use xref_meta/3.

To be done

- Split predifined in several categories. E.g., the ISO predicates cannot be redefined.

- Rely on the meta_predicate property for many predicates.

 head_of(+Rule, -Head)[private]

Get the head for a retract call.

 xref_hook(?Callable)

Definition of known hooks. Hooks that can be called in any module are unqualified. Other hooks are qualified with the module where they are called.

 arith_callable(+Spec, -Callable)[private]

Translate argument of arithmetic_function/1 into a callable term

 process_body(+Body, +Origin, +Src) is det[private]

Process a callable body (body of a clause or directive). Origin describes the origin of the call. Partial evaluation may lead to non-determinism, which is why we backtrack over process_goal/3.

We limit the number of explored paths to 100 to avoid getting trapped in this analysis.

 process_goal(+Goal, +Origin, +Src, ?Partial) is multi[private]

Xref Goal. The argument Partial is bound to true if there was a partial evalation inside Goal that has bound variables.

 process_dcg_goal(+Grammar, +Origin, +Src, ?Partial) is det[private]

Process meta-arguments that are tagged with //, such as phrase/3.

 variants(+SortedList, +Max, -Variants) is det[private]

 partial_evaluate(+Goal, ?Parrial) is det[private]

Perform partial evaluation on Goal to trap cases such as below.

      T = hello(X),
      findall(T, T, List),

To be done

- Make this user extensible? What about non-deterministic bindings?

 process_use_module(+Modules, +Src, +Rexport) is det[private]

 process_use_module2(+File, +Import, +Src, +Reexport) is det[private]

Process use_module/2 and reexport/2.

 xref_public_list(+Spec, +Source, +Options) is semidet

Find meta-information about File. This predicate reads all terms upto the first term that is not a directive. It uses the module and meta_predicate directives to assemble the information in Options. Options processed:

path(-Path)

Path is the full path name of the referenced file.

module(-Module)

Module is the module defines in Spec.

exports(-Exports)

Exports is a list of predicate indicators and operators collected from the module/2 term and reexport declarations.

public -Public

Public declarations of the file.

meta(-Meta)

Meta is a list of heads as they appear in meta_predicate/1 declarations.

silent(+Boolean)

Do not print any messages or raise exceptions on errors.

Arguments:

Source

- is the file from which Spec is referenced.

 xref_public_list(+File, -Path, -Export, +Src) is semidet

 xref_public_list(+File, -Path, -Module, -Export, -Meta, +Src) is semidet

 xref_public_list(+File, -Path, -Module, -Export, -Public, -Meta, +Src) is semidet

Find meta-information about File. This predicate reads all terms upto the first term that is not a directive. It uses the module and meta_predicate directives to assemble the information described below.

These predicates fail if File is not a module-file.

Arguments:

Path	- is the canonical path to File
Module	- is the module defined in Path
Export	- is a list of predicate indicators.
Meta	- is a list of heads as they appear in meta_predicate/1 declarations.
Src	- is the place from which File is referenced.

deprecated

- New code should use xref_public_list/3, which unifies all variations using an option list.

 except(+Remove, +AllExports, -Exports)[private]

 open_include_file(+Path, -In, -Refs)[private]

Opens an :- include(File) referenced file. Note that we cannot use prolog_open_source/2 because we should not safe/restore the lexical context.

 process_foreign(+Spec, +Src)[private]

Process a load_foreign_library/1 call.

 assert_called(+Src, +From, +Head) is det[private]

Assert the fact that Head is called by From in Src. We do not assert called system predicates.

 expand_hide_called(:Callable) is semidet[private]

Goals that should not turn up as being called. Hack. Eventually we should deal with that using an XPCE plugin.

 assert_import(+Src, +Import, +ExportList, +From, +Reexport) is det[private]

Asserts imports into Src. Import is the import specification, ExportList is the list of known exported predicates or unbound if this need not be checked and From is the file from which the public predicates come. If Reexport is true, re-export the imported predicates.

To be done

- Tighter type-checking on Import.

 process_import(:Import, +Src)[private]

Process an import/1 directive

 assert_xmodule_callable(PIs, Module, Src, From)[private]

We can call all exports and public predicates of an imported module using Module:Goal.

To be done

- Should we distinguish this from normal imported?

 assert_op(+Src, +Op) is det[private]

Arguments:

Op	- Ground term op(Priority, Type, Name).

 assert_module(+Src, +Module)[private]

Assert we are loading code into Module. This is also used to exploit local term-expansion and other rules.

 assert_module3(+Import, +Src)[private]

Handle 3th argument of module/3 declaration.

 process_predicates(:Closure, +Predicates, +Src)[private]

Process areguments of dynamic, etc., using call(Closure, PI, Src). Handles both lists of specifications and (PI,...) specifications.

 pi_to_head(+PI, -Head) is semidet[private]

Translate Name/Arity or Name//Arity to a callable term. Fails if PI is not a predicate indicator.

 generalise(+Callable, -General)[private]

Generalise a callable term.

 xref_source_file(+Spec, -File, +Src) is semidet

 xref_source_file(+Spec, -File, +Src, +Options) is semidet

Find named source file from Spec, relative to Src.

 canonical_source(?Source, ?Src) is det[private]

Src is the canonical version of Source if Source is given.

 goal_name_arity(+Goal, -Name, -Arity)[private]

Generalized version of functor/3 that can deal with name() goals.

 xref_source(+Source) is det

 xref_source(+Source, +Options) is det

Generate the cross-reference data for Source if not already done and the source is not modified. Checking for modifications is only done for files. Options processed:

silent(+Boolean)

If true (default false), emit warning messages.

module(+Module)

Define the initial context module to work in.

register_called(+Which)

Determines which calls are registerd. Which is one of all, non_iso or non_built_in.

comments(+CommentHandling)

How to handle comments. If store, comments are stored into the database as if the file was compiled. If collect, comments are entered to the xref database and made available through xref_mode/2 and xref_comment/4. If ignore, comments are simply ignored. Default is to collect comments.

process_include(+Boolean)

Process the content of included files (default is true).

Arguments:

Source

- File specification or XPCE buffer

 xref_called(?Source, ?Called, ?By) is nondet

 xref_called(?Source, ?Called, ?By, ?Cond) is nondet

Enumerate the predicate-call relations. Predicate called by directives have a By '<directive>'.

 xref_meta(+Head, -Called) is semidet[private]

 xref_meta_src(+Head, -Called, +Src) is semidet[private]

True when Called is a list of terms called from Head. Each element in Called can be of the form Term+Int, which means that Term must be extended with Int additional arguments. The variant xref_meta/3 first queries the local context.

deprecated

- New code should use xref_meta/3.

To be done

- Split predifined in several categories. E.g., the ISO predicates cannot be redefined.

- Rely on the meta_predicate property for many predicates.

 xref_public_list(+File, -Path, -Export, +Src) is semidet

 xref_public_list(+File, -Path, -Module, -Export, -Meta, +Src) is semidet

 xref_public_list(+File, -Path, -Module, -Export, -Public, -Meta, +Src) is semidet

Find meta-information about File. This predicate reads all terms upto the first term that is not a directive. It uses the module and meta_predicate directives to assemble the information described below.

These predicates fail if File is not a module-file.

Arguments:

Path	- is the canonical path to File
Module	- is the module defined in Path
Export	- is a list of predicate indicators.
Meta	- is a list of heads as they appear in meta_predicate/1 declarations.
Src	- is the place from which File is referenced.

deprecated

- New code should use xref_public_list/3, which unifies all variations using an option list.

 xref_public_list(+File, -Path, -Export, +Src) is semidet

 xref_public_list(+File, -Path, -Module, -Export, -Meta, +Src) is semidet

 xref_public_list(+File, -Path, -Module, -Export, -Public, -Meta, +Src) is semidet

Find meta-information about File. This predicate reads all terms upto the first term that is not a directive. It uses the module and meta_predicate directives to assemble the information described below.

These predicates fail if File is not a module-file.

Arguments:

Path	- is the canonical path to File
Module	- is the module defined in Path
Export	- is a list of predicate indicators.
Meta	- is a list of heads as they appear in meta_predicate/1 declarations.
Src	- is the place from which File is referenced.

deprecated

- New code should use xref_public_list/3, which unifies all variations using an option list.

 xref_source_file(+Spec, -File, +Src) is semidet

 xref_source_file(+Spec, -File, +Src, +Options) is semidet

Find named source file from Spec, relative to Src.

Undocumented predicates

The following predicates are exported, but not or incorrectly documented.

 xref_used_class(Arg1, Arg2)

 xref_built_in(Arg1)

 xref_defined_class(Arg1, Arg2, Arg3)