From add331408b0f207b82f3ec1b76251c700197e807 Mon Sep 17 00:00:00 2001
From: Pacien TRAN-GIRARD
Date: Mon, 16 Jun 2014 19:30:53 +0200
Subject: Import slides

---
 slides/final/js/prettify/lang-tcl.js | 3 +++
 1 file changed, 3 insertions(+)
 create mode 100644 slides/final/js/prettify/lang-tcl.js

(limited to 'slides/final/js/prettify/lang-tcl.js')

diff --git a/slides/final/js/prettify/lang-tcl.js b/slides/final/js/prettify/lang-tcl.js
new file mode 100644
index 0000000..490f562
--- /dev/null
+++ b/slides/final/js/prettify/lang-tcl.js
@@ -0,0 +1,3 @@
+var a=null;
+PR.registerLangHandler(PR.createSimpleLexer([["opn",/^{+/,a,"{"],["clo",/^}+/,a,"}"],["com",/^#[^\n\r]*/,a,"#"],["pln",/^[\t\n\r \xa0]+/,a,"\t\n\r \u00a0"],["str",/^"(?:[^"\\]|\\[\S\s])*(?:"|$)/,a,'"']],[["kwd",/^(?:after|append|apply|array|break|case|catch|continue|error|eval|exec|exit|expr|for|foreach|if|incr|info|proc|return|set|switch|trace|uplevel|upvar|while)\b/,a],["lit",/^[+-]?(?:[#0]x[\da-f]+|\d+\/\d+|(?:\.\d+|\d+(?:\.\d*)?)(?:[de][+-]?\d+)?)/i],["lit",
+/^'(?:-*(?:\w|\\[!-~])(?:[\w-]*|\\[!-~])[!=?]?)?/],["pln",/^-*(?:[_a-z]|\\[!-~])(?:[\w-]*|\\[!-~])[!=?]?/i],["pun",/^[^\w\t\n\r "'-);\\\xa0]+/]]),["tcl"]);
-- 
cgit v1.2.3