-function add_comment(buffer)
- local i = utf.len(buffer)
- while (i>0) and (getcatcode(utf.byte(buffer, i))==1
- or getcatcode(utf.byte(buffer, i))==2) do
+--DEBUG require"socket"
+local time_line = 0
+local start_time_measure, stop_time_measure
+ = ltjb.start_time_measure, ltjb.stop_time_measure
+local function add_comment(buffer)
+ start_time_measure('inputbuf')
+ local i = utflen(buffer)
+ while (i>0) and (getcatcode(utfbyte(buffer, i))==1
+ or getcatcode(utfbyte(buffer, i))==2) do