6663b6c9
 adorian
projet complet av...
|
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
|
// -*- mode:C++ ; compile-command: "g++ -I.. -g -c Input.cc" -*-
#ifndef _INPUT_H
#define _INPUT_H
#ifdef HAVE_CONFIG_H
#include "config.h"
#endif
#include "vector.h"
#include <string>
#ifndef IN_GIAC
#include <giac/first.h>
#include <giac/gen.h>
#include <giac/identificateur.h>
#else
#include "first.h"
#include "gen.h"
#include "identificateur.h"
#endif
#ifdef HAVE_LIBFLTK
#include <FL/Fl_Window.H>
#include <FL/Fl_Menu.H>
#include <FL/Fl_Group.H>
#include <FL/Fl_Scrollbar.H>
#include <FL/Fl_Multiline_Input.H>
#include <FL/Fl_Multiline_Output.H>
#include "FL/Fl_Help_Dialog.H"
#endif
#ifdef HAVE_LC_MESSAGES
#include <locale.h>
#endif
#include <giacintl.h>
#ifndef NO_NAMESPACE_XCAS
namespace xcas {
#endif // ndef NO_NAMESPACE_XCAS
// If use_external_browser is true you can change the browser used
// by setting the BROWSER env variable, e.g. export BROWSER=...
extern bool use_external_browser;
// alert if the command is not successfull
void system_browser(const std::string & s);
// return the last keyword of s
std::string motclef(const std::string & s);
#ifdef HAVE_LIBFLTK
extern Fl_Help_Dialog * Xcas_help_window;
extern Fl_Window * handle_tab_w ;
// Default vector of completions inside the Multiline_Input_tab
// Use the function read_aide to load completions from a help file
bool read_aide(const std::string & helpfilename,int language);
// Help window for the application, return 0 if cancel, 1 if add () or 2 if no ()
int handle_tab(const std::string & s,const std::vector<std::string> & v,int dx,int dy,int & remove,std::string & ans,bool allow_immediate_out=true);
int height(const char *,int);
class Flv_Table_Gen ;
void Multiline_default_callback(Fl_Widget * w,void *);
extern Fl_Widget * Xcas_input_focus;
class Multiline_Input_tab:public Fl_Multiline_Input {
static int count;
static std::vector<std::string> history;
bool handling;
int in_handle(int);
public:
std::vector<std::string> * completion_tab ;
virtual FL_EXPORT int handle(int);
// virtual FL_EXPORT void draw();
// if selected is true, it will select the insertion
void insert_replace(const std::string & chaine,bool selected);
Flv_Table_Gen * tableur;
giac::gen _g; // If the widget is not changed() then parse will use g
giac::gen g();
void set_g(const giac::gen & g);
void match(); // Show matching parenthesis, [ , etc. region
Multiline_Input_tab(int x,int y,int w,int h,const char * l= 0);
virtual ~Multiline_Input_tab() { if (Xcas_input_focus==this) Xcas_input_focus=0;}
void resize_nl(); // resize input and parents according to number of lines
bool need_nl();
// return true if current line up to position is too large to be displayed
// with the current widget width (and font)
};
void increase_size(Fl_Widget * wid,int L); // change parents size in a History_Pack
class Gen_Output:public Fl_Multiline_Output {
public:
giac::gen g;
void value(const giac::gen & _g);
void value(const char * ch);
virtual giac::gen value() const;
Gen_Output(int X,int Y,int W,int H,const char * l=0):Fl_Multiline_Output(X,Y,W,H,l),g(0) { Fl_Multiline_Output::value("0"); color(FL_WHITE); }
};
class Enlargable_Multiline_Output:public Fl_Multiline_Output {
public:
Enlargable_Multiline_Output(int x,int y,int w,int h,const char * l=0):Fl_Multiline_Output(x,y,w,h,l) {}
void resize();
void value(const char * ch);
};
class Comment_Multiline_Input:public Fl_Multiline_Input {
public:
Comment_Multiline_Input(int x,int y,int w,int h,const char * l=0);
virtual FL_EXPORT int handle(int);
virtual FL_EXPORT int in_handle(int);
virtual ~Comment_Multiline_Input() { if (Xcas_input_focus==this) Xcas_input_focus=0;}
};
// Convert a pnt to a user-readable string
std::string pnt2string(const giac::gen & g,const giac::context * contextptr);
#endif // HAVE_LIBFLTK
#ifndef NO_NAMESPACE_XCAS
} // namespace xcas
#endif // ndef NO_NAMESPACE_XCAS
#endif // _INPUT_H
|