RSL | |
---|---|
Класс языка | |
Тип исполнения | интерпретируемый |
Появился в | 1994 |
Автор | Сергей Кубрин |
Расширение файлов |
. |
Выпуск | 1151[1] (19 марта 2015) |
Система типов | динамическая |
Основные реализации: | RS-Bank, InterBank, RS-Securities, RS-Payments |
Сайт | softlab.ru |
RSL или Object RSL (аббр. от англ. R-Style Language) — объектно-ориентированный, предметно-ориентированный, интерпретируемый, проприетарный язык программирования, разработанный компанией R-Style Softlab для использования в своих программных продуктах.
Среда разработки под названием «Оболочка RSL» включает в себя:
RSL также называют макроязыком, а программы на нём — макросами. Инструменты для создания и отладки программ на RSL доступны для свободного скачивания на сайте разработчика, однако такие макросы не должны содержать вызовов модулей, содержащих бизнес-логику и встроенных в основные программы R-Style Softlab. Интерпретатор реализован под Windows, позволяет работать под Wine. Ранние версии поддерживали MS-DOS.
Поддержка RSL встроена во все подсистемы АБС RS-Bank, а также InterBank, RS-Securities, RS-Payments.
TArray()
.TbFile()
.OnError()
и класса TrslError()
.Модуль RSLSRV регистрирует в системе объект RSLSrv.RslEngine, который позволяет использовать макрос на RSL как объект ActiveX. Глобальные переменные макроса становятся свойствами, а процедуры — методами. Например, пусть существует макрос myactivex.mac:
var str1:String = "Test string"; macro func1(a) return a*a; end;
тогда можно использовать следующий код на Visual Basic:
Sub TestRSL()
Set eng = CreateObject("RSLSrv.RslEngine")
Set MyObj = eng.LoadModule("myactivex.mac")
Debug.Print MyObj.str1 ' печатает Test string
Debug.Print MyObj.func1(2) ' печатает 4
End Sub
RSD — библиотека предназначена для универсального доступа к источникам данных, поддерживающим SQL, из программ на языках C++ и RSL. Объектная модель построена на основе ADO.
Библиотека имеет несколько уровней (каждый последующий уровень базируется на предыдущем: большую часть функциональности делегирует нижележащему уровню):
Уровни 1 и 2 реализованы в виде DLL, а уровень 3 — как DLM.
Этот раздел статьи ещё не написан. |
Этот раздел статьи ещё не написан. |
Windows Reports — объектно-ориентированная библиотека для вывода отчётов в форматы офисных приложений MS Excel, MS Word, Internet Explorer. Библиотека основана на технологиях RSCOM и ActiveX. Большая часть написана на RSL, также в состав входят DLM-модули.
RSL имеет встроенную поддержку работы с базами данных (БД), управляемых Pervasive PSQL (ранее Btrieve и Pervasive.SQL). Словари БД имеют расширение .def
(аналог .ddf
), файлы таблиц БД — .dbt
(аналог .mkd
). Также есть возможность работать с файлами БД .dbf
. Работа с SQL организована с использованием ADO через модуль RSLX и библиотеки RSD.
Этот раздел не завершён. |
В части синтаксиса RSL имеет общие черты с языками C++ и Pascal. Например, присваивание и операции сравнения «равно», «неравно» записываются так же, как и в C++ (=
, ==
, !=
). А логические операции — как в Pascal (and
, or
, not
).
RSL (аналогично C++) поддерживает комментарии двух типов: многострочные и однострочные.
/*
Пример большого комментария,
состоящего из нескольких строк
*/
// Вся оставшаяся часть строки является комментарием
Язык RSL разрешает наличие вложенных комментариев обоих типов как по отдельности, так и вместе.
Все поддерживаемые типы данных в RSL разделяются на скалярные и объектные.
Скалярные типы:
Integer
.Double
.Decimal
, Numeric
.Money
.String
.Bool
(имеющий значения TRUE
и FALSE
).Date
.Time
.DateTime
.MemAddr
.ProcRef
.MethodRef
.SpecVal
(имеющий значения NullVal
и OptVal
).NULL
.Variant
.Объектные типы:
Tbfile
.TRecHandler
.TArray
.TStreamDoc
.Object
.В RSL предусмотрено неявное и явное преобразование из одного типа данных в другой.
Integer
→ Double
→ Numeric
→ String
.if
и while
значений не булевого типа. В таком случае произойдет попытка преобразования в булев тип.Int()
, Double()
, Decimal()
, Numeric()
, String()
, Money()
и др.В 1997 году язык RSL стал объектно-ориентированным и изменил название на Object RSL[3]. Он вводит классы, которые обеспечивают три самых важных свойства объектно-ориентированного программирования (ООП): инкапсуляцию, наследование и полиморфизм.
В RSL (в отличие от других языков программирования, к примеру, от C++) конструирование объектов происходит в два этапа:
Init
. Если инициализацию необходимо выполнить для класса-родителя, то его метод Init
следует вызвать явно при инициализации класса-наследника.Таким образом, в классах RSL деструкторы, определяемые пользователем, не применяются (объекты и их свойства удаляются автоматически).
В RSL наследование позволяет описать новый класс на основе уже существующего (родительского, базового) класса. Таким образом, все методы и свойства класса-родителя также становятся методами и свойствами класса-наследника. Кроме этого, класс-наследник может добавлять свои свойства и методы или переопределять методы класса-родителя . Наследование позволяет строить иерархии классов. Множественное наследование в RSL запрещено.
При наследовании имя класса-родителя указывается в круглых скобках после ключевого слова Class
. Для инициализации класса-родителя необходимо вызвать предопределенный метод, название которого образуется путём добавления к имени класса-родителя приставки Init
.
Пример наследования классом Employee («Сотрудник») класса Person («Персона»), при добавлении к нему свойства Post («Должность»):
Class Person (Name, Surname) // Список свойств и методов класса Person end;
Class (Person) Employee (Name, Surname, Post) InitPerson (Name, Surname); // Инициализация класса Person в классе Employee Macro Report() println("Post: ", Post); end; end;
В RSL инкапсуляция реализуется через указание уровня доступа к свойствам и методам класса, а также к переменным и процедурам макромодуля.
private
позволяет объявлять переменные, процедуры и классы как приватные, что накладывает запрет на доступ к ним извне. Этот модификатор является аналогом модификатора protected
в C++.local
можно объявлять переменные, объекты и процедуры как локальные. Локальные переменные доступны только локальным процедурам. Невозможно обратиться к локальной переменной внутри любой другой процедуры макромодуля.
|
local
перед свойством класса, то оно перестает быть свойством класса, как таковым, и становится локальной переменной конструктора. Таким образом, модификатор local
применим только для процедур инициализации модуля и конструктора класса.{}
):
|
a
и {a}
— разные переменные. Если свойство класса взять в фигурные скобки, то оно перестанет быть свойством, как таковым, и стает глобальной переменной макромодуля. Обращение к нему будет осуществляться напрямую по имени, а не через ссылку на объект класса.Уровни доступа к свойствам и методам класса:
Доступ | Локальный (local) |
Приватный (private) |
Глобальный | Принудительно глобальный |
В самом классе | да / нет | да | да (через объект класса) |
да |
В наследниках | нет | да | да (через объект класса) |
да |
Извне | нет | нет | да (через объект класса) |
да |
Уровни доступа к переменным, процедурам и объектам макромодуля:
Доступ | Локальный (local) |
Приватный (private) |
Глобальный | Принудительно глобальный |
В макромодуле | да / нет | да | да | да |
В модулях, которые импортируют данный |
нет | нет | да | да |
Все методы классов RSL являются виртуальными. Так, RSL реализует полиморфизм включения (или чистый полиморфизм) посредством наследования. При добавлении в классе-наследнике метода с именем, которое уже используется для одного из методов класса-родителя, метод наследника переопределит метод родителя. К методу родителя доступ будет только из метода наследника, который его переопределяет. Обращение к этому методу родителя осуществляется по его имени. Но в классе-наследнике вне переопределяющего метода не будет доступа к переопределенному методу родителя. Также станет невозможным обратиться к этому методу класса-родителя через ссылку на объект класса-наследника в основной части программы.
Class First() // Класс-родитель Var x = 2, y = 3;
Macro Sum() return x + y; end; end;
Class (First) Second() // Класс-наследник InitFirst(); Var a = 100;
Macro Sum() // Начало переопределения родительского метода Sum() return Sum() + a; // Использование родительского метода Sum() в методе Sum() наследника end; // Конец переопределения родительского метода Sum()
Macro Sum2() return Sum() + a; // Использование метода Sum() наследника end; end;
obj = Second(); // Создание объекта класса Second()
println(obj.Sum()); // Результат: 105 println(obj.Sum2()); // Результат: 205
Если в этом примере из класса-родителя убрать метод Sum()
, то в классе-наследнике произойдет рекурсивный вызов метода Sum()
.
Объявлять переменные и указывать их тип не обязательно. Операторы сравнения имеют более высокий приоритет, чем логические операторы. Например, если надо выполнить «действие» в том случае, когда переменная a равна 1 или 2, то необходимо применить следующую конструкцию:
if ((a == 1) or (a == 2)) // действие end;
Выполнение программы начинается с первой инструкции, не входящей в класс или процедуру, как в php.
macro func1 [I'm function 1]; end; // выполнение начнётся здесь [Let's go!];
Программа «Hello, world!» на RSL[4]:
[Hello, world!];
Квайн на RSL (форматирование для удобства чтения):
s="''s=Print(SubStr(s,1,2)+StrFor(34)+s+StrFor(34)+StrFor(59)+SubStr(s,3));''"; Print(SubStr(s,1,2)+StrFor(34)+s+StrFor(34)+StrFor(59)+SubStr(s,3));
Для улучшения этой статьи желательно: |
Данная страница на сайте WikiSort.ru содержит текст со страницы сайта "Википедия".
Если Вы хотите её отредактировать, то можете сделать это на странице редактирования в Википедии.
Если сделанные Вами правки не будут кем-нибудь удалены, то через несколько дней они появятся на сайте WikiSort.ru .