gschem
|
#include <config.h>
#include "gschem.h"
#include "g_window.x"
Go to the source code of this file.
Functions | |
static size_t | smob_free (SCM smob) |
Free a GSCHEM_TOPLEVEL smob. | |
static int | smob_print (SCM smob, SCM port, scm_print_state *pstate) |
Print a representation of a GSCHEM_TOPLEVEL smob. | |
SCM | g_scm_from_window (GSCHEM_TOPLEVEL *w_current) |
Get the smob for a GSCHEM_TOPLEVEL. | |
void | g_dynwind_window (GSCHEM_TOPLEVEL *w_current) |
Set the GSCHEM_TOPLEVEL fluid in the current dynamic context. | |
SCM_DEFINE (current_window,"%current-window", 0, 0, 0,(),"Get the GSCHEM_TOPLEVEL for the current dynamic context.") | |
Get the value of the GSCHEM_TOPLEVEL fluid. | |
GSCHEM_TOPLEVEL * | g_current_window () |
Get the value of the GSCHEM_TOPLEVEL fluid. | |
SCM_DEFINE (active_page,"%active-page", 0, 0, 0,(),"Get the active page.") | |
Get the active page. | |
SCM_DEFINE (set_active_page_x,"%set-active-page!", 1, 0, 0,(SCM page_s),"Set the active page.") | |
Set the active page. | |
SCM_DEFINE (override_close_page_x,"%close-page!", 1, 0, 0,(SCM page_s),"Close a page.") | |
Close a page. | |
SCM_DEFINE (pointer_position,"%pointer-position", 0, 0, 0,(),"Get the current pointer position.") | |
Get the current pointer position. | |
SCM_DEFINE (snap_point,"%snap-point", 2, 0, 0,(SCM x_s, SCM y_s),"Get the current snap grid size.") | |
Snap a point to the snap grid. | |
static void | init_module_gschem_core_window () |
Create the (gschem core window) Scheme module. | |
void | g_init_window () |
Initialise the GSCHEM_TOPLEVEL manipulation procedures. | |
Variables | |
SCM | scheme_window_fluid = SCM_UNDEFINED |
scm_t_bits | window_smob_tag |
static size_t smob_free | ( | SCM | smob | ) | [static] |
Used internally to Guile
Definition at line 34 of file g_window.c.
static int smob_print | ( | SCM | smob, |
SCM | port, | ||
scm_print_state * | pstate | ||
) | [static] |
Used internally to Guile.
Definition at line 55 of file g_window.c.
SCM g_scm_from_window | ( | GSCHEM_TOPLEVEL * | w_current | ) |
window | GSCHEM_TOPLEVEL to obtain a smob for. |
a | smob representing window. |
Definition at line 81 of file g_window.c.
void g_dynwind_window | ( | GSCHEM_TOPLEVEL * | w_current | ) |
This function must be used inside a pair of calls to scm_dynwind_begin() and scm_dynwind_end(). During the dynwind context, the GSCHEM_TOPLEVEL fluid is set to w_current.
[in] | w_current | The new GSCHEM_TOPLEVEL pointer. |
Definition at line 103 of file g_window.c.
SCM_DEFINE | ( | current_window | , |
"%current-window" | , | ||
0 | , | ||
0 | , | ||
0 | , | ||
() | , | ||
"Get the GSCHEM_TOPLEVEL for the current dynamic context." | |||
) |
Definition at line 116 of file g_window.c.
GSCHEM_TOPLEVEL* g_current_window | ( | ) |
Definition at line 130 of file g_window.c.
SCM_DEFINE | ( | active_page | , |
"%active-page" | , | ||
0 | , | ||
0 | , | ||
0 | , | ||
() | , | ||
"Get the active page." | |||
) |
Definition at line 154 of file g_window.c.
SCM_DEFINE | ( | set_active_page_x | , |
"%set-active-page!" | , | ||
1 | , | ||
0 | , | ||
0 | , | ||
(SCM page_s) | , | ||
"Set the active page." | |||
) |
page_s | Page to switch to. |
Definition at line 177 of file g_window.c.
SCM_DEFINE | ( | override_close_page_x | , |
"%close-page!" | , | ||
1 | , | ||
0 | , | ||
0 | , | ||
(SCM page_s) | , | ||
"Close a page." | |||
) |
page_s | Page to close. |
Definition at line 200 of file g_window.c.
SCM_DEFINE | ( | pointer_position | , |
"%pointer-position" | , | ||
0 | , | ||
0 | , | ||
0 | , | ||
() | , | ||
"Get the current pointer position." | |||
) |
The coordinates are returned as a cons:
(x . y)
Definition at line 242 of file g_window.c.
SCM_DEFINE | ( | snap_point | , |
"%snap-point" | , | ||
2 | , | ||
0 | , | ||
0 | , | ||
(SCM x_s, SCM y_s) | , | ||
"Get the current snap grid size." | |||
) |
(x . y)
This always snaps the given point to the grid, disregarding the current user snap settings.
x_s | the x-coordinate of the point to be snapped to grid. |
y_s | the y-coordinate of the point to be snapped to grid. |
Definition at line 271 of file g_window.c.
static void init_module_gschem_core_window | ( | ) | [static] |
Definition at line 296 of file g_window.c.
void g_init_window | ( | ) |
Registers some Scheme procedures for working with GSCHEM_TOPLEVEL smobs and creates the GSCHEM_TOPLEVEL fluid. Should only be called by main_prog().
Definition at line 324 of file g_window.c.
SCM scheme_window_fluid = SCM_UNDEFINED |
Definition at line 23 of file g_window.c.
scm_t_bits window_smob_tag |
Definition at line 25 of file g_window.c.