:-(module(source_processor)).
:-(export(','(/(source_open,3),','(/(source_read,4),/(source_close,2))))).
:-(export(struct(source_position(filespec,stream,file,line,offset,remaining_files,included_from,options,created_modules,oldcwd,module,ifdefs,old_compiled_stream)))).
:-(export(struct(source_term(term,vars,annotated)))).
:-(import(from(','(/(expand_clause_annotated,4),','(/(expand_goal_annotated,4),','(/(expand_macros_annotated,4),','(/(erase_module_pragmas,1),/(register_compiled_stream,1))))),sepia_kernel))).
:-(local(struct(options(keep_comments,ignore_conditionals,include_comment_files,recreate_modules,no_macro_expansion,no_clause_expansion,goal_expansion,with_annotations)))).
:-(tool(/(source_open,3),/(source_open,4))).
:-(:(sepia_kernel,store_pred(/(do__1,2),[](o(212),a(3),o(122),a(1),ref(26),ref(13),ref(fail),o(128),0,3,ref(24),o(10),a(1),o(6),pw(1),a(3),y(1),o(143),proc(/(true,0)),3,o(204),y(1),pw(0),o(154),o(134),0,o(136),pw(2),o(15),a(1),ref(36),o(368),a(1),y(2),o(139),ref(39),o(365),a(1),y(2),o(3),a(2),y(1),o(143),proc(/(set_option,2)),7,o(353),y(2),a(1),y(1),a(2),o(144),ref(0),o(0)),53,0,0,0,0,0))).
?-(set_flag(/(do__1,2),auxiliary,on)).
:-(:(sepia_kernel,store_pred(/(source_open,4),[](o(136),pw(7),o(203),y(1),o(124),a(3),ref(91),ref(91),ref(91),ref(91),ref(91),ref(91),ref(91),ref(91),ref(91),ref(91),ref(91),ref(91),ref(19),o(128),0,4,ref(88),o(298),a(3),o(352),4,a(1),y(3),o(285),a(2),y(7),o(395),y(4),a(1),proc(/(do__1,2)),251,o(204),y(1),pw(7),o(203),y(2),o(128),0,0,ref(66),o(101),a(2),o(101),a(3),o(353),y(3),a(1),y(7),a(4),o(351),2,y(5),a(5),o(143),proc(/(source_open,6)),5,o(204),y(2),pw(0),o(154),o(199),0,121,o(107),a(2),functor(/(source_open,3)),o(80),y(3),o(80),y(4),o(80),y(5),o(102),a(1),171,o(404),a(4),source_processor,o(397),y(6),a(3),proc(:(sepia_kernel,/(error_,4))),o(199),0,1,o(2),a(2),a(5),o(107),a(2),functor(/(source_open,3)),o(79),a(1),o(79),a(5),o(79),a(3),o(102),a(1),6,o(2),a(4),a(3),o(404),a(4),source_processor,o(145),proc(:(sepia_kernel,/(error_,4))),o(0)),115,0,0,'Compiler/source_processor.ecl',0,0))).
:-(:(sepia_kernel,store_pred(/(source_open,6),[](o(299),a(1),o(6),pw(19),a(1),y(6),o(352),5,a(2),y(7),o(399),a(1),y(12),proc(/(getcwd,1)),8129,o(206),y(6),ref(fail),ref(430),ref(fail),ref(fail),ref(109),ref(fail),ref(fail),ref(fail),ref(fail),ref(109),ref(fail),ref(425),ref(30),o(4),y(6),a(4),o(16),a(4),functor(/(stream,1)),ref(41),o(41),y(4),o(139),ref(43),o(42),y(4),o(104),a(2),device,o(285),a(3),y(15),o(395),y(4),a(1),proc(/(get_stream_info,3)),40913,o(125),y(15),ref(436),1,ref(59),o(288),y(15),y(5),o(139),ref(205),o(4),y(15),a(4),o(20),a(4),file,o(104),a(2),name,o(285),a(3),y(16),o(395),y(4),a(1),proc(/(get_stream_info,3)),73681,o(106),a(1),o(80),y(16),o(85),o(399),a(2),y(5),proc(/(concat_atom,2)),8177,o(139),ref(205),o(4),y(6),a(1),o(20),a(1),user,o(104),a(2),input,o(355),a(2),y(4),a(1),y(5),o(139),ref(205),o(203),y(19),o(206),y(6),ref(fail),ref(126),ref(fail),ref(fail),ref(221),ref(fail),ref(fail),ref(fail),ref(fail),ref(214),ref(fail),ref(214),ref(126),o(4),y(6),a(1),o(16),a(1),functor(/(library,1)),ref(134),o(33),o(204),y(19),pw(18),o(104),a(1),prolog_suffix,o(285),a(2),y(18),o(404),a(3),source_processor,o(143),proc(:(sepia_kernel,/(get_flag_body,3))),270273,o(203),y(17),o(106),a(3),o(61),readable,o(85),o(285),a(4),y(16),o(353),y(6),a(1),y(18),a(2),o(143),proc(/(existing_file,4)),204737,o(204),y(17),pw(16),o(285),a(2),y(5),o(395),y(16),a(1),proc(/(canonical_path_name,2)),8161,o(376),a(3),a(4),o(285),a(2),y(15),o(395),y(5),a(1),proc(/(pathname,4)),40929,o(395),y(15),a(1),proc(/(cd,1)),8161,o(104),a(2),read,o(285),a(3),y(4),o(395),y(5),a(1),proc(/(open,3)),8177,o(203),y(14),o(167),y(8),ref(269),ref(228),ref(269),o(139),ref(269),o(4),y(6),a(1),o(300),a(1),o(139),ref(134),o(4),y(6),a(1),o(306),a(1),o(139),ref(134),o(128),0,0,ref(266),o(4),y(8),a(2),o(17),a(2),o(399),a(1),y(3),proc(/(compiled_stream,1)),24569,o(204),y(14),pw(13),o(395),y(4),a(1),proc(/(register_compiled_stream,1)),8185,o(203),y(13),o(128),0,0,ref(275),o(395),y(4),a(1),proc(/(skip_utf8_bom,1)),16377,o(204),y(13),pw(12),o(139),ref(278),o(199),0,8177,o(193),pw(1),o(286),y(3),o(139),ref(245),o(199),0,8185,o(4),y(9),a(2),o(16),a(2),functor(/(options,8)),ref(312),o(349),pw(4),o(37),a(1),o(349),pw(3),o(124),a(1),ref(335),ref(335),ref(335),ref(335),ref(335),ref(335),ref(335),ref(335),ref(335),ref(335),ref(335),ref(335),ref(310),o(139),ref(310),o(298),a(1),o(139),ref(346),o(265),pw(4),o(38),a(1),o(124),a(1),ref(335),ref(335),ref(335),ref(335),ref(335),ref(335),ref(335),ref(335),ref(335),ref(335),ref(335),ref(335),ref(310),o(139),ref(310),o(139),ref(308),o(104),a(2),macro_expansion,o(104),a(3),off,o(395),y(4),a(1),proc(/(set_stream_property,3)),8185,o(104),a(2),offset,o(285),a(3),y(2),o(395),y(4),a(1),proc(/(get_stream_info,3)),8189,o(104),a(2),line,o(285),a(3),y(1),o(395),y(4),a(1),proc(/(get_stream_info,3)),8191,o(4),y(10),a(1),o(16),a(1),functor(/(source_position,13)),ref(400),o(47),y(6),o(47),y(4),o(47),y(5),o(47),y(1),o(47),y(2),o(47),y(7),o(47),y(8),o(47),y(9),o(55),o(47),y(12),o(47),y(11),o(55),o(47),y(3),o(154),o(48),y(6),o(48),y(4),o(48),y(5),o(48),y(1),o(48),y(2),o(48),y(7),o(48),y(8),o(48),y(9),o(56),o(48),y(12),o(48),y(11),o(56),o(48),y(3),o(154),o(125),y(6),ref(438),1,ref(109),o(126),y(6),ref(440),2,ref(fail),o(0),table([-(file,ref(64))],2),table([-(user,ref(93))],2),table([-(/(stream,1),ref(30)),-(/(library,1),ref(109))],4)),444,0,0,'Compiler/source_processor.ecl',0,0))).
:-(:(sepia_kernel,store_pred(/(set_option,2),[](o(121),a(1),ref(172),9,ref(fail),o(298),a(1),o(163),o(13),a(1),keep_comments,o(16),a(2),functor(/(options,8)),ref(20),o(61),true,o(349),pw(7),o(157),o(62),true,o(157),o(13),a(1),ignore_conditionals,o(16),a(2),functor(/(options,8)),ref(36),o(33),o(61),true,o(349),pw(6),o(157),o(34),o(62),true,o(157),o(13),a(1),recreate_modules,o(16),a(2),functor(/(options,8)),ref(54),o(349),pw(3),o(61),true,o(349),pw(4),o(157),o(265),pw(3),o(62),true,o(157),o(13),a(1),no_macro_expansion,o(16),a(2),functor(/(options,8)),ref(73),o(349),pw(4),o(61),true,o(349),pw(3),o(157),o(265),pw(4),o(62),true,o(157),o(13),a(1),minimal_macro_expansion,o(16),a(2),functor(/(options,8)),ref(92),o(349),pw(4),o(61),minimal,o(349),pw(3),o(157),o(265),pw(4),o(62),minimal,o(157),o(13),a(1),no_clause_expansion,o(16),a(2),functor(/(options,8)),ref(111),o(349),pw(5),o(61),true,o(349),pw(2),o(157),o(265),pw(5),o(62),true,o(157),o(13),a(1),goal_expansion,o(16),a(2),functor(/(options,8)),ref(129),o(349),pw(6),o(61),true,o(33),o(157),o(265),pw(6),o(62),true,o(157),o(13),a(1),with_annotations,o(16),a(2),functor(/(options,8)),ref(146),o(349),pw(7),o(61),true,o(157),o(265),pw(7),o(62),true,o(157),o(13),a(1),include_comment_files,o(16),a(2),functor(/(options,8)),ref(165),o(349),pw(2),o(61),true,o(349),pw(5),o(157),o(265),pw(2),o(62),true,o(157),o(0),o(177),table([-(include_comment_files,ref(154)),-(minimal_macro_expansion,ref(81)),-(with_annotations,ref(137)),-(no_clause_expansion,ref(100)),-(no_macro_expansion,ref(62)),-(ignore_conditionals,ref(26)),-(keep_comments,ref(11)),-(goal_expansion,ref(119)),-(recreate_modules,ref(43))],18)),190,0,0,'Compiler/source_processor.ecl',0,0))).
:-(:(sepia_kernel,store_pred(/(peek,2),[](o(128),0,2,ref(6),o(151),proc(/(get,2)),o(134),0,o(136),pw(0),o(143),proc(/(unget,1)),1,o(163),o(0)),15,0,0,'Compiler/source_processor.ecl',0,0))).
:-(:(sepia_kernel,store_pred(/(skip_utf8_bom,1),[](o(136),pw(2),o(203),y(1),o(3),a(1),y(2),o(102),a(2),239,o(143),proc(/(peek,2)),7,o(102),a(2),187,o(395),y(2),a(1),proc(/(peek,2)),7,o(102),a(2),191,o(395),y(2),a(1),proc(/(peek,2)),3,o(204),y(1),pw(0),o(154),o(0)),34,0,0,'Compiler/source_processor.ecl',0,0))).
:-(:(sepia_kernel,store_pred(/(do__2,1),[](o(212),a(2),o(122),a(1),ref(26),ref(13),ref(fail),o(128),0,2,ref(24),o(10),a(1),o(6),pw(1),a(2),y(1),o(143),proc(/(true,0)),3,o(204),y(1),pw(0),o(154),o(134),0,o(136),pw(2),o(15),a(1),ref(36),o(368),a(1),y(1),o(139),ref(39),o(365),a(1),y(1),o(203),y(2),o(128),0,1,ref(61),o(2),a(1),a(3),o(376),a(1),a(2),o(143),proc(/(current_compiled_file,3)),7,o(204),y(2),pw(1),o(396),y(1),a(1),ref(0),o(199),0,3,o(404),a(2),source_processor,o(143),proc(:(sepia_kernel,/(erase_module,2))),3,o(396),y(1),a(1),ref(0),o(0)),75,0,0,0,0,0))).
?-(set_flag(/(do__2,1),auxiliary,on)).
:-(:(sepia_kernel,store_pred(/(source_close,2),[](o(6),pw(3),a(1),y(2),o(3),a(2),y(3),o(143),proc(/(close_streams,1)),13,o(203),y(1),o(128),0,0,ref(28),o(104),a(1),keep_modules,o(395),y(3),a(2),proc(/(memberchk,2)),3,o(204),y(1),pw(0),o(154),o(199),0,5,o(4),y(2),a(2),o(340),9,a(2),a(1),18,o(145),proc(/(do__2,1)),o(0)),42,0,0,'Compiler/source_processor.ecl',0,0))).
:-(:(sepia_kernel,store_pred(/(close_streams,1),[](o(136),pw(3),o(16),a(1),functor(/(source_position,13)),ref(33),o(369),a(1),a(2),o(349),pw(4),o(41),y(1),o(349),pw(2),o(41),y(2),o(349),pw(2),o(41),y(3),o(143),proc(/(close_input,2)),15,o(167),y(1),ref(29),ref(58),ref(29),o(396),y(1),a(1),ref(0),o(366),a(1),a(2),o(265),pw(4),o(42),y(1),o(265),pw(2),o(42),y(2),o(265),pw(2),o(42),y(3),o(143),proc(/(close_input,2)),15,o(167),y(1),ref(29),ref(58),ref(29),o(139),ref(29),o(4),y(1),a(2),o(17),a(2),o(395),y(2),a(1),proc(/(cd,1)),9,o(397),y(3),a(1),proc(/(register_compiled_stream,1)),o(0)),73,0,0,'Compiler/source_processor.ecl',0,0))).
:-(:(sepia_kernel,store_pred(/(close_input,2),[](o(136),pw(3),o(203),y(2),o(3),a(1),y(1),o(2),a(2),a(1),o(128),0,1,ref(48),o(3),a(1),y(3),o(143),proc(/(current_stream,1)),15,o(107),a(2),functor(/(stream,1)),o(75),o(395),y(1),a(1),proc(/(\=,2)),13,o(204),y(2),pw(3),o(107),a(1),functor(/(close,1)),o(80),y(3),o(104),a(2),abort,o(104),a(3),true,o(404),a(4),source_processor,o(145),proc(:(sepia_kernel,/(block,4))),o(199),0,1,o(154),o(0)),53,0,0,'Compiler/source_processor.ecl',0,0))).
:-(:(sepia_kernel,store_pred(/(source_read,4),[](o(136),pw(24),o(16),a(1),functor(/(source_position,13)),ref(24),o(370),y(14),y(7),o(349),pw(3),o(370),y(12),y(13),o(370),y(11),y(10),o(370),y(9),y(8),o(349),pw(2),o(139),ref(38),o(367),y(14),y(7),o(265),pw(3),o(367),y(12),y(13),o(367),y(11),y(10),o(367),y(9),y(8),o(352),4,a(1),y(3),o(375),a(2),y(15),a(3),y(16),o(375),a(4),y(17),a(5),y(18),o(285),a(6),y(19),o(354),y(7),a(1),y(11),a(7),y(8),a(8),o(143),proc(/(read_next_term,8)),1048569,o(104),a(2),line,o(285),a(3),y(2),o(395),y(7),a(1),proc(/(get_stream_info,3)),1048573,o(104),a(2),offset,o(285),a(3),y(1),o(395),y(7),a(1),proc(/(get_stream_info,3)),1048575,o(212),a(1),o(206),y(18),ref(132),ref(132),ref(132),ref(132),ref(132),ref(132),ref(132),ref(132),ref(132),ref(132),ref(132),ref(132),ref(104),o(129),0,1,ref(219),o(343),0,ref(358),262143,o(343),0,ref(502),262143,o(343),0,ref(955),231807,o(343),0,ref(1193),231807,o(343),0,ref(1366),231807,o(344),0,ref(1662),229503,o(4),y(18),a(5),o(299),a(5),o(4),y(3),a(5),o(16),a(5),functor(/(source_position,13)),ref(165),o(369),a(5),a(6),o(37),a(7),o(349),pw(2),o(369),a(8),a(9),o(369),a(10),a(11),o(369),a(12),a(13),o(369),a(14),a(15),o(139),ref(184),o(366),a(5),a(6),o(38),a(7),o(265),pw(2),o(366),a(8),a(9),o(366),a(10),a(11),o(366),a(12),a(13),o(366),a(14),a(15),o(107),a(1),functor(/(source_position,13)),o(79),a(5),o(79),a(6),o(79),a(7),o(80),y(2),o(80),y(1),o(79),a(8),o(79),a(9),o(79),a(10),o(79),a(11),o(79),a(12),o(79),a(13),o(79),a(14),o(79),a(15),o(351),3,y(4),a(2),o(144),ref(0),o(4),y(19),a(2),o(299),a(2),o(403),a(1),pw(19),o(4),y(6),a(1),o(16),a(1),functor(/(source_term,3)),ref(240),o(43),a(2),o(55),o(33),o(139),ref(243),o(44),a(2),o(56),o(4),y(3),a(1),o(16),a(1),functor(/(source_position,13)),ref(271),o(369),a(1),a(2),o(37),a(3),o(349),pw(2),o(369),a(4),a(5),o(369),a(6),a(7),o(369),a(8),a(9),o(369),a(10),a(11),o(139),ref(290),o(366),a(1),a(2),o(38),a(3),o(265),pw(2),o(366),a(4),a(5),o(366),a(6),a(7),o(366),a(8),a(9),o(366),a(10),a(11),o(4),y(4),a(12),o(16),a(12),functor(/(source_position,13)),ref(325),o(43),a(1),o(43),a(2),o(43),a(3),o(47),y(2),o(47),y(1),o(43),a(4),o(43),a(5),o(43),a(6),o(43),a(7),o(43),a(8),o(43),a(9),o(43),a(10),o(43),a(11),o(139),ref(351),o(44),a(1),o(44),a(2),o(44),a(3),o(48),y(2),o(48),y(1),o(44),a(4),o(44),a(5),o(44),a(6),o(44),a(7),o(44),a(8),o(44),a(9),o(44),a(10),o(44),a(11),o(4),y(5),a(1),o(13),a(1),comment,o(154),o(4),y(15),a(2),o(298),a(2),o(403),a(1),pw(17),o(4),y(6),a(1),o(16),a(1),functor(/(source_term,3)),ref(381),o(43),a(2),o(47),y(17),o(47),y(16),o(139),ref(387),o(44),a(2),o(48),y(17),o(48),y(16),o(4),y(3),a(1),o(16),a(1),functor(/(source_position,13)),ref(415),o(369),a(1),a(2),o(37),a(3),o(349),pw(2),o(369),a(4),a(5),o(369),a(6),a(7),o(369),a(8),a(9),o(369),a(10),a(11),o(139),ref(434),o(366),a(1),a(2),o(38),a(3),o(265),pw(2),o(366),a(4),a(5),o(366),a(6),a(7),o(366),a(8),a(9),o(366),a(10),a(11),o(4),y(4),a(12),o(16),a(12),functor(/(source_position,13)),ref(469),o(43),a(1),o(43),a(2),o(43),a(3),o(47),y(2),o(47),y(1),o(43),a(4),o(43),a(5),o(43),a(6),o(43),a(7),o(43),a(8),o(43),a(9),o(43),a(10),o(43),a(11),o(139),ref(495),o(44),a(1),o(44),a(2),o(44),a(3),o(48),y(2),o(48),y(1),o(44),a(4),o(44),a(5),o(44),a(6),o(44),a(7),o(44),a(8),o(44),a(9),o(44),a(10),o(44),a(11),o(4),y(5),a(1),o(13),a(1),var,o(154),o(4),y(15),a(3),o(13),a(3),end_of_file,o(403),a(1),pw(24),o(353),y(14),a(1),y(7),a(2),o(143),proc(/(close_input,2)),180095,o(395),y(9),a(1),proc(/(cd,1)),179583,o(203),y(20),o(206),y(13),ref(549),ref(1806),ref(549),ref(549),ref(549),ref(549),ref(549),ref(549),ref(549),ref(541),ref(549),ref(549),ref(541),o(129),0,0,ref(549),o(344),0,ref(620),172159,o(99),a(1),o(106),a(2),o(370),y(23),y(24),o(395),y(12),a(3),proc(/(append,3)),26225009,o(203),y(22),o(128),0,0,ref(599),o(285),a(5),y(21),o(351),2,y(23),a(1),o(354),y(13),a(3),y(11),a(4),y(8),a(6),o(143),proc(/(source_open,6)),7340145,o(204),y(22),pw(21),o(204),y(20),pw(21),o(4),y(21),a(1),o(351),3,y(4),a(2),o(144),ref(0),o(199),0,9437297,o(106),a(3),o(80),y(23),o(85),o(104),a(1),warning_output,o(105),a(2),"WARNING: Could not open include file \"%w\"%n",o(404),a(4),source_processor,o(143),proc(:(sepia_kernel,/(printf_body,4))),1048689,o(163),o(4),y(13),a(2),o(10),a(2),o(395),y(3),a(1),proc(/(warn_ifdef,1)),163967,o(4),y(3),a(2),o(16),a(2),functor(/(source_position,13)),ref(643),o(349),pw(12),o(37),a(1),o(139),ref(647),o(265),pw(12),o(38),a(1),o(143),proc(/(register_compiled_stream,1)),163967,o(4),y(6),a(1),o(16),a(1),functor(/(source_term,3)),ref(664),o(47),y(15),o(47),y(17),o(33),o(139),ref(668),o(48),y(15),o(48),y(17),o(4),y(3),a(1),o(16),a(1),functor(/(source_position,13)),ref(696),o(369),a(1),a(2),o(37),a(3),o(349),pw(2),o(369),a(4),a(5),o(369),a(6),a(7),o(369),a(8),a(9),o(369),a(10),a(11),o(139),ref(715),o(366),a(1),a(2),o(38),a(3),o(265),pw(2),o(366),a(4),a(5),o(366),a(6),a(7),o(366),a(8),a(9),o(366),a(10),a(11),o(4),y(4),a(12),o(16),a(12),functor(/(source_position,13)),ref(750),o(43),a(1),o(43),a(2),o(43),a(3),o(47),y(2),o(47),y(1),o(43),a(4),o(43),a(5),o(43),a(6),o(43),a(7),o(43),a(8),o(43),a(9),o(43),a(10),o(43),a(11),o(139),ref(776),o(44),a(1),o(44),a(2),o(44),a(3),o(48),y(2),o(48),y(1),o(44),a(4),o(44),a(5),o(44),a(6),o(44),a(7),o(44),a(8),o(44),a(9),o(44),a(10),o(44),a(11),o(4),y(5),a(1),o(13),a(1),end,o(154),o(4),y(13),a(2),o(16),a(2),functor(/(source_position,13)),ref(801),o(33),o(37),a(1),o(349),pw(6),o(41),y(22),o(349),pw(4),o(139),ref(808),o(34),o(38),a(1),o(265),pw(6),o(42),y(22),o(143),proc(/(register_compiled_stream,1)),4367729,o(4),y(6),a(4),o(16),a(4),functor(/(source_term,3)),ref(825),o(47),y(15),o(47),y(17),o(33),o(139),ref(829),o(48),y(15),o(48),y(17),o(285),a(3),y(21),o(353),y(22),a(1),y(10),a(2),o(143),proc(/(append,3)),2105649,o(4),y(13),a(1),o(16),a(1),functor(/(source_position,13)),ref(868),o(369),a(1),a(2),o(369),a(3),a(4),o(369),a(5),a(6),o(369),a(7),a(8),o(33),o(37),a(9),o(33),o(369),a(10),a(11),o(139),ref(887),o(366),a(1),a(2),o(366),a(3),a(4),o(366),a(5),a(6),o(366),a(7),a(8),o(34),o(38),a(9),o(34),o(366),a(10),a(11),o(4),y(4),a(12),o(16),a(12),functor(/(source_position,13)),ref(922),o(43),a(1),o(43),a(2),o(43),a(3),o(43),a(4),o(43),a(5),o(43),a(6),o(43),a(7),o(43),a(8),o(47),y(21),o(43),a(9),o(47),y(8),o(43),a(10),o(43),a(11),o(139),ref(948),o(44),a(1),o(44),a(2),o(44),a(3),o(44),a(4),o(44),a(5),o(44),a(6),o(44),a(7),o(44),a(8),o(48),y(21),o(44),a(9),o(48),y(8),o(44),a(10),o(44),a(11),o(4),y(5),a(1),o(13),a(1),end_include,o(154),o(4),y(15),a(3),o(16),a(3),functor(/(:-,1)),ref(963),o(33),o(403),a(1),pw(21),o(4),y(11),a(3),o(16),a(3),functor(/(options,8)),ref(1004),o(349),pw(4),o(37),a(1),o(349),pw(3),o(212),a(2),o(206),y(16),ref(1811),ref(1811),ref(1811),ref(1811),ref(1811),ref(1811),ref(1811),ref(1811),ref(1811),ref(1811),ref(1811),ref(1811),ref(1819),o(129),0,2,ref(1033),o(344),0,ref(1049),231807,o(265),pw(4),o(38),a(1),o(212),a(2),o(206),y(16),ref(1811),ref(1811),ref(1811),ref(1811),ref(1811),ref(1811),ref(1811),ref(1811),ref(1811),ref(1811),ref(1811),ref(1811),ref(1819),o(129),0,2,ref(1033),o(344),0,ref(1049),231807,o(104),a(3),minimal,o(316),a(1),a(3),o(403),a(2),pw(21),o(359),y(15),y(20),y(16),y(21),o(139),ref(1084),o(4),y(16),a(4),o(298),a(4),o(285),a(2),y(20),o(353),y(15),a(1),y(8),a(3),o(143),proc(:(sepia_kernel,/(expand_macros_,3))),1247359,o(288),y(16),y(21),o(139),ref(1084),o(375),a(3),y(20),a(4),y(21),o(351),2,y(15),a(1),o(395),y(8),a(5),proc(:(sepia_kernel,/(expand_macros_annotated_,5))),3278975,o(107),a(5),functor(/(source_term,3)),o(80),y(20),o(80),y(17),o(80),y(21),o(4),y(3),a(8),o(16),a(8),functor(/(source_position,13)),ref(1121),o(369),a(8),a(9),o(37),a(10),o(349),pw(2),o(369),a(11),a(12),o(369),a(13),a(14),o(369),a(15),a(16),o(369),a(17),a(18),o(139),ref(1140),o(366),a(8),a(9),o(38),a(10),o(265),pw(2),o(366),a(11),a(12),o(366),a(13),a(14),o(366),a(15),a(16),o(366),a(17),a(18),o(107),a(2),functor(/(source_position,13)),o(79),a(8),o(79),a(9),o(79),a(10),o(80),y(2),o(80),y(1),o(79),a(11),o(79),a(12),o(79),a(13),o(79),a(14),o(79),a(15),o(79),a(16),o(79),a(17),o(79),a(18),o(4),y(20),a(8),o(16),a(8),functor(/(:-,1)),ref(1180),o(37),a(1),o(139),ref(1182),o(38),a(1),o(351),2,y(4),a(3),o(353),y(6),a(6),y(11),a(7),o(145),proc(/(handle_ifdef_and_directives,7)),o(4),y(15),a(2),o(16),a(2),functor(/(?-,1)),ref(1201),o(33),o(203),y(21),o(3),a(1),y(20),o(128),0,0,ref(1224),o(107),a(1),functor(/(iso,1)),o(61),strict,o(395),y(8),a(2),proc(:(sepia_kernel,/(current_pragma_,2))),3375231,o(204),y(21),pw(20),o(163),o(199),0,1278079,o(204),y(20),pw(17),o(4),y(6),a(1),o(16),a(1),functor(/(source_term,3)),ref(1245),o(47),y(15),o(47),y(17),o(47),y(16),o(139),ref(1251),o(48),y(15),o(48),y(17),o(48),y(16),o(4),y(3),a(1),o(16),a(1),functor(/(source_position,13)),ref(1279),o(369),a(1),a(2),o(37),a(3),o(349),pw(2),o(369),a(4),a(5),o(369),a(6),a(7),o(369),a(8),a(9),o(369),a(10),a(11),o(139),ref(1298),o(366),a(1),a(2),o(38),a(3),o(265),pw(2),o(366),a(4),a(5),o(366),a(6),a(7),o(366),a(8),a(9),o(366),a(10),a(11),o(4),y(4),a(12),o(16),a(12),functor(/(source_position,13)),ref(1333),o(43),a(1),o(43),a(2),o(43),a(3),o(47),y(2),o(47),y(1),o(43),a(4),o(43),a(5),o(43),a(6),o(43),a(7),o(43),a(8),o(43),a(9),o(43),a(10),o(43),a(11),o(139),ref(1359),o(44),a(1),o(44),a(2),o(44),a(3),o(48),y(2),o(48),y(1),o(44),a(4),o(44),a(5),o(44),a(6),o(44),a(7),o(44),a(8),o(44),a(9),o(44),a(10),o(44),a(11),o(4),y(5),a(1),o(13),a(1),query,o(154),o(2),a(1),a(7),o(4),y(15),a(1),o(293),a(1),o(403),a(7),pw(21),o(375),a(3),y(20),a(4),y(21),o(354),y(16),a(2),y(11),a(5),y(8),a(6),o(143),proc(/(apply_clause_expansion,6)),3309695,o(212),a(1),o(167),y(20),ref(1526),ref(1401),ref(1526),o(139),ref(1526),o(126),y(3),ref(1828),1,ref(1425),o(126),y(4),ref(1830),1,ref(1425),o(125),y(5),ref(1832),1,ref(1425),o(126),y(6),ref(1834),1,ref(1425),o(128),0,1,ref(1523),o(4),y(20),a(5),o(17),a(5),o(101),a(5),o(4),y(15),a(6),o(316),a(6),a(5),o(403),a(1),pw(6),o(4),y(3),a(5),o(16),a(5),functor(/(source_position,13)),ref(1469),o(369),a(5),a(6),o(37),a(7),o(349),pw(2),o(369),a(8),a(9),o(369),a(10),a(11),o(369),a(12),a(13),o(369),a(14),a(15),o(139),ref(1488),o(366),a(5),a(6),o(38),a(7),o(265),pw(2),o(366),a(8),a(9),o(366),a(10),a(11),o(366),a(12),a(13),o(366),a(14),a(15),o(107),a(1),functor(/(source_position,13)),o(79),a(5),o(79),a(6),o(79),a(7),o(80),y(2),o(80),y(1),o(79),a(8),o(79),a(9),o(79),a(10),o(79),a(11),o(79),a(12),o(79),a(13),o(79),a(14),o(79),a(15),o(351),3,y(4),a(2),o(144),ref(0),o(199),0,3276927,o(4),y(6),a(1),o(16),a(1),functor(/(source_term,3)),ref(1541),o(47),y(20),o(47),y(17),o(47),y(21),o(139),ref(1547),o(48),y(20),o(48),y(17),o(48),y(21),o(4),y(3),a(1),o(16),a(1),functor(/(source_position,13)),ref(1575),o(369),a(1),a(2),o(37),a(3),o(349),pw(2),o(369),a(4),a(5),o(369),a(6),a(7),o(369),a(8),a(9),o(369),a(10),a(11),o(139),ref(1594),o(366),a(1),a(2),o(38),a(3),o(265),pw(2),o(366),a(4),a(5),o(366),a(6),a(7),o(366),a(8),a(9),o(366),a(10),a(11),o(4),y(4),a(12),o(16),a(12),functor(/(source_position,13)),ref(1629),o(43),a(1),o(43),a(2),o(43),a(3),o(47),y(2),o(47),y(1),o(43),a(4),o(43),a(5),o(43),a(6),o(43),a(7),o(43),a(8),o(43),a(9),o(43),a(10),o(43),a(11),o(139),ref(1655),o(44),a(1),o(44),a(2),o(44),a(3),o(48),y(2),o(48),y(1),o(44),a(4),o(44),a(5),o(44),a(6),o(44),a(7),o(44),a(8),o(44),a(9),o(44),a(10),o(44),a(11),o(4),y(5),a(1),o(13),a(1),clause,o(154),o(4),y(6),a(1),o(16),a(1),functor(/(source_term,3)),ref(1677),o(47),y(15),o(47),y(17),o(47),y(16),o(139),ref(1683),o(48),y(15),o(48),y(17),o(48),y(16),o(4),y(3),a(1),o(16),a(1),functor(/(source_position,13)),ref(1711),o(369),a(1),a(2),o(37),a(3),o(349),pw(2),o(369),a(4),a(5),o(369),a(6),a(7),o(369),a(8),a(9),o(369),a(10),a(11),o(139),ref(1730),o(366),a(1),a(2),o(38),a(3),o(265),pw(2),o(366),a(4),a(5),o(366),a(6),a(7),o(366),a(8),a(9),o(366),a(10),a(11),o(4),y(4),a(12),o(16),a(12),functor(/(source_position,13)),ref(1765),o(43),a(1),o(43),a(2),o(43),a(3),o(47),y(2),o(47),y(1),o(43),a(4),o(43),a(5),o(43),a(6),o(43),a(7),o(43),a(8),o(43),a(9),o(43),a(10),o(43),a(11),o(139),ref(1791),o(44),a(1),o(44),a(2),o(44),a(3),o(48),y(2),o(48),y(1),o(44),a(4),o(44),a(5),o(44),a(6),o(44),a(7),o(44),a(8),o(44),a(9),o(44),a(10),o(44),a(11),o(4),y(5),a(1),o(13),a(1),other,o(154),o(129),0,0,ref(549),o(344),0,ref(783),173425,o(126),y(13),ref(1836),1,ref(549),o(129),0,2,ref(1033),o(344),0,ref(1070),231807,o(129),0,2,ref(1033),o(344),0,ref(1049),231807,o(0),table([-(/(source_position,13),ref(1406))],2),table([-(/(source_position,13),ref(1411))],2),table([-(clause,ref(1416))],2),table([-(/(source_term,3),ref(1421))],2),table([-(/(source_position,13),ref(1798))],2)),1838,0,0,'Compiler/source_processor.ecl',0,0))).
:-(:(sepia_kernel,store_pred(/(read_next_term,8),[](o(136),pw(1),o(203),y(1),o(123),a(7),ref(84),1,ref(9),o(129),0,8,ref(52),o(344),0,ref(67),1,o(122),a(4),ref(74),ref(22),ref(74),o(121),a(5),ref(86),1,ref(74),o(128),0,8,ref(48),o(23),a(7),functor(/(options,8)),ref(35),o(197),o(62),true,o(2),a(6),a(2),o(143),proc(/(read_comment,2)),3,o(204),y(1),pw(0),o(154),o(198),0,ref(64),3,o(357),a(7),a(5),a(8),a(6),o(143),proc(/(read_special,6)),3,o(204),y(1),pw(0),o(154),o(199),0,1,o(10),a(4),o(13),a(5),error,o(145),proc(/(skip_to_fullstop,1)),o(129),0,8,ref(31),o(344),0,ref(52),3,o(0),o(177),table([-(/(options,8),ref(17))],2),table([-(error,ref(27))],2)),88,0,0,'Compiler/source_processor.ecl',0,0))).
:-(:(sepia_kernel,store_pred(/(read_special,6),[](o(212),a(7),o(23),a(5),functor(/(options,8)),ref(6),o(265),pw(7),o(38),a(5),o(251),a(7),o(121),a(5),ref(110),1,ref(17),o(6),pw(3),a(1),y(1),o(3),a(2),y(2),o(362),a(3),a(4),a(6),o(143),proc(:(sepia_kernel,/(readvar,4))),7,o(125),y(2),ref(112),1,ref(36),o(395),y(1),a(1),proc(/(unget,1)),3,o(99),a(2),o(285),a(3),y(3),o(395),y(1),a(1),proc(/(get_cc,3)),11,o(125),y(3),ref(114),2,ref(108),o(4),y(3),a(2),o(13),a(2),blank_space,o(397),y(1),a(1),proc(/(unget,1)),o(20),a(5),true,o(10),a(4),o(6),pw(3),a(1),y(1),o(3),a(2),y(2),o(2),a(6),a(4),o(143),proc(:(sepia_kernel,/(read_annotated_,4))),7,o(125),y(2),ref(118),1,ref(36),o(139),ref(36),o(4),y(2),a(1),o(20),a(1),end_of_file,o(154),o(4),y(3),a(2),o(13),a(2),end_of_line,o(397),y(1),a(1),proc(/(unget,1)),o(154),o(0),table([-(true,ref(69))],2),table([-(end_of_file,ref(91))],2),table([-(end_of_line,ref(98)),-(blank_space,ref(56))],4),table([-(end_of_file,ref(91))],2)),120,0,0,'Compiler/source_processor.ecl',0,0))).
:-(:(sepia_kernel,store_pred(/(apply_clause_expansion,6),[](o(136),pw(8),o(16),a(5),functor(/(options,8)),ref(17),o(349),pw(5),o(2),a(1),a(5),o(368),a(1),y(8),o(33),o(139),ref(25),o(265),pw(5),o(2),a(1),a(5),o(365),a(1),y(8),o(3),a(5),y(3),o(352),3,a(2),y(4),o(3),a(6),y(7),o(121),a(1),ref(102),1,ref(40),o(104),a(1),on,o(3),a(1),y(2),o(125),y(8),ref(104),1,ref(51),o(104),a(1),off,o(3),a(1),y(1),o(351),4,y(3),a(1),o(354),y(2),a(5),y(1),a(6),y(7),a(7),o(145),proc(/(expand_clause_and_goals_,7)),o(20),a(1),true,o(104),a(1),off,o(3),a(1),y(2),o(125),y(8),ref(106),1,ref(51),o(139),ref(51),o(4),y(8),a(1),o(20),a(1),true,o(104),a(1),on,o(3),a(1),y(1),o(139),ref(57),o(0),o(177),table([-(true,ref(73))],2),table([-(true,ref(86))],2),table([-(true,ref(86))],2)),108,0,0,'Compiler/source_processor.ecl',0,0))).
:-(export(/(expand_clause_and_goals,6))).
:-(tool(/(expand_clause_and_goals,6),/(expand_clause_and_goals_,7))).
:-(:(sepia_kernel,store_pred(/(expand_clause_and_goals_,7),[](o(136),pw(10),o(203),y(3),o(352),2,a(6),y(1),o(121),a(5),ref(122),1,ref(114),o(139),ref(114),o(128),0,5,ref(111),o(20),a(5),on,o(352),2,a(1),y(9),o(352),2,a(3),y(7),o(104),a(1),macro_expansion,o(104),a(2),on,o(404),a(3),source_processor,o(143),proc(:(sepia_kernel,/(get_flag_body,3))),1935,o(204),y(3),pw(10),o(375),a(3),y(5),a(4),y(6),o(351),2,y(9),a(1),o(395),y(2),a(5),proc(:(sepia_kernel,/(expand_clause_annotated_,5))),487,o(203),y(4),o(125),y(1),ref(124),1,ref(104),o(139),ref(104),o(128),0,0,ref(101),o(4),y(1),a(4),o(20),a(4),on,o(104),a(1),goal_expansion,o(104),a(2),on,o(404),a(3),source_processor,o(143),proc(:(sepia_kernel,/(get_flag_body,3))),501,o(204),y(4),pw(8),o(351),4,y(5),a(1),o(397),y(2),a(5),proc(/(expand_clause_goals,5)),o(199),0,481,o(289),y(5),y(7),o(289),y(6),y(8),o(154),o(199),0,1,o(7),a(3),a(1),o(7),a(4),a(2),o(154),o(0),table([-(on,ref(15))],2),table([-(on,ref(68))],2)),126,0,0,'Compiler/source_processor.ecl',0,0))).
:-(export(/(expand_clause_goals,5))).
:-(:(sepia_kernel,store_pred(/(expand_clause_goals,5),[](o(212),a(6),o(124),a(1),ref(210),ref(224),ref(203),ref(203),ref(203),ref(203),ref(203),ref(203),ref(203),ref(203),ref(203),ref(203),ref(21),o(139),ref(21),o(298),a(1),o(7),a(3),a(1),o(7),a(4),a(2),o(157),o(16),a(1),functor(/(:-,2)),ref(37),o(369),a(7),a(1),o(139),ref(40),o(366),a(7),a(1),o(16),a(3),functor(/(:-,2)),ref(50),o(43),a(7),o(37),a(3),o(139),ref(54),o(44),a(7),o(38),a(3),o(251),a(6),o(16),a(2),functor(/(annotated_term,6)),ref(77),o(380),functor(/(:-,2)),o(369),a(6),a(2),o(97),t(0),ref(85),o(37),a(7),o(349),pw(2),o(369),a(8),a(9),o(139),ref(92),o(71),functor(/(:-,2)),ref(62),o(366),a(6),a(2),o(95),t(0),o(38),a(7),o(265),pw(2),o(366),a(8),a(9),o(137),pw(-1),o(16),a(4),functor(/(annotated_term,6)),ref(119),o(380),functor(/(:-,2)),o(43),a(6),o(37),a(4),o(97),t(0),ref(128),o(43),a(7),o(349),pw(2),o(43),a(8),o(43),a(9),o(137),pw(-1),o(151),proc(:(sepia_kernel,/(expand_goal_annotated_,5))),o(71),functor(/(:-,2)),ref(100),o(44),a(6),o(38),a(4),o(95),t(0),o(44),a(7),o(265),pw(2),o(44),a(8),o(44),a(9),o(137),pw(-1),o(151),proc(:(sepia_kernel,/(expand_goal_annotated_,5))),o(136),pw(5),o(15),a(1),ref(150),o(368),a(1),y(2),o(139),ref(153),o(365),a(1),y(2),o(15),a(2),ref(161),o(368),a(2),y(3),o(139),ref(164),o(365),a(2),y(3),o(15),a(3),ref(172),o(368),a(3),y(4),o(139),ref(175),o(365),a(3),y(4),o(15),a(4),ref(183),o(368),a(4),y(5),o(139),ref(186),o(365),a(4),y(5),o(403),a(6),pw(5),o(3),a(5),y(1),o(142),ref(0),63,o(351),4,y(2),a(1),o(396),y(1),a(5),ref(0),o(7),a(3),a(1),o(7),a(4),a(2),o(157),o(129),0,6,ref(140),o(135),0,ref(203),o(129),0,6,ref(28),o(135),0,ref(203),o(123),a(1),ref(238),1,ref(203),o(129),0,6,ref(19),o(135),0,ref(203),o(0),o(177),table([-(/(:-,2),ref(217))],2)),240,0,0,'Compiler/source_processor.ecl',0,0))).
:-(:(sepia_kernel,store_pred(/(handle_ifdef_and_directives,7),[](o(212),a(8),o(123),a(7),ref(98),1,ref(7),o(129),0,8,ref(18),o(135),0,ref(94),o(128),0,8,ref(74),o(16),a(2),functor(/(source_position,13)),ref(33),o(349),pw(10),o(2),a(2),a(7),o(37),a(2),o(349),pw(2),o(139),ref(40),o(265),pw(10),o(2),a(2),a(7),o(38),a(2),o(6),pw(7),a(1),y(1),o(3),a(7),y(2),o(352),4,a(3),y(3),o(3),a(8),y(7),o(107),a(1),functor(/(iso,1)),o(61),strict,o(143),proc(:(sepia_kernel,/(current_pragma_,2))),255,o(204),y(7),pw(6),o(289),y(5),y(6),o(351),4,y(1),a(1),o(145),proc(/(iso_handle_directives,4)),o(131),0,ref(92),o(23),a(7),functor(/(options,8)),ref(81),o(34),o(197),o(62),true,o(251),a(8),o(7),a(6),a(5),o(151),proc(/(handle_directives,4)),o(134),0,o(151),proc(/(handle_ifdef,6)),o(0),o(177),table([-(/(options,8),ref(14))],2)),100,0,0,'Compiler/source_processor.ecl',0,0))).
:-(:(sepia_kernel,store_pred(/(handle_ifdef,6),[](o(136),pw(14),o(203),y(1),o(124),a(1),ref(19),ref(783),ref(19),ref(19),ref(19),ref(19),ref(19),ref(19),ref(19),ref(19),ref(19),ref(778),ref(19),o(7),a(6),a(5),o(145),proc(/(handle_directives,4)),o(38),a(1),o(16),a(2),functor(/(source_position,13)),ref(41),o(349),pw(10),o(2),a(3),a(7),o(368),a(3),y(10),o(33),o(139),ref(49),o(265),pw(10),o(2),a(3),a(7),o(365),a(3),y(10),o(203),y(11),o(3),a(7),y(6),o(352),3,a(4),y(7),o(128),0,3,ref(185),o(3),a(2),y(12),o(2),a(1),a(5),o(107),a(1),functor(/(@,2)),o(91),pw(2),o(79),a(3),o(61),functor(/(call,1)),o(79),a(5),o(99),a(2),o(104),a(3),fail,o(404),a(4),source_processor,o(143),proc(:(sepia_kernel,/(block,4))),7873,o(204),y(11),pw(12),o(106),a(5),o(61),then,o(80),y(10),o(4),y(12),a(6),o(16),a(6),functor(/(source_position,13)),ref(128),o(369),a(6),a(7),o(369),a(8),a(9),o(369),a(10),a(11),o(369),a(12),a(13),o(369),a(14),a(15),o(37),a(16),o(33),o(37),a(17),o(139),ref(148),o(366),a(6),a(7),o(366),a(8),a(9),o(366),a(10),a(11),o(366),a(12),a(13),o(366),a(14),a(15),o(38),a(16),o(34),o(38),a(17),o(107),a(1),functor(/(source_position,13)),o(79),a(6),o(79),a(7),o(79),a(8),o(79),a(9),o(79),a(10),o(79),a(11),o(79),a(12),o(79),a(13),o(79),a(14),o(79),a(15),o(79),a(16),o(79),a(5),o(79),a(17),o(351),2,y(6),a(2),o(397),y(9),a(4),proc(/(source_read,4)),o(199),0,1985,o(355),a(1),y(13),a(2),y(12),o(285),a(2),y(14),o(395),y(12),a(1),proc(/(skip_to_conditional,3)),30657,o(206),y(14),ref(358),ref(793),ref(358),ref(358),ref(358),ref(358),ref(358),ref(358),ref(358),ref(358),ref(358),ref(788),ref(216),o(4),y(14),a(7),o(16),a(7),functor(/(elif,1)),ref(342),o(37),a(7),o(139),ref(344),o(4),y(14),a(5),o(20),a(5),endif,o(4),y(12),a(1),o(351),2,y(6),a(2),o(397),y(9),a(4),proc(/(source_read,4)),o(4),y(14),a(5),o(20),a(5),else,o(106),a(5),o(61),else,o(80),y(10),o(4),y(12),a(6),o(16),a(6),functor(/(source_position,13)),ref(285),o(369),a(6),a(7),o(369),a(8),a(9),o(369),a(10),a(11),o(369),a(12),a(13),o(369),a(14),a(15),o(37),a(16),o(33),o(37),a(17),o(139),ref(305),o(366),a(6),a(7),o(366),a(8),a(9),o(366),a(10),a(11),o(366),a(12),a(13),o(366),a(14),a(15),o(38),a(16),o(34),o(38),a(17),o(107),a(1),functor(/(source_position,13)),o(79),a(6),o(79),a(7),o(79),a(8),o(79),a(9),o(79),a(10),o(79),a(11),o(79),a(12),o(79),a(13),o(79),a(14),o(79),a(15),o(79),a(16),o(79),a(5),o(79),a(17),o(351),2,y(6),a(2),o(397),y(9),a(4),proc(/(source_read,4)),o(38),a(7),o(107),a(1),functor(/(if,1)),o(79),a(7),o(4),y(12),a(2),o(351),4,y(6),a(3),o(144),ref(0),o(107),a(2),functor(/(if,1)),o(80),y(13),o(105),a(1),"Unmatched conditional directive",o(395),y(12),a(3),proc(/(directive_warning,3)),4801,o(4),y(12),a(1),o(351),2,y(6),a(2),o(397),y(9),a(4),proc(/(source_read,4)),o(299),a(1),o(352),3,a(2),y(7),o(3),a(6),y(10),o(124),a(1),ref(fail),ref(421),ref(fail),ref(fail),ref(fail),ref(fail),ref(fail),ref(fail),ref(fail),ref(fail),ref(fail),ref(410),ref(406),o(128),0,1,ref(418),o(13),a(1),else,o(3),a(1),y(6),o(139),ref(429),o(199),0,1923,o(16),a(1),functor(/(elif,1)),ref(426),o(33),o(3),a(1),y(6),o(204),y(1),pw(12),o(212),a(1),o(126),y(7),ref(800),1,ref(596),o(139),ref(445),o(128),0,1,ref(593),o(2),a(1),a(4),o(4),y(7),a(1),o(16),a(1),functor(/(source_position,13)),ref(470),o(349),pw(10),o(37),a(3),o(381),o(61),then,o(41),y(11),o(97),t(0),ref(482),o(33),o(139),ref(482),o(265),pw(10),o(38),a(3),o(67),ref(460),o(62),then,o(42),y(11),o(95),t(0),o(137),pw(-1),o(403),a(4),pw(12),o(399),a(2),y(12),proc(/(skip_to_endif,3)),8065,o(125),y(12),ref(802),1,ref(497),o(351),4,y(7),a(1),o(145),proc(/(source_read,4)),o(4),y(12),a(5),o(20),a(5),endif,o(4),y(7),a(5),o(16),a(5),functor(/(source_position,13)),ref(538),o(369),a(5),a(6),o(369),a(7),a(8),o(369),a(9),a(10),o(369),a(11),a(12),o(369),a(13),a(14),o(37),a(15),o(33),o(37),a(16),o(139),ref(558),o(366),a(5),a(6),o(366),a(7),a(8),o(366),a(9),a(10),o(366),a(11),a(12),o(366),a(13),a(14),o(38),a(15),o(34),o(38),a(16),o(107),a(1),functor(/(source_position,13)),o(79),a(5),o(79),a(6),o(79),a(7),o(79),a(8),o(79),a(9),o(79),a(10),o(79),a(11),o(79),a(12),o(79),a(13),o(79),a(14),o(79),a(15),o(80),y(11),o(79),a(16),o(351),3,y(8),a(2),o(145),proc(/(source_read,4)),o(199),0,1985,o(105),a(1),"Unexpected conditional directive",o(351),2,y(6),a(2),o(143),proc(/(directive_warning,3)),1921,o(351),4,y(7),a(1),o(145),proc(/(source_read,4)),o(20),a(1),endif,o(212),a(5),o(2),a(6),a(1),o(123),a(2),ref(804),1,ref(746),o(139),ref(631),o(128),0,5,ref(743),o(16),a(2),functor(/(source_position,13)),ref(647),o(349),pw(11),o(381),o(33),o(37),a(6),o(97),t(0),ref(656),o(33),o(139),ref(656),o(265),pw(11),o(67),ref(638),o(34),o(38),a(6),o(95),t(0),o(137),pw(-1),o(403),a(5),pw(0),o(16),a(2),functor(/(source_position,13)),ref(687),o(369),a(5),a(7),o(369),a(8),a(9),o(369),a(10),a(11),o(369),a(12),a(13),o(369),a(14),a(15),o(37),a(16),o(33),o(37),a(17),o(139),ref(707),o(366),a(5),a(7),o(366),a(8),a(9),o(366),a(10),a(11),o(366),a(12),a(13),o(366),a(14),a(15),o(38),a(16),o(34),o(38),a(17),o(363),a(2),a(3),a(4),a(1),o(107),a(1),functor(/(source_position,13)),o(79),a(5),o(79),a(7),o(79),a(8),o(79),a(9),o(79),a(10),o(79),a(11),o(79),a(12),o(79),a(13),o(79),a(14),o(79),a(15),o(79),a(16),o(79),a(6),o(79),a(17),o(145),proc(/(source_read,4)),o(199),0,1,o(3),a(1),y(5),o(352),3,a(2),y(2),o(105),a(1),"Unmatched conditional directive",o(104),a(2),endif,o(395),y(2),a(3),proc(/(directive_warning,3)),61,o(351),4,y(2),a(1),o(145),proc(/(source_read,4)),o(129),0,6,ref(382),o(344),0,ref(19),1,o(121),a(1),ref(806),2,ref(19),o(123),a(1),ref(810),2,ref(19),o(125),y(14),ref(814),2,ref(358),o(126),y(14),ref(818),1,ref(358),o(0),o(177),table([-(/(source_position,13),ref(441))],2),table([-(endif,ref(503))],2),table([-(/(source_position,13),ref(627))],2),table([-(else,ref(770)),-(endif,ref(615))],4),table([-(/(elif,1),ref(770)),-(/(if,1),ref(24))],4),table([-(else,ref(244)),-(endif,ref(227))],4),table([-(/(elif,1),ref(216))],2)),820,0,0,'Compiler/source_processor.ecl',0,0))).
:-(:(sepia_kernel,store_pred(/(warn_ifdef,1),[](o(212),a(2),o(123),a(1),ref(74),1,ref(fail),o(139),ref(13),o(128),0,2,ref(30),o(16),a(1),functor(/(source_position,13)),ref(24),o(349),pw(11),o(55),o(33),o(251),a(2),o(157),o(265),pw(11),o(56),o(251),a(2),o(157),o(134),0,o(16),a(1),functor(/(source_position,13)),ref(44),o(349),pw(2),o(37),a(1),o(349),pw(10),o(139),ref(48),o(265),pw(2),o(38),a(1),o(99),a(2),o(136),pw(1),o(399),a(3),y(1),proc(/(pathname,3)),3,o(106),a(3),o(80),y(1),o(85),o(104),a(1),warning_output,o(105),a(2),"WARNING: Missing endif at end of file %w%n",o(404),a(4),source_processor,o(145),proc(:(sepia_kernel,/(printf_body,4))),o(0),table([-(/(source_position,13),ref(9))],2)),76,0,0,'Compiler/source_processor.ecl',0,0))).
:-(:(sepia_kernel,store_pred(/(handle_directives,4),[](o(212),a(5),o(124),a(1),ref(181),ref(1215),ref(934),ref(934),ref(934),ref(934),ref(934),ref(934),ref(934),ref(934),ref(934),ref(934),ref(17),o(129),0,5,ref(24),o(135),0,ref(35),o(7),a(3),a(2),o(13),a(4),directive,o(298),a(1),o(251),a(5),o(157),o(136),pw(10),o(16),a(1),functor(/(',',2)),ref(46),o(370),y(4),y(5),o(139),ref(49),o(367),y(4),y(5),o(356),a(2),y(2),a(3),y(9),a(4),y(3),o(375),a(3),y(10),a(4),y(6),o(394),y(4),a(1),ref(0),1661,o(285),a(4),y(1),o(354),y(5),a(1),y(10),a(2),y(9),a(3),o(142),ref(0),127,o(212),a(1),o(128),0,1,ref(100),o(353),y(6),a(2),y(1),a(3),o(188),a(2),a(3),o(403),a(1),pw(6),o(8),a(2),y(3),o(154),o(199),0,61,o(4),y(2),a(4),o(16),a(4),functor(/(source_position,13)),ref(119),o(349),pw(2),o(368),a(1),y(7),o(349),pw(9),o(139),ref(124),o(265),pw(2),o(365),a(1),y(7),o(99),a(2),o(399),a(3),y(8),proc(/(pathname,3)),441,o(106),a(3),o(80),y(8),o(90),o(80),y(7),o(90),o(91),pw(3),o(85),o(61),functor(/(',',2)),o(80),y(4),o(80),y(5),o(104),a(1),warning_output,o(105),a(2),"WARNING: Confusing compound directive in file %w, line %d:%n:- %w.%n",o(404),a(4),source_processor,o(143),proc(:(sepia_kernel,/(printf_body,4))),9,o(104),a(1),warning_output,o(105),a(2),"  Advice: Either break up, or use ?- query%n",o(101),a(3),o(404),a(4),source_processor,o(143),proc(:(sepia_kernel,/(printf_body,4))),9,o(4),y(3),a(1),o(13),a(1),directive,o(154),o(15),a(1),ref(186),o(349),pw(2),o(151),proc(/(handle_include,4)),o(16),a(1),functor(/(include,1)),ref(196),o(37),a(1),o(151),proc(/(handle_include,4)),o(38),a(1),o(151),proc(/(handle_include,4)),o(16),a(1),functor(/(comment,2)),ref(210),o(61),include,o(37),a(1),o(139),ref(214),o(62),include,o(38),a(1),o(251),a(5),o(16),a(2),functor(/(source_position,13)),ref(249),o(349),pw(7),o(380),functor(/(options,8)),o(349),pw(2),o(37),a(5),o(349),pw(5),o(97),t(0),ref(1250),o(349),pw(5),o(137),pw(-1),o(121),a(5),ref(1260),1,ref(242),o(13),a(4),handled_directive,o(7),a(2),a(3),o(157),o(265),pw(7),o(71),functor(/(options,8)),ref(224),o(265),pw(2),o(38),a(5),o(95),t(0),o(137),pw(-1),o(121),a(5),ref(1262),1,ref(242),o(139),ref(242),o(20),a(5),true,o(2),a(1),a(5),o(107),a(1),functor(/(include,1)),o(79),a(5),o(150),ref(0),o(136),pw(4),o(16),a(1),functor(/(module_interface,1)),ref(292),o(41),y(4),o(139),ref(294),o(42),y(4),o(352),3,a(2),y(1),o(107),a(2),functor(/(module_interface,1)),o(80),y(4),o(105),a(1),"Obsolete directive",o(395),y(1),a(3),proc(/(directive_warning,3)),31,o(107),a(1),functor(/(module,1)),o(80),y(4),o(351),3,y(1),a(2),o(144),ref(0),o(16),a(1),functor(/(module,1)),ref(330),o(37),a(5),o(139),ref(332),o(38),a(5),o(107),a(1),functor(/(module,3)),o(79),a(5),o(85),o(61),eclipse_language,o(150),ref(0),o(16),a(1),functor(/(begin_module,1)),ref(350),o(37),a(1),o(139),ref(352),o(38),a(1),o(13),a(4),handled_directive,o(251),a(5),o(136),pw(4),o(203),y(4),o(352),2,a(2),y(2),o(128),0,1,ref(411),o(3),a(1),y(1),o(143),proc(/(current_module,1)),31,o(204),y(4),pw(3),o(395),y(1),a(1),proc(/(erase_module_pragmas,1)),15,o(4),y(2),a(1),o(16),a(1),functor(/(source_position,13)),ref(433),o(369),a(1),a(2),o(369),a(3),a(4),o(369),a(5),a(6),o(369),a(7),a(8),o(369),a(9),a(10),o(33),o(369),a(11),a(12),o(139),ref(452),o(199),0,13,o(3),a(1),y(1),o(107),a(2),functor(/(begin_module,1)),o(79),a(1),o(102),a(1),80,o(404),a(3),source_processor,o(143),proc(:(sepia_kernel,/(error_,3))),15,o(139),ref(383),o(366),a(1),a(2),o(366),a(3),a(4),o(366),a(5),a(6),o(366),a(7),a(8),o(366),a(9),a(10),o(34),o(366),a(11),a(12),o(4),y(3),a(13),o(16),a(13),functor(/(source_position,13)),ref(486),o(43),a(1),o(43),a(2),o(43),a(3),o(43),a(4),o(43),a(5),o(43),a(6),o(43),a(7),o(43),a(8),o(43),a(9),o(43),a(10),o(47),y(1),o(43),a(11),o(43),a(12),o(154),o(44),a(1),o(44),a(2),o(44),a(3),o(44),a(4),o(44),a(5),o(44),a(6),o(44),a(7),o(44),a(8),o(44),a(9),o(44),a(10),o(48),y(1),o(44),a(11),o(44),a(12),o(154),o(16),a(1),functor(/(module,3)),ref(531),o(37),a(1),o(2),a(2),a(6),o(37),a(2),o(2),a(3),a(7),o(37),a(3),o(139),ref(543),o(38),a(1),o(2),a(2),a(6),o(38),a(2),o(2),a(3),a(7),o(38),a(3),o(13),a(4),handled_directive,o(251),a(5),o(136),pw(9),o(16),a(6),functor(/(source_position,13)),ref(563),o(349),pw(7),o(370),y(5),y(6),o(349),pw(4),o(139),ref(568),o(265),pw(7),o(367),y(5),y(6),o(203),y(7),o(352),2,a(6),y(3),o(128),0,3,ref(682),o(3),a(1),y(1),o(352),2,a(2),y(8),o(143),proc(/(current_module,1)),1019,o(204),y(7),pw(9),o(4),y(5),a(2),o(16),a(2),functor(/(options,8)),ref(645),o(349),pw(3),o(37),a(1),o(349),pw(4),o(121),a(1),ref(1264),1,ref(609),o(395),y(1),a(1),proc(/(erase_module_pragmas,1)),91,o(288),y(6),y(2),o(4),y(3),a(1),o(16),a(1),functor(/(source_position,13)),ref(702),o(369),a(1),a(2),o(369),a(3),a(4),o(369),a(5),a(6),o(369),a(7),a(8),o(33),o(37),a(9),o(33),o(369),a(10),a(11),o(139),ref(721),o(265),pw(3),o(38),a(1),o(121),a(1),ref(1266),1,ref(609),o(139),ref(609),o(20),a(1),true,o(404),a(2),source_processor,o(395),y(1),a(1),proc(:(sepia_kernel,/(erase_module,2))),859,o(4),y(1),a(1),o(351),2,y(8),a(2),o(143),proc(/(create_module,3)),91,o(288),y(6),y(2),o(139),ref(617),o(199),0,89,o(3),a(1),y(1),o(143),proc(/(create_module,3)),91,o(106),a(1),o(80),y(1),o(80),y(6),o(3),a(1),y(2),o(139),ref(617),o(366),a(1),a(2),o(366),a(3),a(4),o(366),a(5),a(6),o(366),a(7),a(8),o(34),o(38),a(9),o(34),o(366),a(10),a(11),o(4),y(4),a(12),o(16),a(12),functor(/(source_position,13)),ref(755),o(43),a(1),o(43),a(2),o(43),a(3),o(43),a(4),o(43),a(5),o(43),a(6),o(43),a(7),o(43),a(8),o(47),y(2),o(43),a(9),o(47),y(1),o(43),a(10),o(43),a(11),o(154),o(44),a(1),o(44),a(2),o(44),a(3),o(44),a(4),o(44),a(5),o(44),a(6),o(44),a(7),o(44),a(8),o(48),y(2),o(44),a(9),o(48),y(1),o(44),a(10),o(44),a(11),o(154),o(16),a(1),functor(/(pragma,1)),ref(790),o(37),a(6),o(139),ref(792),o(38),a(6),o(7),a(3),a(2),o(13),a(4),handled_directive,o(251),a(5),o(16),a(2),functor(/(source_position,13)),ref(812),o(349),pw(10),o(37),a(3),o(349),pw(2),o(139),ref(816),o(265),pw(10),o(38),a(3),o(107),a(2),functor(/(pragma,1)),o(79),a(6),o(102),a(1),148,o(404),a(4),source_processor,o(151),proc(:(sepia_kernel,/(error_,4))),o(7),a(3),a(2),o(13),a(4),handled_directive,o(136),pw(6),o(16),a(1),functor(/(meta_attribute,2)),ref(850),o(41),y(4),o(2),a(1),a(4),o(37),a(1),o(139),ref(857),o(42),y(4),o(2),a(1),a(4),o(38),a(1),o(403),a(5),pw(6),o(16),a(2),functor(/(source_position,13)),ref(872),o(349),pw(10),o(41),y(5),o(349),pw(2),o(139),ref(876),o(265),pw(10),o(42),y(5),o(355),a(4),y(2),a(2),y(3),o(99),a(3),o(399),a(2),y(6),proc(/(meta_attribute_now_later,3)),125,o(203),y(1),o(128),0,0,ref(922),o(107),a(1),functor(/(@,2)),o(91),pw(3),o(80),y(5),o(61),functor(/(meta_attribute,2)),o(80),y(4),o(80),y(6),o(99),a(2),o(104),a(3),fail,o(404),a(4),source_processor,o(143),proc(:(sepia_kernel,/(block,4))),3,o(204),y(1),pw(0),o(154),o(199),0,13,o(105),a(1),"Directive failed or aborted",o(351),2,y(2),a(2),o(145),proc(/(directive_warning,3)),o(7),a(3),a(2),o(136),pw(12),o(16),a(2),functor(/(source_position,13)),ref(955),o(349),pw(2),o(41),y(3),o(349),pw(7),o(41),y(2),o(349),pw(2),o(139),ref(963),o(265),pw(2),o(42),y(3),o(265),pw(7),o(42),y(2),o(203),y(4),o(3),a(2),y(1),o(2),a(4),a(2),o(121),a(2),ref(1268),1,ref(1242),o(128),0,2,ref(1132),o(355),a(1),y(8),a(2),y(5),o(399),a(2),y(10),proc(/(handled_directive,2)),1343,o(204),y(4),pw(12),o(203),y(9),o(125),y(10),ref(1270),1,ref(1100),o(128),0,0,ref(1097),o(4),y(10),a(5),o(13),a(5),yes,o(376),a(3),a(4),o(285),a(2),y(12),o(395),y(3),a(1),proc(/(pathname,4)),4903,o(105),a(2),"",o(4),y(12),a(3),o(316),a(3),a(2),o(204),y(9),pw(12),o(399),a(1),y(11),proc(/(getcwd,1)),6439,o(395),y(12),a(1),proc(/(cd,1)),2343,o(107),a(1),functor(/(cd,1)),o(80),y(11),o(3),a(1),y(7),o(203),y(6),o(128),0,0,ref(1108),o(107),a(1),functor(/(@,2)),o(91),pw(2),o(80),y(2),o(61),functor(/(call,1)),o(80),y(8),o(99),a(2),o(104),a(3),fail,o(404),a(4),source_processor,o(143),proc(:(sepia_kernel,/(block,4))),225,o(204),y(6),pw(7),o(404),a(2),source_processor,o(395),y(7),a(1),proc(:(sepia_kernel,/(call_,2))),33,o(4),y(5),a(1),o(13),a(1),handled_directive,o(154),o(199),0,295,o(104),a(1),true,o(3),a(1),y(7),o(139),ref(1051),o(199),0,419,o(404),a(2),source_processor,o(395),y(7),a(1),proc(:(sepia_kernel,/(call_,2))),291,o(105),a(1),"Directive failed or aborted",o(353),y(8),a(2),y(1),a(3),o(143),proc(/(directive_warning,3)),33,o(139),ref(1090),o(198),0,ref(1173),23,o(355),a(1),y(6),a(2),y(5),o(143),proc(/(obsolete_directive,1)),119,o(104),a(2),sepia_kernel,o(395),y(2),a(1),proc(/(\=,2)),115,o(204),y(4),pw(6),o(105),a(1),"Obsolete directive",o(353),y(6),a(2),y(1),a(3),o(143),proc(/(directive_warning,3)),33,o(4),y(5),a(1),o(13),a(1),directive,o(154),o(199),0,1,o(13),a(2),directive,o(154),o(129),0,5,ref(782),o(135),0,ref(934),o(129),0,5,ref(513),o(135),0,ref(934),o(129),0,5,ref(200),o(135),0,ref(934),o(129),0,5,ref(342),o(135),0,ref(934),o(129),0,5,ref(829),o(135),0,ref(934),o(123),a(1),ref(1272),9,ref(934),o(129),0,5,ref(35),o(132),0,ref(181),o(132),0,ref(188),o(132),0,ref(200),o(132),0,ref(282),o(132),0,ref(322),o(135),0,ref(934),o(129),0,2,ref(980),o(344),0,ref(1136),23,o(137),pw(-1),o(121),a(5),ref(1290),1,ref(242),o(139),ref(242),o(0),table([-(true,ref(272))],2),table([-(true,ref(272))],2),table([-(true,ref(659))],2),table([-(true,ref(659))],2),table([-(directive,ref(976))],2),table([-(yes,ref(1000))],2),table([-(/(pragma,1),ref(1180)),-(/(module,3),ref(1187)),-(/(comment,2),ref(1194)),-(/(include,1),ref(196)),-(/(',',2),ref(35)),-(/(begin_module,1),ref(1201)),-(/(module,1),ref(330)),-(/(module_interface,1),ref(282)),-(/(meta_attribute,2),ref(1208))],18),table([-(true,ref(272))],2)),1292,0,0,'Compiler/source_processor.ecl',0,0))).
:-(:(sepia_kernel,store_pred(/(directive_warning,3),[](o(136),pw(4),o(16),a(3),functor(/(source_position,13)),ref(18),o(349),pw(2),o(2),a(1),a(4),o(368),a(1),y(3),o(349),pw(9),o(139),ref(26),o(265),pw(2),o(2),a(1),a(4),o(365),a(1),y(3),o(355),a(4),y(1),a(2),y(2),o(99),a(2),o(399),a(3),y(4),proc(/(pathname,3)),31,o(106),a(3),o(80),y(1),o(90),o(80),y(4),o(90),o(80),y(3),o(90),o(80),y(2),o(85),o(104),a(1),warning_output,o(105),a(2),"WARNING: %w in file %w, line %d:%n:- %w.%n",o(404),a(4),source_processor,o(145),proc(:(sepia_kernel,/(printf_body,4))),o(0)),64,0,0,'Compiler/source_processor.ecl',0,0))).
:-(mode(iso_handle_directives(?,+,-,-))).
:-(:(sepia_kernel,store_pred(/(iso_handle_directives,4),[](o(123),a(1),ref(104),2,ref(95),o(7),a(3),a(2),o(13),a(4),directive,o(298),a(1),o(157),o(38),a(1),o(151),proc(/(handle_include,4)),o(7),a(3),a(2),o(13),a(4),handled_directive,o(16),a(1),functor(/(op,3)),ref(30),o(349),pw(3),o(16),a(2),functor(/(source_position,13)),ref(42),o(349),pw(10),o(37),a(3),o(349),pw(2),o(139),ref(46),o(265),pw(10),o(38),a(3),o(136),pw(1),o(203),y(1),o(128),0,3,ref(83),o(2),a(1),a(5),o(107),a(1),functor(/(@,2)),o(91),pw(2),o(79),a(3),o(61),functor(/(call,1)),o(79),a(5),o(99),a(2),o(104),a(3),fail,o(404),a(4),source_processor,o(143),proc(:(sepia_kernel,/(block,4))),3,o(204),y(1),pw(0),o(154),o(199),0,1,o(362),a(3),a(2),a(1),o(105),a(1),"Directive failed or aborted",o(145),proc(/(directive_warning,3)),o(7),a(3),a(2),o(13),a(4),directive,o(157),o(0),o(177),table([-(/(include,1),ref(14)),-(/(op,3),ref(18))],4)),108,0,0,'Compiler/source_processor.ecl',0,0))).
:-(:(sepia_kernel,store_pred(/(handle_include,4),[](o(122),a(1),ref(15),ref(5),ref(5),o(2),a(1),a(5),o(106),a(1),o(79),a(5),o(85),o(150),ref(0),o(38),a(1),o(2),a(4),a(9),o(38),a(4),o(13),a(9),handled_directive,o(16),a(2),functor(/(source_position,13)),ref(46),o(349),pw(2),o(369),a(7),a(8),o(349),pw(3),o(37),a(6),o(349),pw(2),o(37),a(5),o(349),pw(2),o(139),ref(59),o(265),pw(2),o(366),a(7),a(8),o(265),pw(3),o(38),a(6),o(265),pw(2),o(38),a(5),o(136),pw(4),o(203),y(1),o(128),0,8,ref(84),o(364),a(7),a(6),a(5),a(3),a(2),o(362),a(2),a(4),a(7),o(143),proc(/(source_open,6)),3,o(204),y(1),pw(0),o(154),o(199),0,1,o(352),3,a(2),y(2),o(106),a(3),o(79),a(1),o(90),o(79),a(7),o(90),o(79),a(8),o(85),o(104),a(1),warning_output,o(105),a(2),"WARNING: Could not open include file \"%w\"%nin file %w, line %d%n",o(404),a(4),source_processor,o(143),proc(:(sepia_kernel,/(printf_body,4))),29,o(167),y(4),ref(119),ref(132),ref(119),o(107),a(1),functor(/(include,1)),o(80),y(4),o(99),a(4),o(351),2,y(2),a(2),o(145),proc(/(handle_directives,4)),o(4),y(4),a(1),o(17),a(1),o(289),y(2),y(3),o(154),o(0)),142,0,0,'Compiler/source_processor.ecl',0,0))).
:-(mode(handled_directive(+,-))).
:-(:(sepia_kernel,store_pred(/(handled_directive,2),[](o(123),a(1),ref(92),7,ref(fail),o(128),0,2,ref(18),o(16),a(1),functor(/(local,1)),ref(14),o(33),o(13),a(2),no,o(157),o(131),0,ref(30),o(16),a(1),functor(/(export,1)),ref(26),o(33),o(13),a(2),no,o(157),o(131),0,ref(42),o(16),a(1),functor(/(reexport,1)),ref(38),o(33),o(13),a(2),no,o(157),o(131),0,ref(54),o(16),a(1),functor(/(use_module,1)),ref(50),o(33),o(13),a(2),yes,o(157),o(131),0,ref(66),o(16),a(1),functor(/(lib,1)),ref(62),o(33),o(13),a(2),yes,o(157),o(131),0,ref(79),o(16),a(1),functor(/(op,3)),ref(75),o(349),pw(3),o(13),a(2),no,o(157),o(134),0,o(16),a(1),functor(/(meta_attribute,2)),ref(87),o(349),pw(2),o(13),a(2),no,o(157),o(0),table([-(/(op,3),ref(75)),-(/(reexport,1),ref(38)),-(/(use_module,1),ref(50)),-(/(export,1),ref(26)),-(/(meta_attribute,2),ref(87)),-(/(lib,1),ref(62)),-(/(local,1),ref(14))],14)),106,0,0,'Compiler/source_processor.ecl',0,0))).
:-(:(sepia_kernel,store_pred(/(obsolete_directive,1),[](o(124),a(1),ref(fail),ref(193),ref(fail),ref(fail),ref(fail),ref(fail),ref(fail),ref(fail),ref(fail),ref(fail),ref(fail),ref(188),ref(15),o(128),0,1,ref(25),o(16),a(1),functor(/(define_struct,1)),ref(198),o(33),o(157),o(131),0,ref(35),o(16),a(1),functor(/(global_op,3)),ref(198),o(349),pw(3),o(157),o(131),0,ref(45),o(16),a(1),functor(/(local_op,3)),ref(198),o(349),pw(3),o(157),o(131),0,ref(55),o(16),a(1),functor(/(define_global_macro,3)),ref(198),o(349),pw(3),o(157),o(131),0,ref(65),o(16),a(1),functor(/(define_local_macro,3)),ref(198),o(349),pw(3),o(157),o(131),0,ref(75),o(16),a(1),functor(/(define_macro,3)),ref(198),o(349),pw(3),o(157),o(131),0,ref(85),o(16),a(1),functor(/(set_chtab,2)),ref(198),o(349),pw(2),o(157),o(131),0,ref(92),o(13),a(1),cprolog,o(157),o(131),0,ref(99),o(13),a(1),quintus,o(157),o(131),0,ref(106),o(13),a(1),bsi,o(157),o(131),0,ref(113),o(13),a(1),sicstus,o(157),o(131),0,ref(123),o(16),a(1),functor(/(autoload,2)),ref(198),o(349),pw(2),o(157),o(131),0,ref(133),o(16),a(1),functor(/(autoload_tool,2)),ref(198),o(349),pw(2),o(157),o(131),0,ref(142),o(16),a(1),functor(/(local_record,1)),ref(198),o(33),o(157),o(131),0,ref(151),o(16),a(1),functor(/(make_array,1)),ref(198),o(33),o(157),o(131),0,ref(161),o(16),a(1),functor(/(make_array,2)),ref(198),o(349),pw(2),o(157),o(131),0,ref(170),o(16),a(1),functor(/(make_local_array,1)),ref(198),o(33),o(157),o(131),0,ref(180),o(16),a(1),functor(/(make_local_array,2)),ref(198),o(349),pw(2),o(157),o(134),0,o(16),a(1),functor(/(tool,1)),ref(198),o(33),o(157),o(121),a(1),ref(200),4,ref(fail),o(123),a(1),ref(208),15,ref(fail),o(157),o(0),table([-(quintus,ref(98)),-(sicstus,ref(112)),-(bsi,ref(105)),-(cprolog,ref(91))],8),table([-(/(define_local_macro,3),ref(198)),-(/(global_op,3),ref(198)),-(/(local_record,1),ref(198)),-(/(autoload,2),ref(198)),-(/(local_op,3),ref(198)),-(/(tool,1),ref(198)),-(/(autoload_tool,2),ref(198)),-(/(make_array,1),ref(198)),-(/(make_array,2),ref(198)),-(/(make_local_array,1),ref(198)),-(/(define_global_macro,3),ref(198)),-(/(define_macro,3),ref(198)),-(/(set_chtab,2),ref(198)),-(/(make_local_array,2),ref(198)),-(/(define_struct,1),ref(198))],30)),238,0,0,'Compiler/source_processor.ecl',0,0))).
:-(export(/(meta_attribute_now_later,3))).
:-(mode(meta_attribute_now_later(?,-,-))).
:-(:(sepia_kernel,store_pred(/(meta_attribute_now_later,3),[](o(122),a(1),ref(11),ref(5),ref(5),o(7),a(2),a(1),o(10),a(3),o(157),o(136),pw(3),o(22),a(1),ref(16),o(365),a(1),y(3),o(212),a(4),o(123),a(1),ref(102),1,ref(75),o(139),ref(75),o(128),0,4,ref(72),o(299),a(1),o(16),a(1),functor(/(:,2)),ref(43),o(37),a(5),o(33),o(139),ref(45),o(38),a(5),o(20),a(5),suspension_lists,o(403),a(4),pw(3),o(15),a(2),ref(63),o(43),a(1),o(41),y(1),o(3),a(3),y(2),o(139),ref(91),o(44),a(1),o(42),y(1),o(3),a(3),y(2),o(139),ref(91),o(199),0,9,o(3),a(2),y(1),o(15),a(3),ref(87),o(43),a(1),o(41),y(2),o(139),ref(91),o(44),a(1),o(42),y(2),o(4),y(3),a(1),o(351),2,y(1),a(2),o(144),ref(0),o(0),o(177),table([-(/(:,2),ref(28))],2)),104,0,0,'Compiler/source_processor.ecl',0,0))).
:-(:(sepia_kernel,store_pred(/(read_comment,2),[](o(6),pw(5),a(1),y(3),o(3),a(2),y(2),o(375),a(2),y(4),a(3),y(5),o(143),proc(/(get_cc,3)),61,o(285),a(4),y(1),o(351),3,y(3),a(1),o(143),proc(/(skip_to_comment,4)),7,o(4),y(1),a(2),o(15),a(2),ref(33),o(349),pw(2),o(397),y(2),a(1),proc(/(string_list,2)),o(0)),38,0,0,'Compiler/source_processor.ecl',0,0))).
:-(:(sepia_kernel,store_pred(/(skip_to_comment,4),[](o(212),a(5),o(121),a(3),ref(260),4,ref(234),o(129),0,5,ref(14),o(135),0,ref(57),o(13),a(3),line_comment,o(136),pw(4),o(15),a(4),ref(28),o(43),a(2),o(41),y(2),o(139),ref(32),o(44),a(2),o(42),y(2),o(403),a(5),pw(4),o(3),a(1),y(1),o(375),a(2),y(3),a(3),y(4),o(143),proc(/(get_cc,3)),31,o(4),y(1),a(1),o(351),2,y(3),a(2),o(397),y(2),a(4),proc(/(skip_line_comment,4)),o(13),a(3),first_comment,o(6),pw(8),a(1),y(1),o(355),a(2),y(2),a(4),y(3),o(375),a(2),y(4),a(3),y(5),o(143),proc(/(get_cc,3)),63,o(125),y(5),ref(268),1,ref(82),o(395),y(1),a(1),proc(/(unget,1)),15,o(104),a(3),symbol,o(351),2,y(1),a(1),o(396),y(3),a(4),ref(0),o(4),y(5),a(4),o(20),a(4),second_comment,o(4),y(3),a(4),o(15),a(4),ref(119),o(47),y(2),o(65),o(47),y(4),o(41),y(6),o(139),ref(127),o(48),y(2),o(70),ref(113),o(48),y(4),o(42),y(6),o(375),a(2),y(7),a(3),y(8),o(395),y(1),a(1),proc(/(get_cc,3)),451,o(4),y(1),a(1),o(351),2,y(7),a(2),o(397),y(6),a(4),proc(/(skip_bracketed_comment,4)),o(13),a(3),blank_space,o(136),pw(4),o(15),a(4),ref(162),o(43),a(2),o(41),y(2),o(139),ref(166),o(44),a(2),o(42),y(2),o(403),a(5),pw(4),o(3),a(1),y(1),o(375),a(2),y(3),a(3),y(4),o(143),proc(/(get_cc,3)),31,o(4),y(1),a(1),o(351),2,y(3),a(2),o(396),y(2),a(4),ref(0),o(13),a(3),end_of_line,o(136),pw(4),o(15),a(4),ref(205),o(43),a(2),o(41),y(2),o(139),ref(209),o(44),a(2),o(42),y(2),o(403),a(5),pw(4),o(3),a(1),y(1),o(375),a(2),y(3),a(3),y(4),o(143),proc(/(get_cc,3)),31,o(4),y(1),a(1),o(351),2,y(3),a(2),o(396),y(2),a(4),ref(0),o(10),a(4),o(151),proc(/(unget,1)),o(129),0,5,ref(191),o(135),0,ref(234),o(129),0,5,ref(14),o(135),0,ref(234),o(129),0,5,ref(148),o(135),0,ref(234),o(0),table([-(end_of_line,ref(238)),-(first_comment,ref(60)),-(line_comment,ref(245)),-(blank_space,ref(252))],8),table([-(second_comment,ref(98))],2)),270,0,0,'Compiler/source_processor.ecl',0,0))).
:-(:(sepia_kernel,store_pred(/(skip_line_comment,4),[](o(212),a(5),o(121),a(3),ref(126),2,ref(73),o(122),a(4),ref(110),ref(16),ref(fail),o(128),0,5,ref(25),o(13),a(3),eof,o(10),a(4),o(251),a(5),o(151),proc(/(unget,1)),o(131),0,ref(71),o(13),a(3),end_of_line,o(136),pw(4),o(15),a(4),ref(42),o(43),a(2),o(41),y(2),o(139),ref(46),o(44),a(2),o(42),y(2),o(403),a(5),pw(4),o(3),a(1),y(1),o(375),a(2),y(3),a(3),y(4),o(143),proc(/(get_cc,3)),31,o(4),y(1),a(1),o(351),2,y(3),a(2),o(397),y(2),a(4),proc(/(skip_to_comment,4)),o(134),0,o(136),pw(4),o(15),a(4),ref(84),o(43),a(2),o(41),y(2),o(139),ref(88),o(44),a(2),o(42),y(2),o(3),a(1),y(1),o(375),a(2),y(3),a(3),y(4),o(143),proc(/(get_cc,3)),31,o(4),y(1),a(1),o(351),2,y(3),a(2),o(396),y(2),a(4),ref(0),o(129),0,5,ref(28),o(135),0,ref(73),o(129),0,5,ref(16),o(135),0,ref(73),o(0),o(177),table([-(end_of_line,ref(110)),-(eof,ref(117))],4)),130,0,0,'Compiler/source_processor.ecl',0,0))).
:-(:(sepia_kernel,store_pred(/(skip_bracketed_comment,4),[](o(212),a(5),o(121),a(3),ref(142),1,ref(104),o(128),0,5,ref(102),o(13),a(3),second_comment,o(136),pw(7),o(15),a(4),ref(25),o(43),a(2),o(41),y(2),o(139),ref(29),o(44),a(2),o(42),y(2),o(403),a(5),pw(7),o(3),a(1),y(1),o(375),a(2),y(3),a(3),y(4),o(143),proc(/(get_cc,3)),31,o(125),y(4),ref(144),1,ref(48),o(4),y(1),a(1),o(351),2,y(3),a(2),o(396),y(2),a(4),ref(0),o(4),y(4),a(4),o(20),a(4),first_comment,o(4),y(2),a(4),o(15),a(4),ref(77),o(47),y(3),o(41),y(5),o(139),ref(81),o(48),y(3),o(42),y(5),o(375),a(2),y(6),a(3),y(7),o(395),y(1),a(1),proc(/(get_cc,3)),227,o(4),y(1),a(1),o(351),2,y(6),a(2),o(397),y(5),a(4),proc(/(skip_to_comment,4)),o(134),0,o(136),pw(4),o(15),a(4),ref(115),o(43),a(2),o(41),y(2),o(139),ref(119),o(44),a(2),o(42),y(2),o(3),a(1),y(1),o(375),a(2),y(3),a(3),y(4),o(143),proc(/(get_cc,3)),31,o(4),y(1),a(1),o(351),2,y(3),a(2),o(396),y(2),a(4),ref(0),o(0),table([-(second_comment,ref(7))],2),table([-(first_comment,ref(59))],2)),146,0,0,'Compiler/source_processor.ecl',0,0))).
:-(:(sepia_kernel,store_pred(/(get_cc,3),[](o(6),pw(2),a(2),y(1),o(3),a(3),y(2),o(143),proc(/(get,2)),7,o(212),a(1),o(125),y(2),ref(56),1,ref(21),o(128),0,1,ref(45),o(102),a(4),0,o(2),a(1),a(5),o(4),y(1),a(1),o(337),a(1),a(4),source_processor,48,o(403),a(5),pw(2),o(404),a(3),source_processor,o(397),y(2),a(2),proc(:(sepia_kernel,/(get_chtab_,3))),o(199),0,5,o(4),y(2),a(1),o(13),a(1),eof,o(154),o(0),table([-(eof,ref(17))],2)),58,0,0,'Compiler/source_processor.ecl',0,0))).
:-(:(sepia_kernel,store_pred(/(skip_to_fullstop,1),[](o(6),pw(4),a(1),y(1),o(399),a(2),y(2),proc(/(get,2)),7,o(127),y(2),ref(84),2,ref(79),o(4),y(2),a(3),o(11),a(3),46,o(285),a(2),y(4),o(395),y(1),a(1),proc(/(get,2)),19,o(203),y(3),o(128),0,0,ref(57),o(102),a(2),-1,o(395),y(4),a(1),proc(/(\=,2)),25,o(104),a(2),end_of_line,o(404),a(3),source_processor,o(395),y(4),a(1),proc(:(sepia_kernel,/(get_chtab_,3))),9,o(204),y(3),pw(0),o(154),o(199),0,3,o(395),y(1),a(1),proc(/(unget,1)),3,o(396),y(1),a(1),ref(0),o(4),y(2),a(2),o(11),a(2),-1,o(397),y(1),a(1),proc(/(unget,1)),o(396),y(1),a(1),ref(0),o(0),-1,ref(69),46,ref(14)),88,0,0,'Compiler/source_processor.ecl',0,0))).
:-(:(sepia_kernel,store_pred(/(skip_to_endif,3),[](o(6),pw(5),a(1),y(2),o(352),2,a(2),y(3),o(399),a(2),y(5),proc(/(skip_to_conditional,3)),61,o(203),y(1),o(128),0,0,ref(36),o(107),a(1),functor(/(:-,1)),o(80),y(5),o(143),proc(/(is_else_directive,1)),31,o(204),y(1),pw(4),o(351),3,y(2),a(1),o(144),ref(0),o(199),0,41,o(289),y(3),y(5),o(154),o(0)),44,0,0,'Compiler/source_processor.ecl',0,0))).
:-(:(sepia_kernel,store_pred(/(skip_to_conditional,3),[](o(16),a(1),functor(/(source_position,13)),ref(11),o(33),o(37),a(1),o(349),pw(11),o(139),ref(14),o(34),o(38),a(1),o(362),a(4),a(3),a(2),o(102),a(2),0,o(151),proc(/(skip_to_conditional,4)),o(0)),24,0,0,'Compiler/source_processor.ecl',0,0))).
:-(:(sepia_kernel,store_pred(/(skip_to_conditional,4),[](o(6),pw(5),a(1),y(2),o(352),3,a(2),y(3),o(104),a(1),error,o(399),a(2),y(1),proc(/(get_stream,2)),63,o(104),a(1),error,o(104),a(2),null,o(143),proc(/(set_stream,2)),63,o(351),4,y(2),a(1),o(143),proc(/(skip_to_conditional1,4)),3,o(104),a(1),error,o(397),y(1),a(2),proc(/(set_stream,2)),o(0)),40,0,0,'Compiler/source_processor.ecl',0,0))).
:-(:(sepia_kernel,store_pred(/(skip_to_conditional1,4),[](o(136),pw(7),o(203),y(1),o(128),0,4,ref(229),o(352),4,a(1),y(2),o(285),a(2),y(6),o(2),a(4),a(3),o(143),proc(:(sepia_kernel,/(read_,3))),127,o(204),y(1),pw(7),o(212),a(1),o(206),y(6),ref(41),ref(255),ref(41),ref(41),ref(41),ref(41),ref(41),ref(41),ref(41),ref(41),ref(41),ref(250),ref(41),o(129),0,1,ref(134),o(343),0,ref(162),125,o(344),0,ref(223),61,o(4),y(6),a(2),o(20),a(2),end_of_file,o(395),y(2),a(1),proc(/(unget,1)),17,o(4),y(4),a(1),o(13),a(1),end_of_file,o(154),o(107),a(2),functor(/(:-,1)),o(61),endif,o(4),y(6),a(3),o(188),a(3),a(2),o(403),a(1),pw(5),o(212),a(1),o(125),y(4),ref(262),1,ref(96),o(128),0,1,ref(124),o(102),a(5),0,o(4),y(3),a(6),o(336),a(6),a(5),source_processor,48,o(403),a(1),pw(5),o(321),a(6),-1,a(2),24,o(4),y(2),a(1),o(351),2,y(4),a(3),o(144),ref(0),o(199),0,17,o(4),y(4),a(1),o(13),a(1),endif,o(154),o(3),a(1),y(7),o(395),y(6),a(1),proc(/(is_if_directive,1)),189,o(204),y(7),pw(5),o(4),y(3),a(5),o(321),a(5),1,a(2),24,o(4),y(2),a(1),o(351),2,y(4),a(3),o(144),ref(0),o(3),a(1),y(7),o(395),y(6),a(1),proc(/(is_else_directive,1)),253,o(204),y(7),pw(6),o(212),a(1),o(126),y(6),ref(264),1,ref(184),o(128),0,1,ref(207),o(102),a(5),0,o(4),y(3),a(2),o(336),a(2),a(5),source_processor,48,o(403),a(1),pw(5),o(4),y(2),a(1),o(351),2,y(4),a(3),o(144),ref(0),o(199),0,81,o(4),y(6),a(1),o(16),a(1),functor(/(:-,1)),ref(220),o(47),y(4),o(154),o(48),y(4),o(154),o(351),4,y(2),a(1),o(144),ref(0),o(199),0,1,o(144),ref(0),o(129),0,1,ref(71),o(343),0,ref(134),125,o(343),0,ref(162),125,o(344),0,ref(223),61,o(125),y(6),ref(266),1,ref(41),o(126),y(6),ref(268),1,ref(41),o(0),o(177),table([-(endif,ref(92))],2),table([-(/(:-,1),ref(180))],2),table([-(end_of_file,ref(53))],2),table([-(/(:-,1),ref(234))],2)),270,0,0,'Compiler/source_processor.ecl',0,0))).
:-(:(sepia_kernel,store_pred(/(is_if_directive,1),[](o(23),a(1),functor(/(:-,1)),ref(4),o(74),functor(/(if,1)),ref(fail),o(157),o(0)),9,0,0,'Compiler/source_processor.ecl',0,0))).
:-(:(sepia_kernel,store_pred(/(is_else_directive,1),[](o(123),a(1),ref(30),1,ref(fail),o(139),ref(fail),o(128),0,1,ref(19),o(23),a(1),functor(/(:-,1)),ref(15),o(74),functor(/(elif,1)),ref(fail),o(157),o(134),0,o(23),a(1),functor(/(:-,1)),ref(25),o(197),o(62),else,o(157),o(0),table([-(/(:-,1),ref(7))],2)),32,0,0,'Compiler/source_processor.ecl',0,0))).
