diff options
author | dos-reis <gdr@axiomatics.org> | 2008-05-22 20:17:01 +0000 |
---|---|---|
committer | dos-reis <gdr@axiomatics.org> | 2008-05-22 20:17:01 +0000 |
commit | 66bf12078133726c7b95d9708472f2032ba458db (patch) | |
tree | adfa2695394f64cfe89fee6fc8aafaeca6329628 /src/hyper/spadint.c | |
parent | d8a4d498a6a0d1d34e25b6838b6450bd7d3e646f (diff) | |
download | open-axiom-66bf12078133726c7b95d9708472f2032ba458db.tar.gz |
* hyper/token.h: Avoid numeric constants macros.
Prefix enumerations with "openaxiom_".
* hyper/cond.c: Adjust.
* hyper/display.c: Likewise.
* hyper/event.c: Likewise.
* hyper/extent1.c: Likewise.
* hyper/extent2.c: Likewise.
* hyper/htadd.c: Likewise.
* hyper/htinp.c: Likewise.
* hyper/macro.c: Likewise.
* hyper/mem.c: Likewise.
* hyper/parse-aux.c: Likewise.
* hyper/parse-input.c: Likewise.
* hyper/parse-paste.c: Likewise.
* hyper/parse-types.c: Likewise.
* hyper/parse.c: Likewise.
* hyper/scrollbar.c: Likewise.
* hyper/show-types.c: Likewise.
* hyper/spadint.c: Likewise.
* hyper/titlebar.c: Likewise.
Diffstat (limited to 'src/hyper/spadint.c')
-rw-r--r-- | src/hyper/spadint.c | 285 |
1 files changed, 145 insertions, 140 deletions
diff --git a/src/hyper/spadint.c b/src/hyper/spadint.c index 9f782e6c..0b8c9300 100644 --- a/src/hyper/spadint.c +++ b/src/hyper/spadint.c @@ -121,7 +121,7 @@ issue_spadcommand(HyperDocPage *page, TextNode *command, int immediate, buf[strlen(buf) + 1] = '\0'; buf[strlen(buf)] = '\n'; } - if (type == Spadsrc) + if (type == openaxiom_Spadsrc_token) send_pile(page->sock, buf); else send_string(page->sock, buf); @@ -150,15 +150,16 @@ issue_dependent_commands(HyperDocPage *page, TextNode *command,int type) { TextNode *node, *depend_label; SpadcomDepend *depend; - int end_type = (type == Spadcommand || type == Spadgraph) ? - (Endspadcommand) : (Endspadsrc); + int end_type = (type == openaxiom_Spadcommand_token + || type == openaxiom_Spadgraph_token) ? + (openaxiom_Endspadcommand_token) : (openaxiom_Endspadsrc_token); for (node = command->next; node->type != end_type; node = node->next) - if (node->type == Free) + if (node->type == openaxiom_Free_token) for (depend_label = node->data.node; depend_label != NULL; depend_label = depend_label->next) - if (depend_label->type == Word) { + if (depend_label->type == openaxiom_Word_token) { depend = (SpadcomDepend *) hash_find(page->depend_hash, depend_label->data.text); if (depend == NULL) { @@ -180,14 +181,15 @@ mark_as_executed(HyperDocPage *page, TextNode *command,int type) { TextNode *node, *depend_label; SpadcomDepend *depend; - int end_type = (type == Spadcommand || type == Spadgraph) - ? (Endspadcommand) : (Endspadsrc); + int end_type = (type == openaxiom_Spadcommand_token + || type == openaxiom_Spadgraph_token) + ? (openaxiom_Endspadcommand_token) : (openaxiom_Endspadsrc_token); for (node = command; node->type != end_type; node = node->next) - if (node->type == Bound) + if (node->type == openaxiom_Bound_token) for (depend_label = node->data.node; depend_label != NULL; depend_label = depend_label->next) - if (depend_label->type == Word) { + if (depend_label->type == openaxiom_Word_token) { depend = (SpadcomDepend *) hash_find(page->depend_hash, depend_label->data.text); if (depend == NULL) { @@ -437,32 +439,32 @@ print_to_string1(TextNode *command,int * sizeBuf) for (node = command; node != NULL;) { switch (node->type) { - case Newline: + case openaxiom_Newline_token: storeChar('\n'); node = node->next; break; - case Ifcond: + case openaxiom_Ifcond_token: if (check_condition(node->data.ifnode->cond)) node = node->data.ifnode->thennode; else node = node->data.ifnode->elsenode; break; - case Endarg: - case Endspadcommand: - case Endspadsrc: - case Endpix: + case openaxiom_Endarg_token: + case openaxiom_Endspadcommand_token: + case openaxiom_Endspadsrc_token: + case openaxiom_Endpix_token: storeChar('\0'); return p2sBuf; - case Endverbatim: - case Endif: - case Fi: - case Endmacro: - case Endparameter: - case Rbrace: - case Endgroup: + case openaxiom_Endverbatim_token: + case openaxiom_Endif_token: + case openaxiom_Fi_token: + case openaxiom_Endmacro_token: + case openaxiom_Endparameter_token: + case openaxiom_Rbrace_token: + case openaxiom_Endgroup_token: node = node->next; break; - case Punctuation: + case openaxiom_Punctuation_token: /* * Simply copy the piece of text @@ -471,7 +473,7 @@ print_to_string1(TextNode *command,int * sizeBuf) for (s = node->data.text; *s; s++) { storeChar(*s); } node = node->next; break; - case WindowId: + case openaxiom_WindowId_token: /* * Simply copy the piece of text @@ -481,8 +483,8 @@ print_to_string1(TextNode *command,int * sizeBuf) storeChar(' '); node = node->next; break; - case Verbatim: - case Spadsrctxt: + case openaxiom_Verbatim_token: + case openaxiom_Spadsrctxt_token: /* * Simply copy the piece of text @@ -495,15 +497,15 @@ print_to_string1(TextNode *command,int * sizeBuf) */ /* - * if(node->next && node->next->type != Endspadsrc) + * if(node->next && node->next->type != openaxiom_Endspadsrc_token) * storeChar('\n'); */ node = node->next; break; - case Dash: - case Rsquarebrace: - case Lsquarebrace: - case Word: + case openaxiom_Dash_token: + case openaxiom_Rsquarebrace_token: + case openaxiom_Lsquarebrace_token: + case openaxiom_Word_token: /* * Simply copy the piece of text @@ -512,7 +514,7 @@ print_to_string1(TextNode *command,int * sizeBuf) for (s = node->data.text; *s; s++) { storeChar(*s); } node = node->next; break; - case BoxValue: + case openaxiom_BoxValue_token: box = (InputBox *) hash_find(gWindow->page->box_hash, node->data.text); if (box == NULL) { @@ -532,7 +534,7 @@ print_to_string1(TextNode *command,int * sizeBuf) } node = node->next; break; - case StringValue: + case openaxiom_StringValue_token: item = return_item(node->data.text); if (item != NULL) { if (node->space) @@ -567,23 +569,23 @@ print_to_string1(TextNode *command,int * sizeBuf) } node = node->next; break; - case Space: + case openaxiom_Space_token: num_spaces = (node->data.node != NULL ? atoi(node->data.node->data.text) : 1); for (count = 0; count < num_spaces; count++) storeChar(' '); node = node->next; break; - case Titlenode: - case Endtitle: - case Center: - case Endcenter: - case BoldFace: - case Emphasize: - case Indentrel: + case openaxiom_Titlenode_token: + case openaxiom_Endtitle_token: + case openaxiom_Center_token: + case openaxiom_Endcenter_token: + case openaxiom_BoldFace_token: + case openaxiom_Emphasize_token: + case openaxiom_Indentrel_token: node = node->next; break; - case Bound: + case openaxiom_Bound_token: if (include_bf) { int len, i; TextNode *n2 = node->data.node; @@ -595,8 +597,8 @@ print_to_string1(TextNode *command,int * sizeBuf) storeChar('n'); storeChar('d'); storeChar('{'); - for (; n2->type != Endarg; n2 = n2->next) { - if (n2->type == Word) { + for (; n2->type != openaxiom_Endarg_token; n2 = n2->next) { + if (n2->type == openaxiom_Word_token) { len = strlen(n2->data.text); for (i = 0; i < len; i++) storeChar(n2->data.text[i]); @@ -607,7 +609,7 @@ print_to_string1(TextNode *command,int * sizeBuf) } node = node->next; break; - case Free: + case openaxiom_Free_token: if (include_bf) { int len, i; TextNode *n2 = node->data.node; @@ -618,8 +620,8 @@ print_to_string1(TextNode *command,int * sizeBuf) storeChar('e'); storeChar('e'); storeChar('{'); - for (; n2->type != Endarg; n2 = n2->next) { - if (n2->type == Word) { + for (; n2->type != openaxiom_Endarg_token; n2 = n2->next) { + if (n2->type == openaxiom_Word_token) { len = strlen(n2->data.text); for (i = 0; i < len; i++) storeChar(n2->data.text[i]); @@ -630,17 +632,17 @@ print_to_string1(TextNode *command,int * sizeBuf) } node = node->next; break; - case Macro: + case openaxiom_Macro_token: node = node->next; break; - case Pound: + case openaxiom_Pound_token: if (node->space) { storeChar(' '); } node = node->next; break; - case Group: + case openaxiom_Group_token: node = node->next; break; - case Indent: + case openaxiom_Indent_token: num_spaces = (node->data.node != NULL ? atoi(node->data.node->data.text) : 1); for (count = 0; count < num_spaces; count++) @@ -687,15 +689,15 @@ issue_server_command(HyperLink *link) } switch_frames(); switch (link->type) { - case Qspadcall: - case Qspadcallquit: - case Spadlink: - case Spaddownlink: - case Spadmemolink: + case openaxiom_Qspadcall_token: + case openaxiom_Qspadcallquit_token: + case openaxiom_Spadlink_token: + case openaxiom_Spaddownlink_token: + case openaxiom_Spadmemolink_token: send_int(spad_socket, QuietSpadCommand); break; - case Spadcall: - case Spadcallquit: + case openaxiom_Spadcall_token: + case openaxiom_Spadcallquit_token: send_int(spad_socket, SpadCommand); break; default: @@ -704,9 +706,12 @@ issue_server_command(HyperLink *link) } buf = print_to_string(command); send_string(spad_socket, buf); - if (link->type == Lispcommand || link->type == Spadcall - || link->type == Spadcallquit || link->type == Qspadcallquit - || link->type == Qspadcall || link->type == Lispcommandquit) + if (link->type == openaxiom_Lispcommand_token + || link->type == openaxiom_Spadcall_token + || link->type == openaxiom_Spadcallquit_token + || link->type == openaxiom_Qspadcallquit_token + || link->type == openaxiom_Qspadcall_token + || link->type == openaxiom_Lispcommandquit_token) return NULL; page = parse_page_from_socket(); return page; @@ -925,48 +930,48 @@ print_source_to_string1(TextNode *command,int * sizeBuf) for (node = command; node != NULL;) { switch (node->type) { - case Newline: + case openaxiom_Newline_token: storeString("\\newline\n"); node = node->next; break; - case Par: + case openaxiom_Par_token: storeString("\n\n"); node = node->next; break; - case Indentrel: + case openaxiom_Indentrel_token: storeString("\\indentrel{"); storeString(node->data.node->data.text); storeChar('}'); node = node->next; break; - case Tab: + case openaxiom_Tab_token: storeString("\\tab{"); storeString(node->data.node->data.text); storeChar('}'); node = node->next; break; - case Ifcond: + case openaxiom_Ifcond_token: if (check_condition(node->data.ifnode->cond)) node = node->data.ifnode->thennode; else node = node->data.ifnode->elsenode; break; - case Endarg: - case Endspadsrc: - case Endpix: - case Endbutton: + case openaxiom_Endarg_token: + case openaxiom_Endspadsrc_token: + case openaxiom_Endpix_token: + case openaxiom_Endbutton_token: storeChar('}'); node = node->next; break; - case Endverbatim: - case Endif: - case Fi: - case Endmacro: - case Endparameter: - case Rbrace: + case openaxiom_Endverbatim_token: + case openaxiom_Endif_token: + case openaxiom_Fi_token: + case openaxiom_Endmacro_token: + case openaxiom_Endparameter_token: + case openaxiom_Rbrace_token: node = node->next; break; - case Punctuation: + case openaxiom_Punctuation_token: /* * Simply copy the piece of text @@ -975,25 +980,25 @@ print_source_to_string1(TextNode *command,int * sizeBuf) for (s = node->data.text; *s; s++) { storeChar(*s); } node = node->next; break; - case WindowId: + case openaxiom_WindowId_token: storeString("\\windowid "); node = node->next; break; - case Verbatim: - case Spadsrctxt: + case openaxiom_Verbatim_token: + case openaxiom_Spadsrctxt_token: if (node->space) { storeChar(' '); } for (s = node->data.text; *s; s++) { storeChar(*s); } node = node->next; break; - case Dash: - case Rsquarebrace: - case Lsquarebrace: - case Word: + case openaxiom_Dash_token: + case openaxiom_Rsquarebrace_token: + case openaxiom_Lsquarebrace_token: + case openaxiom_Word_token: if (node->space) { storeChar(' '); } for (s = node->data.text; *s; s++) { storeChar(*s); } node = node->next; break; - case BoxValue: + case openaxiom_BoxValue_token: box = (InputBox *) hash_find(gWindow->page->box_hash, node->data.text); if (box == NULL) { fprintf(stderr, "Print_to_string:Box %s Has no symbol table entry\n", @@ -1011,7 +1016,7 @@ print_source_to_string1(TextNode *command,int * sizeBuf) } node = node->next; break; - case StringValue: + case openaxiom_StringValue_token: item = return_item(node->data.text); if (item != NULL) { if (node->space) { storeChar(' '); } @@ -1046,78 +1051,78 @@ print_source_to_string1(TextNode *command,int * sizeBuf) } node = node->next; break; - case Space: + case openaxiom_Space_token: num_spaces = (node->data.node != NULL ? atoi(node->data.node->data.text) : 1); for (count = 0; count < num_spaces; count++) storeChar(' '); node = node->next; break; - case Emphasize: + case openaxiom_Emphasize_token: storeString("\\em "); node = node->next; break; - case BoldFace: + case openaxiom_BoldFace_token: storeString("\\bf "); node = node->next; break; - case Sl: + case openaxiom_Sl_token: storeString("\\it "); node = node->next; break; - case Rm: + case openaxiom_Rm_token: storeString("\\rm "); node = node->next; break; - case It: + case openaxiom_It_token: storeString("\\it "); node = node->next; break; - case Tt: + case openaxiom_Tt_token: storeString("\\tt "); node = node->next; break; - case Group: + case openaxiom_Group_token: /* skip {} */ - if (node->next->type==Endgroup){ + if (node->next->type==openaxiom_Endgroup_token){ node=node->next->next; break; } storeChar('{'); node = node->next; break; - case Endgroup: + case openaxiom_Endgroup_token: storeChar('}'); node = node->next; break; - case Box: + case openaxiom_Box_token: storeString("\\box{"); node = node->next; break; - case Endbox: + case openaxiom_Endbox_token: storeChar('}'); node = node->next; break; - case Center: + case openaxiom_Center_token: storeString("\\center{"); node = node->next; break; - case Endcenter: + case openaxiom_Endcenter_token: storeString("}"); storeChar('\n'); node = node->next; break; - case Titlenode: - case Endtitle: + case openaxiom_Titlenode_token: + case openaxiom_Endtitle_token: node = node->next; break; - case Bound: + case openaxiom_Bound_token: { TextNode *n2 = node->data.node; storeString("\\bound{"); - for (; n2->type != Endarg; n2 = n2->next) { - if (n2->type == Word) { + for (; n2->type != openaxiom_Endarg_token; n2 = n2->next) { + if (n2->type == openaxiom_Word_token) { storeString(n2->data.text); storeChar(' '); } @@ -1126,13 +1131,13 @@ print_source_to_string1(TextNode *command,int * sizeBuf) } node = node->next; break; - case Free: + case openaxiom_Free_token: { TextNode *n2 = node->data.node; storeString("\\free{"); - for (; n2->type != Endarg; n2 = n2->next) { - if (n2->type == Word) { + for (; n2->type != openaxiom_Endarg_token; n2 = n2->next) { + if (n2->type == openaxiom_Word_token) { storeString(n2->data.text); storeChar(' '); } @@ -1141,141 +1146,141 @@ print_source_to_string1(TextNode *command,int * sizeBuf) } node = node->next; break; - case Macro: + case openaxiom_Macro_token: storeChar(' '); node = node->next; break; - case Pound: + case openaxiom_Pound_token: if (node->space) { storeChar(' '); } node = node->next; break; - case Indent: + case openaxiom_Indent_token: num_spaces = (node->data.node != NULL ? atoi(node->data.node->data.text) : 1); for (count = 0; count < num_spaces; count++) storeChar(' '); node = node->next; break; - case Inputbitmap: + case openaxiom_Inputbitmap_token: storeString("\\inputbitmap{"); storeString(node->data.text); storeString("}\n"); node = node->next; break; - case Endscrolling: + case openaxiom_Endscrolling_token: storeString("\\end{scroll}\n"); node = node->next; break; - case Scrollingnode: + case openaxiom_Scrollingnode_token: storeString("\\begin{scroll}\n"); storeString("% This is the scrolling area\n"); node = node->next; break; - case Horizontalline: + case openaxiom_Horizontalline_token: storeString("\\horizontalline\n"); node = node->next; break; - case Endtable: + case openaxiom_Endtable_token: storeChar('}'); node = node->next; break; - case Table: + case openaxiom_Table_token: storeString("\\table{"); node = node->next; break; - case Tableitem: + case openaxiom_Tableitem_token: storeChar('{'); node = node->next; break; - case Endtableitem: + case openaxiom_Endtableitem_token: storeChar('}'); node = node->next; break; - case Beginitems: + case openaxiom_Beginitems_token: storeString("\\begin{items}"); node = node->next; break; - case Item: + case openaxiom_Item_token: storeString("\n\\item"); node = node->next; break; - case Enditems: + case openaxiom_Enditems_token: storeString("\n\\end{items}"); node = node->next; break; /*** LINKS ***/ /* all these guys are ended by Endbutton we close the brace then */ - case Spadlink: + case openaxiom_Spadlink_token: storeString("\\fauxspadlink{"); node = node->next; break; - case Unixlink: + case openaxiom_Unixlink_token: storeString("\\fauxunixlink{"); node = node->next; break; - case Lisplink: + case openaxiom_Lisplink_token: storeString("\\fauxlisplink{"); node = node->next; break; - case Link: + case openaxiom_Link_token: storeString("\\fauxlink{"); node = node->next; break; - case LispDownLink: + case openaxiom_LispDownLink_token: storeString("\\fauxlispdownlink{"); node = node->next; break; - case LispMemoLink: + case openaxiom_LispMemoLink_token: storeString("\\fauxlispmemolink{"); node = node->next; break; - case Memolink: + case openaxiom_Memolink_token: storeString("\\fauxmemolink{"); node = node->next; break; - case Windowlink: + case openaxiom_Windowlink_token: storeString("\\fauxwindowlink{"); node = node->next; break; - case Downlink: + case openaxiom_Downlink_token: storeString("\\fauxdownlink{"); node = node->next; break; /** END OF LINKS **/ - case Unixcommand: + case openaxiom_Unixcommand_token: storeString("\\unixcommand{"); node = node->next; break; - case Lispcommand: + case openaxiom_Lispcommand_token: storeString("\\lispcommand{"); node = node->next; break; - case Spadgraph: + case openaxiom_Spadgraph_token: storeString("\\spadgraph{"); node = node->next; break; - case Spadcommand: + case openaxiom_Spadcommand_token: storeString("\\spadcommand{"); node = node->next; break; - case Endspadcommand: + case openaxiom_Endspadcommand_token: storeChar('}'); node = node->next; break; - case Footernode: + case openaxiom_Footernode_token: storeString("% This is the footer\n"); node = node->next; break; - case Endfooter: + case openaxiom_Endfooter_token: storeString("% This is the end of the footer\n"); node = node->next; break; - case Endheader: + case openaxiom_Endheader_token: storeString("% This is the end of the header\n"); node = node->next; break; - case Headernode: + case openaxiom_Headernode_token: storeString("% This is the header\n"); node = node->next; break; |