aboutsummaryrefslogtreecommitdiff
path: root/src/hyper/input.pamphlet
diff options
context:
space:
mode:
authordos-reis <gdr@axiomatics.org>2008-03-07 15:19:01 +0000
committerdos-reis <gdr@axiomatics.org>2008-03-07 15:19:01 +0000
commit8531f4c74274b8aa99168d220738227557a9c418 (patch)
treec50b77870e432317be8f99c248e1339f74b51661 /src/hyper/input.pamphlet
parent33949ff2e6e5b5abe8d22c5604f42a6c9371079a (diff)
downloadopen-axiom-8531f4c74274b8aa99168d220738227557a9c418.tar.gz
* hyper/: De-pamphletize.
Diffstat (limited to 'src/hyper/input.pamphlet')
-rw-r--r--src/hyper/input.pamphlet268
1 files changed, 0 insertions, 268 deletions
diff --git a/src/hyper/input.pamphlet b/src/hyper/input.pamphlet
deleted file mode 100644
index aa916d68..00000000
--- a/src/hyper/input.pamphlet
+++ /dev/null
@@ -1,268 +0,0 @@
-\documentclass{article}
-\usepackage{axiom}
-\begin{document}
-\title{\$SPAD/src/input}
-\author{The Axiom Team}
-\maketitle
-\begin{abstract}
-\end{abstract}
-\eject
-\tableofcontents
-\eject
-\section{input.c}
-<<input.c>>=
-#define _INPUT_C
-#include "axiom-c-macros.h"
-#include "useproto.h"
-#include "debug.h"
-
-#include "hyper.h"
-#include "dialog.h"
-#include "mem.h"
-
-#include "all_hyper_proto.H1"
-
-
-void
-fill_box(Window w,ImageStruct * image)
-{
- XClearWindow(gXDisplay, w);
- XPutImage(gXDisplay, w, gWindow->fControlGC,
- image->image.xi, 0, 0, 0, 0,
- image->width,
- image->height);
-}
-
-void
-toggle_input_box(HyperLink *link)
-{
- InputBox *box;
-
- box = link->reference.box;
-
- if (box->picked) {
- box->picked = 0;
- unpick_box(box);
- }
- else {
- box->picked = 1;
- pick_box(box);
- }
-
-}
-void
-toggle_radio_box(HyperLink *link)
-{
- InputBox *box;
-
- box = link->reference.box;
-
- if (box->picked) {
-
- /*
- * box->picked = 0; unpick_box(box);
- */
- }
- else {
- /* the first thing I do is clear his buddies */
- clear_rbs(box->rbs->boxes);
- box->picked = 1;
- pick_box(box);
- }
-}
-
-static void
-clear_rbs(InputBox *list)
-{
- InputBox *trace = list;
-
- while (trace && !trace->picked)
- trace = trace->next;
-
- if (trace != NULL) {
- trace->picked = 0;
- unpick_box(trace);
- }
-}
-void
-change_input_focus(HyperLink *link)
-{
- InputItem *new_item = link->reference.string;
- InputItem *old_item = gWindow->page->current_item;
- XWindowChanges wc;
-
- /** first thing I should do is see if the user has clicked in the same
- window that I am in ****/
- if (old_item == new_item)
- return;
-
- /** Now change the current pointer **/
- gWindow->page->current_item = new_item;
-
- /** Now I have to change the border width of the selected input window **/
- wc.border_width = 1;
- XConfigureWindow(gXDisplay, new_item->win,
- CWBorderWidth,
- &wc);
-
- wc.border_width = 0;
- XConfigureWindow(gXDisplay, new_item->win,
- CWBorderWidth,
- &wc);
- update_inputsymbol(old_item);
- update_inputsymbol(new_item);
-}
-void
-next_input_focus(void)
-{
- InputItem *old_item = gWindow->page->current_item, *new_item, *trace;
-
- if (gWindow->page->current_item == NULL ||
- (gWindow->page->current_item->next == NULL
- && gWindow->page->current_item == gWindow->page->input_list)) {
- BeepAtTheUser();
- return;
- }
-
- /*
- * Now I should find the new item
- */
- new_item = NULL;
- trace = old_item->next;
-
- if (trace == NULL)
- new_item = gWindow->page->input_list;
- else
- new_item = trace;
-
- gWindow->page->current_item = new_item;
- draw_inputsymbol(old_item);
- draw_inputsymbol(new_item);
-}
-void
-prev_input_focus(void)
-{
- InputItem *old_item = gWindow->page->current_item, *new_item, *trace;
-
- if (gWindow->page->current_item == NULL) {
- BeepAtTheUser();
- return;
- }
-
- /*
- * Now I should find the new item
- */
- new_item = NULL;
- trace = gWindow->page->input_list;
-
- if (trace == old_item) {
-
- /*
- * I started at the front of the list, so move forward until I hit
- * the end
- */
- while (trace->next != NULL)
- trace = trace->next;
- new_item = trace;
- }
- else {
- while (trace->next != old_item)
- trace = trace->next;
- new_item = trace;
- }
-
- gWindow->page->current_item = new_item;
- draw_inputsymbol(old_item);
- draw_inputsymbol(new_item);
-
-}
-
-InputItem *
-return_item(char *name)
-{
- InputItem *list;
-
- list = gWindow->page->input_list;
- while (list != NULL) {
- if (!strcmp(name, list->name))
- return list;
- list = list->next;
- }
- return NULL;
-}
-int
-delete_item(char *name)
-{
- InputItem *list;
- InputItem *prev = NULL;
-
- list = gWindow->page->input_list;
- while (list != NULL) {
- if (!strcmp(name, list->name)) {
- if (prev)
- prev->next = list->next;
- else
- gWindow->page->input_list = list->next;
- if (gWindow->page->current_item == list)
- gWindow->page->current_item = gWindow->page->input_list;
- free_input_item(list, 1);
- free(list);
- return 1;
- }
- prev = list;
- list = list->next;
- }
- fprintf(stderr, "Can't delete input item %s\n", name);
- return 0;
-}
-
-@
-\section{License}
-<<license>>=
-/*
-Copyright (c) 1991-2002, The Numerical ALgorithms Group Ltd.
-All rights reserved.
-
-Redistribution and use in source and binary forms, with or without
-modification, are permitted provided that the following conditions are
-met:
-
- - Redistributions of source code must retain the above copyright
- notice, this list of conditions and the following disclaimer.
-
- - Redistributions in binary form must reproduce the above copyright
- notice, this list of conditions and the following disclaimer in
- the documentation and/or other materials provided with the
- distribution.
-
- - Neither the name of The Numerical ALgorithms Group Ltd. nor the
- names of its contributors may be used to endorse or promote products
- derived from this software without specific prior written permission.
-
-THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS
-IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
-TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A
-PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER
-OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL,
-EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO,
-PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR
-PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF
-LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING
-NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
-SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
-*/
-
-@
-<<*>>=
-<<license>>
-<<input.c>>
-@
-\eject
-\begin{thebibliography}{99}
-\bibitem{1} nothing
-\end{thebibliography}
-\end{document}
-
-
-
-