Skip to content

Commit

Permalink
Attic Sync
Browse files Browse the repository at this point in the history
  • Loading branch information
TeamSPoon committed Dec 5, 2024
1 parent 875f357 commit b93b432
Show file tree
Hide file tree
Showing 6 changed files with 13,279 additions and 5 deletions.
8 changes: 8 additions & 0 deletions .Attic/metta_lang/corelib.metta.buffer~
Original file line number Diff line number Diff line change
@@ -0,0 +1,8 @@
afn_stem_filename('/home/deb12user/metta-wam/.Attic/metta_lang/corelib.metta','/home/deb12user/metta-wam/.Attic/metta_lang/corelib.metta','/home/deb12user/metta-wam/.Attic/metta_lang/corelib.metta').
:-multifile user:afn_stem_filename/3.
:-dynamic user:metta_file_buffer/7.
:-multifile user:metta_file_buffer/7.
user:metta_file_buffer(1,1000001,constant,'import!',[],'/home/deb12user/metta-wam/.Attic/metta_lang/corelib.metta',range(line_char(0,2),line_char(0,9))).
user:metta_file_buffer(1,1000001,constant,'stdlib_mettalog.metta',[],'/home/deb12user/metta-wam/.Attic/metta_lang/corelib.metta',range(line_char(0,10),line_char(0,31))).
user:metta_file_buffer(0,1000001,decl(import),exec(['import!','stdlib_mettalog.metta']),[],'/home/deb12user/metta-wam/.Attic/metta_lang/corelib.metta',range(line_char(0,0),line_char(0,32))).
user:metta_file_buffer(0,2000001,constant,end_of_file,[],'/home/deb12user/metta-wam/.Attic/metta_lang/corelib.metta',range(line_char(1,0),line_char(1,0))).
8 changes: 4 additions & 4 deletions .Attic/metta_lang/metta_interp.pl
Original file line number Diff line number Diff line change
Expand Up @@ -136,7 +136,7 @@
*/
%:- set_prolog_flag(debug_on_interrupt,true).
%:- set_prolog_flag(compile_meta_arguments,control).
:- (prolog_load_context(directory, Value);Value='.'), absolute_file_name('../../packs/',Dir,[relative_to(Value)]),
:- (prolog_load_context(directory, Value);Value='.'), absolute_file_name('../../libraries/',Dir,[relative_to(Value)]),
atom_concat(Dir,'predicate_streams',PS),
atom_concat(Dir,'logicmoo_utils',LU),
attach_packs(Dir,[duplicate(replace),search(first)]),
Expand Down Expand Up @@ -170,13 +170,13 @@
metta_root_dir(Dir):- is_metta_src_dir(Value), absolute_file_name('../../',Dir,[relative_to(Value)]).
metta_root_dir(Dir):- getenv('METTA_DIR',Dir),!.

metta_library_dir(Dir):- metta_root_dir(Value), absolute_file_name('./library/',Dir,[relative_to(Value)]).
metta_library_dir(Dir):- metta_root_dir(Value), absolute_file_name('./libraries/',Dir,[relative_to(Value)]).

metta_dir(Dir):- metta_library_dir(Value), absolute_file_name('./genome/',Dir,[relative_to(Value)]).
metta_dir(Dir):- metta_library_dir(Value), absolute_file_name('./loaders/genome/',Dir,[relative_to(Value)]).
metta_dir(Dir):- is_metta_src_dir(Dir).
metta_dir(Dir):- metta_library_dir(Dir).
metta_dir(Dir):- metta_root_dir(Dir).
metta_dir(Dir):- is_metta_src_dir(Value), absolute_file_name('../flybase/',Dir,[relative_to(Value)]).
%metta_dir(Dir):- is_metta_src_dir(Value), absolute_file_name('../flybase/',Dir,[relative_to(Value)]).

:- dynamic user:file_search_path/2.
:- multifile user:file_search_path/2.
Expand Down
Loading

0 comments on commit b93b432

Please sign in to comment.