Check-in [dce68ecbca]
Not logged in
Overview
Comment:Compiles on openSUSE. An effort to remove libreadline, GTK, Cairo.
Downloads: Tarball | ZIP archive | SQL archive
Timelines: family | ancestors | descendants | both | trunk
Files: files | file ages | folders
SHA1: dce68ecbca2c318ffadff068bbb85b0c70b80090
User & Date: martin_vahi on 2016-09-12 03:49:01
Other Links: manifest | tags
Context
2016-09-14 01:57
removal of psltags to make it compile on 32bit Raspberry Pi 1 check-in: 7e507010c9 user: martin_vahi tags: trunk
2016-09-12 03:49
Compiles on openSUSE. An effort to remove libreadline, GTK, Cairo. check-in: dce68ecbca user: martin_vahi tags: trunk
2016-09-12 01:57
no fork related modifications yet check-in: c4610bf5b1 user: martin_vahi tags: trunk
Changes
Hide Diffs Unified Diffs Ignore Whitespace Patch

Modified work_in_progress/ParaSail_compiler_fork/ParaSail_v_6_5_console_version/interpreter/cairo_c_interface.ads from [32f08d05d5] to [98968cbe4f].

15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
-- of the license.                                                          --
--                                                                          --
-- The ParaSail language and implementation were originally developed by    --
-- S. Tucker Taft.                                                          --
------------------------------------------------------------------------------

with Interfaces.C; use Interfaces.C;
with GTK_C_Interface;
with System;

package Cairo_C_Interface is

   type CairoContext is private;

   function gdk_cairo_create







|







15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
-- of the license.                                                          --
--                                                                          --
-- The ParaSail language and implementation were originally developed by    --
-- S. Tucker Taft.                                                          --
------------------------------------------------------------------------------

with Interfaces.C; use Interfaces.C;
--with GTK_C_Interface;
with System;

package Cairo_C_Interface is

   type CairoContext is private;

   function gdk_cairo_create

Modified work_in_progress/ParaSail_compiler_fork/ParaSail_v_6_5_console_version/interpreter/psc-interpreter-cairo.adb from [4e90a9e28c] to [fff39c6005].

20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35

with PSC.Interpreter.Builtins;         use PSC.Interpreter.Builtins;
with PSC.Interpreter.Param_Signatures; use PSC.Interpreter.Param_Signatures;
with PSC.Interpreter.GTK;
with PSC.Strings;
with Ada.Text_IO;
with Interfaces.C; use Interfaces.C;
with GTK_C_Interface;
with Cairo_C_Interface;
with System.Storage_Elements;
with Ada.Unchecked_Conversion;
pragma Elaborate (PSC.Interpreter.Builtins);
pragma Elaborate (PSC.Interpreter.Param_Signatures);
pragma Elaborate (PSC.Strings);
pragma Elaborate (Ada.Text_IO);








|
|







20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35

with PSC.Interpreter.Builtins;         use PSC.Interpreter.Builtins;
with PSC.Interpreter.Param_Signatures; use PSC.Interpreter.Param_Signatures;
with PSC.Interpreter.GTK;
with PSC.Strings;
with Ada.Text_IO;
with Interfaces.C; use Interfaces.C;
--with GTK_C_Interface;
--with Cairo_C_Interface;
with System.Storage_Elements;
with Ada.Unchecked_Conversion;
pragma Elaborate (PSC.Interpreter.Builtins);
pragma Elaborate (PSC.Interpreter.Param_Signatures);
pragma Elaborate (PSC.Strings);
pragma Elaborate (Ada.Text_IO);

Modified work_in_progress/ParaSail_compiler_fork/ParaSail_v_6_5_console_version/interpreter/psc-interpreter-gtk.ads from [a4c55b09c1] to [a0558b18ca].

14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
-- COPYING3.  If not, go to http://www.gnu.org/licenses for a complete copy --
-- of the license.                                                          --
--                                                                          --
-- The ParaSail language and implementation were originally developed by    --
-- S. Tucker Taft.                                                          --
------------------------------------------------------------------------------

with GTK_C_Interface;
package PSC.Interpreter.GTK is
   --  Package providing support for builtin ParaSail GTK-related operations
   pragma Elaborate_Body;

   function Poly_To_GtkWidget (Poly : Object_Virtual_Address)
     return GTK_C_Interface.GtkWidget;
   --  Convert a word representing a ParaSail polymorphic Widget+
   --  to a GtkWidget

end PSC.Interpreter.GTK;







|










14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
-- COPYING3.  If not, go to http://www.gnu.org/licenses for a complete copy --
-- of the license.                                                          --
--                                                                          --
-- The ParaSail language and implementation were originally developed by    --
-- S. Tucker Taft.                                                          --
------------------------------------------------------------------------------

--with GTK_C_Interface;
package PSC.Interpreter.GTK is
   --  Package providing support for builtin ParaSail GTK-related operations
   pragma Elaborate_Body;

   function Poly_To_GtkWidget (Poly : Object_Virtual_Address)
     return GTK_C_Interface.GtkWidget;
   --  Convert a word representing a ParaSail polymorphic Widget+
   --  to a GtkWidget

end PSC.Interpreter.GTK;

Modified work_in_progress/ParaSail_compiler_fork/ParaSail_v_6_5_console_version/javallel_parser/javallel_main.adb from [1d6eff0c6b] to [62576ad70d].

25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
with PSC.Trees.Semantics;
with PSC.Interpreter;
with PSC.Interpreter.IO;  --  Pull in I/O builtins
with PSC.Trees.Semantics.Translator;  --  So will have translator primitives

with Javallel_Lex_DFA;

with RL_C_Interface;  --  Pull in readline interface

with Ada.Command_Line; use Ada.Command_Line;
with Ada.Exceptions;

procedure Javallel_Main is
--  Main procedure for Javallel.
   Total_Errors  : Natural := 0;







|







25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
with PSC.Trees.Semantics;
with PSC.Interpreter;
with PSC.Interpreter.IO;  --  Pull in I/O builtins
with PSC.Trees.Semantics.Translator;  --  So will have translator primitives

with Javallel_Lex_DFA;

--with RL_C_Interface;  --  Pull in readline interface

with Ada.Command_Line; use Ada.Command_Line;
with Ada.Exceptions;

procedure Javallel_Main is
--  Main procedure for Javallel.
   Total_Errors  : Natural := 0;

Modified work_in_progress/ParaSail_compiler_fork/ParaSail_v_6_5_console_version/parser/parasail_main.adb from [3cf513460f] to [e0e493a92a].

23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
with PSC.Syntax;
with PSC.Trees.Semantics;

pragma Warnings (Off);
with PSC.Interpreter.IO;  --  Pull in I/O builtins
with PSC.Interpreter.Math;  --  Pull in Math builtins
with PSC.Trees.Semantics.Translator;  --  So will have translator primitives
with RL_C_Interface;  --  Pull in readline/add_history interface
pragma Warnings (On);

procedure ParaSail_Main is
--  Main procedure for ParaSail.
--  See ParaSail_Main_GTK for version that pulls in builtins for GTK graphics.
   Total_Errors : Natural := 0;
   Command_Given : Boolean := False;







|







23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
with PSC.Syntax;
with PSC.Trees.Semantics;

pragma Warnings (Off);
with PSC.Interpreter.IO;  --  Pull in I/O builtins
with PSC.Interpreter.Math;  --  Pull in Math builtins
with PSC.Trees.Semantics.Translator;  --  So will have translator primitives
--with RL_C_Interface;  --  Pull in readline/add_history interface
pragma Warnings (On);

procedure ParaSail_Main is
--  Main procedure for ParaSail.
--  See ParaSail_Main_GTK for version that pulls in builtins for GTK graphics.
   Total_Errors : Natural := 0;
   Command_Given : Boolean := False;

Modified work_in_progress/ParaSail_compiler_fork/ParaSail_v_6_5_console_version/parser/parasail_main_gtk.adb from [2af3d511c2] to [3da11b5d65].

17
18
19
20
21
22
23
24
25
26
27
28
29
30
-- The ParaSail language and implementation were originally developed by    --
-- S. Tucker Taft.                                                          --
------------------------------------------------------------------------------

pragma Style_Checks (Off);

with ParaSail_Main;
with PSC.Interpreter.GTK; --  Pull in GTK builtins
with PSC.Interpreter.Cairo;  --  Pull in Cairo builtins
procedure ParaSail_Main_GTK is
--  Version of ParaSail which includes builtins for GTK graphics
begin
   ParaSail_Main;
end ParaSail_Main_GTK;







|
|





17
18
19
20
21
22
23
24
25
26
27
28
29
30
-- The ParaSail language and implementation were originally developed by    --
-- S. Tucker Taft.                                                          --
------------------------------------------------------------------------------

pragma Style_Checks (Off);

with ParaSail_Main;
--with PSC.Interpreter.GTK; --  Pull in GTK builtins
--with PSC.Interpreter.Cairo;  --  Pull in Cairo builtins
procedure ParaSail_Main_GTK is
--  Version of ParaSail which includes builtins for GTK graphics
begin
   ParaSail_Main;
end ParaSail_Main_GTK;

Modified work_in_progress/ParaSail_compiler_fork/ParaSail_v_6_5_console_version/parython_parser/parython_main.adb from [9d07b32f68] to [43ca4f9f7b].

27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
with PSC.Trees.Semantics;
with PSC.Interpreter;
with PSC.Interpreter.IO;  --  Pull in I/O builtins
with PSC.Trees.Semantics.Translator;  --  So will have translator primitives

with Parython_Lex_DFA;

with RL_C_Interface;  --  Pull in readline interface

with Ada.Command_Line; use Ada.Command_Line;
with Ada.Exceptions;

procedure Parython_Main is
--  Main procedure for Parython.
--  See Parython_Main_GTK for version that pulls in builtins for GTK graphics.







|







27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
with PSC.Trees.Semantics;
with PSC.Interpreter;
with PSC.Interpreter.IO;  --  Pull in I/O builtins
with PSC.Trees.Semantics.Translator;  --  So will have translator primitives

with Parython_Lex_DFA;

--with RL_C_Interface;  --  Pull in readline interface

with Ada.Command_Line; use Ada.Command_Line;
with Ada.Exceptions;

procedure Parython_Main is
--  Main procedure for Parython.
--  See Parython_Main_GTK for version that pulls in builtins for GTK graphics.

Modified work_in_progress/ParaSail_compiler_fork/ParaSail_v_6_5_console_version/parython_parser/parython_main_gtk.adb from [fa7139fde1] to [a69d7a4fd3].

14
15
16
17
18
19
20
21
22
23
24
25
26
27
-- COPYING3.  If not, go to http://www.gnu.org/licenses for a complete copy --
-- of the license.                                                          --
------------------------------------------------------------------------------

pragma Style_Checks (Off);

with Parython_Main;
with PSC.Interpreter.GTK; --  Pull in GTK builtins
with PSC.Interpreter.Cairo;  --  Pull in Cairo builtins
procedure Parython_Main_GTK is
--  Version of Parython which includes builtins for GTK graphics
begin
   Parython_Main;
end Parython_Main_GTK;







|
|





14
15
16
17
18
19
20
21
22
23
24
25
26
27
-- COPYING3.  If not, go to http://www.gnu.org/licenses for a complete copy --
-- of the license.                                                          --
------------------------------------------------------------------------------

pragma Style_Checks (Off);

with Parython_Main;
--with PSC.Interpreter.GTK; --  Pull in GTK builtins
--with PSC.Interpreter.Cairo;  --  Pull in Cairo builtins
procedure Parython_Main_GTK is
--  Version of Parython which includes builtins for GTK graphics
begin
   Parython_Main;
end Parython_Main_GTK;

Modified work_in_progress/ParaSail_compiler_fork/ParaSail_v_6_5_console_version/sparkel_parser/sparkel_main.adb from [6e968eef7e] to [e990a64651].

24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
with PSC.Syntax;
with PSC.Trees.Semantics;
with PSC.Interpreter;
with PSC.Interpreter.Sparkel_Builtins;  --  Pull in Sparkel builtins
with PSC.Interpreter.IO;  --  Pull in I/O builtins
with PSC.Trees.Semantics.Translator;  --  So will have translator primitives

with RL_C_Interface;  --  Pull in readline interface

with Sparkel_Lex_DFA;

with Ada.Command_Line; use Ada.Command_Line;
with Ada.Exceptions;

procedure Sparkel_Main is







|







24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
with PSC.Syntax;
with PSC.Trees.Semantics;
with PSC.Interpreter;
with PSC.Interpreter.Sparkel_Builtins;  --  Pull in Sparkel builtins
with PSC.Interpreter.IO;  --  Pull in I/O builtins
with PSC.Trees.Semantics.Translator;  --  So will have translator primitives

--with RL_C_Interface;  --  Pull in readline interface

with Sparkel_Lex_DFA;

with Ada.Command_Line; use Ada.Command_Line;
with Ada.Exceptions;

procedure Sparkel_Main is