1:- module( lib, [lib/1,lib/2] ). 2 3% :- dynamic( lib_mkdoc:lib_index/5 ). 4lib( _, _ ). % fixme 5 6lib( Lib ) :- 7 catch( use_module(library(Lib)), _, fail ), 8 !. 9/* 10lib( Pn/Pa ) :- 11 lib_mkdoc:lib_index(Pn,Pa,_,_,File), 12 !, 13 lib_mkdoc:loc(Dir,Out), 14 directory_file_path( Dir, File, AbsStem ), 15 file_name_extension( AbsStem, pl, AbsF ), 16 open( AbsF, read, In ), 17 copy_stream_data( In, Out ), 18 close( In ), 19 nl( Out ). 20 */ 21lib( _ )