File: seqed.h

package info (click to toggle)
staden 2.0.0%2Bb11-2
  • links: PTS, VCS
  • area: main
  • in suites: stretch
  • size: 21,228 kB
  • ctags: 22,407
  • sloc: ansic: 240,603; tcl: 65,360; cpp: 12,854; makefile: 11,202; sh: 2,952; fortran: 2,033; perl: 63; awk: 46
file content (35 lines) | stat: -rw-r--r-- 725 bytes parent folder | download | duplicates (5)
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
#ifndef _SEQED_H_
#define _SEQED_H_

#include <tcl.h>

#include "tkSeqed.h"

typedef struct seqedresult {
    void (*op_func)(int seq_num,
		     void *obj,
		     seq_reg_data *data);
    int seq_id;
    Tcl_Interp *interp;
    char seqed_win[1024];
    char *colour;
    int index;
} SeqedResult;

tkSeqed * seqed_id_to_se(Tcl_Interp *interp, int seqed_id);

int seqed_seq_length(Tcl_Interp *interp, int seqed_id);


/*
 * add sequence to seqed widget
 */
int add_seq_seqed(Tcl_Interp *interp, char *sequence, char *seqed_win,
		  int seq_num);

/*
 * update sequence position
 */
void update_seqed(Tcl_Interp *interp, char *seqed_win, int pos);
void seqed_set_cursor_pos(Tcl_Interp *interp, int seqed_id, int pos);
#endif