/usr/share/jed/lib/tiasm.sl is in jed-common 1:0.99.19-3.
This file is owned by root:root, with mode 0o644.
The actual contents of the file can be viewed below.
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 | % A simple TI asm mode
$1 = "tiasm";
create_syntax_table ($1);
define_syntax (";", "", '%', $1); % Comment Syntax
%define_syntax ('\\', '\\', $1); % Quote character
define_syntax ("{[", "}]", '(', $1); % are all these needed?
define_syntax ('\'', '"', $1); % string
define_syntax ("$~^_&#", '+', $1); % operators
define_syntax ("|&{}[],", ',', $1); % delimiters
define_syntax ("a-zA-Z0-9.", 'w', $1);
set_syntax_flags ($1, 1 | 2);
set_fortran_comment_chars ($1, "*");
% Type 0 keywords
() = define_keywords_n ($1,
"andashbuddbdldaldilshmh1noppopsti",
3, 0);
() = define_keywords_n ($1,
"addibeqdbledcmpildizlhu0lhu1pushretsrptbsubi",
4, 0);
() = define_keywords_n ($1,
"ldinzrptbd",
5, 0);
% Type 1 keywords
() = define_keywords_n ($1,
".if",
3, 1);
() = define_keywords_n ($1,
".end",
4, 1);
() = define_keywords_n ($1,
".else.text",
5, 1);
() = define_keywords_n ($1,
".endif.globl",
6, 1);
define tiasm_mode ()
{
variable kmap = "tiasm";
set_mode(kmap, 4);
use_syntax_table (kmap);
mode_set_mode_info (kmap, "fold_info", "*{{{\r*}}}\r\r");
run_mode_hooks("tiasm_mode_hook");
}
|