Перейти из форума на сайт.

НовостиФайловые архивы
ПоискАктивные темыТоп лист
ПравилаКто в on-line?
Вход Забыли пароль? Первый раз на этом сайте? Регистрация
Компьютерный форум Ru.Board » Компьютеры » Программы » SciTE - Open Source Text Editor for Windows & Linux

Модерирует : gyra, Maz

Widok (23-11-2010 11:23): Лимит страниц. Продолжаем здесь  Версия для печати • ПодписатьсяДобавить в закладки
На первую страницук этому сообщениюк последнему сообщению

   

mozers



Silver Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору

Код:
    do --v----- JS ------v--
        -- redefine common patterns
       
local NL = NL + P"\f"
       
local regexstr = P'/' * (ESCANY - (P'/' + NL))^0*(P'/' * S('igm')^0 + NL)
       
local STRING = STRING + regexstr
        -- define local patterns
       
local f = P"function"
       
local m = P"method"
       
local funcbody = P"{"*(ESCANY-P"}")^0*P"}"
       
-- create additional captures
       
local I = C(IDENTIFIER)*cl
        -- definitions to capture:
       
local funcdef =  Ct((f+m)*SC^1*I*SC^0*par*SC^0*(#funcbody))
       
local eventdef = Ct(P"on"*SC^1*P'"'*I*P'"'*SC^0*(#funcbody))
       
-- resulting pattern, which does the work
       
local patt = (funcdef + eventdef + IGNORED^1 + IDENTIFIER + 1)^0 * EOF
 
        Lang2lpeg.JScript = lpeg.Ct(patt)
   
end --^----- JS ------^--
 ?  Код создан и опубликован с помощью SciTE-Ru

Всего записей: 2187 | Зарегистр. 03-01-2002 | Отправлено: 21:02 21-04-2010
   

На первую страницук этому сообщениюк последнему сообщению

Компьютерный форум Ru.Board » Компьютеры » Программы » SciTE - Open Source Text Editor for Windows & Linux
Widok (23-11-2010 11:23): Лимит страниц. Продолжаем здесь


Реклама на форуме Ru.Board.

Powered by Ikonboard "v2.1.7b" © 2000 Ikonboard.com
Modified by Ru.Board
© Ru.Board 2000-2020

BitCoin: 1NGG1chHtUvrtEqjeerQCKDMUi6S6CG4iC

Рейтинг.ru

Рейтинг.ru