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): Лимит страниц. Продолжаем здесь

Переход по форумам  Закладки   » Компьютеры Цифровое изображение Программы Microsoft Windows UNIX Другие OS Hardware В помощь сисадмину Прикладное программирование Игры Форумные игры   » Интернет Web-программирование В помощь вебмастеру Графика Хостинг Зацените-ка!   » Тематические Ikonboard v.2 Ikonboard v.3 Invision Board Другие форумы PHP-Nuke и другие порталы Мобила   » Общие Спорт Флейм Темы по региональным встречам Музыка и Кино Юмор Литература и Живопись   » Ru.Board Новости Помощь по форуму   » Андеграунд eBookz Варезник Раздачи и акции Мобильный варезник Андеграунд Игры и фильмы   » Специальные Тестирование