/usr/share/jed/lib/shmode.sl is in jed-common 1:0.99.19-4.
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 51 52 53 54 55 56 57 58 59 60 61 | % This is a simple shell mode. It does not defined any form of indentation
% style. Rather, it simply implements a highlighting scheme.
$1 = "SH";
create_syntax_table ($1);
define_syntax ("#", "", '%', $1);
define_syntax ("([{", ")]}", '(', $1);
% Unfortunately, the editor cannot currently correctly deal with multiple
% string characters. So, inorder to handle something like:
% echo "I'd rather be home"
% make the '"' character the actual string character but also give '\''
% a string syntax. However, this will cause '"' to give problems but
% usually, '"' characters will be paired.
define_syntax ('\'', '"', $1);
define_syntax ('"', '"', $1);
define_syntax ('\\', '\\', $1);
define_syntax ("-0-9a-zA-Z_", 'w', $1); % words
define_syntax ("-+0-9", '0', $1); % Numbers
define_syntax (",;:", ',', $1);
define_syntax ("%-+/&*=<>|!~^", '+', $1);
#ifdef HAS_DFA_SYNTAX
%%% DFA_CACHE_BEGIN %%%
private define setup_dfa_callback (name)
{
dfa_enable_highlight_cache ("shmode.dfa", name);
dfa_define_highlight_rule ("\\\\.", "normal", name);
dfa_define_highlight_rule ("#.*$", "comment", name);
dfa_define_highlight_rule ("\"([^\\\\\"]|\\\\.)*\"", "string", name);
dfa_define_highlight_rule ("\"([^\\\\\"]|\\\\.)*$", "string", name);
dfa_define_highlight_rule ("'[^']*'", "string", name);
dfa_define_highlight_rule ("'[^']*$", "string", name);
dfa_define_highlight_rule ("[\\|&;\\(\\)<>]", "Qdelimiter", name);
dfa_define_highlight_rule ("[\\[\\]\\*\\?]", "Qoperator", name);
dfa_define_highlight_rule ("[^ \t\"'\\\\\\|&;\\(\\)<>\\[\\]\\*\\?]+",
"Knormal", name);
dfa_define_highlight_rule (".", "normal", name);
dfa_build_highlight_table (name);
}
dfa_set_init_callback (&setup_dfa_callback, "SH");
%%% DFA_CACHE_END %%%
#endif
() = define_keywords ($1, "cddofiifin", 2);
() = define_keywords ($1, "forletpwdset", 3);
() = define_keywords ($1, "casedoneechoelifelseesacevalexitifeqreadtestthentype", 4);
() = define_keywords ($1, "aliasbreakendifendswifdefifneqlocalshiftumaskunsetuntilwhile", 5);
() = define_keywords ($1, "exportifndefreturnsetenvsourceswitch", 6);
() = define_keywords ($1, "breaksw", 7);
() = define_keywords ($1, "continuefunction", 8);
define sh_mode ()
{
set_mode("SH", 0);
use_syntax_table ("SH");
mode_set_mode_info ("SH", "fold_info", "#{{{\r#}}}\r\r");
run_mode_hooks("sh_mode_hook");
}
|