You've already forked gnatstudio
mirror of
https://github.com/AdaCore/gnatstudio.git
synced 2026-02-12 12:42:33 -08:00
git-svn-id: svn+ssh://svn.eu/Dev/importfromcvs/trunk@101028 936e1b1b-40f2-da11-902a-00137254ae57
75 lines
2.6 KiB
Ada
Executable File
75 lines
2.6 KiB
Ada
Executable File
-----------------------------------------------------------------------
|
|
-- G P S --
|
|
-- --
|
|
-- Copyright (C) 2003-2007 --
|
|
-- AdaCore --
|
|
-- --
|
|
-- GPS is free software; you can redistribute it and/or modify it --
|
|
-- under the terms of the GNU General Public License as published by --
|
|
-- the Free Software Foundation; either version 2 of the License, or --
|
|
-- (at your option) any later version. --
|
|
-- --
|
|
-- This program is distributed in the hope that it will be useful, --
|
|
-- but WITHOUT ANY WARRANTY; without even the implied warranty of --
|
|
-- MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU --
|
|
-- General Public License for more details. You should have received --
|
|
-- a copy of the GNU General Public License along with this program; --
|
|
-- if not, write to the Free Software Foundation, Inc., 59 Temple --
|
|
-- Place - Suite 330, Boston, MA 02111-1307, USA. --
|
|
-----------------------------------------------------------------------
|
|
|
|
with GPS.Kernel; use GPS.Kernel;
|
|
|
|
package body Python_Module is
|
|
|
|
-------------------------
|
|
-- Override_Default_IO --
|
|
-------------------------
|
|
|
|
procedure Override_Default_IO
|
|
(Console : Interactive_Consoles.Interactive_Console)
|
|
is
|
|
pragma Unreferenced (Console);
|
|
begin
|
|
null;
|
|
end Override_Default_IO;
|
|
|
|
---------------------
|
|
-- Register_Module --
|
|
---------------------
|
|
|
|
procedure Register_Module
|
|
(Kernel : access GPS.Kernel.Kernel_Handle_Record'Class)
|
|
is
|
|
pragma Unreferenced (Kernel);
|
|
begin
|
|
null;
|
|
end Register_Module;
|
|
|
|
------------------------------------
|
|
-- Load_User_Python_Startup_Files --
|
|
------------------------------------
|
|
|
|
procedure Load_User_Python_Startup_Files
|
|
(Kernel : access GPS.Kernel.Kernel_Handle_Record'Class)
|
|
is
|
|
pragma Unreferenced (Kernel);
|
|
begin
|
|
null;
|
|
end Load_User_Python_Startup_Files;
|
|
|
|
--------------------------------------
|
|
-- Load_System_Python_Startup_Files --
|
|
--------------------------------------
|
|
|
|
procedure Load_System_Python_Startup_Files
|
|
(Kernel : access GPS.Kernel.Kernel_Handle_Record'Class)
|
|
is
|
|
pragma Unreferenced (Kernel);
|
|
begin
|
|
null;
|
|
end Load_System_Python_Startup_Files;
|
|
|
|
|
|
end Python_Module;
|