test: Добавление тестов

Author: Stivo182

tests/allocs_test.os

@@ -2,7 +2,7 @@
 #Использовать ".."
 
 &Тест
-Процедура ТестДолжен_ПроверитьФиксациюПотребленияПамятиДляОдногоБуфераДвоичныхДанных() Экспорт
+Процедура ТестДолжен_ПроверитьПотреблениеПамятиБуферомДвоичныхДанных() Экспорт
 
 	// Подготовка
 	Размер = 10 * 1024 * 1024;
@@ -22,7 +22,28 @@
 КонецПроцедуры
 
 &Тест
-Процедура ТестДолжен_ПроверитьФиксациюПотребленияПамятиДляНесколькихБуферовДвоичныхДанных() Экспорт
+Процедура ТестДолжен_ПроверитьПотреблениеПамятиБуферомДвоичныхДанныхСОчисткой() Экспорт
+
+	// Подготовка
+	Размер = 10 * 1024 * 1024;
+	Погрешность = 1.01;
+
+	// Действие
+	МониторПамяти = Новый МониторПамяти();
+	МониторПамяти.Начать();
+
+	Буфер = Новый БуферДвоичныхДанных(Размер);
+	Буфер = NULL;
+
+	ВыделеноБайт = МониторПамяти.Завершить();
+
+	// Утверждение
+	Ожидаем.Что(ВыделеноБайт).Между(Размер, Размер * Погрешность);
+
+КонецПроцедуры
+
+&Тест
+Процедура ТестДолжен_ПроверитьПотреблениеПамятиДляНесколькихБуферовДвоичныхДанных() Экспорт
 
 	// Подготовка
 	Размер = 10 * 1024 * 1024;
@@ -43,6 +64,28 @@
 
 КонецПроцедуры
 
+&Тест
+Процедура ТестДолжен_ПроверитьПотреблениеПамятиДляНесколькихБуферовДвоичныхДанныхСПерезаписьюПеременной() Экспорт
+
+	// Подготовка
+	Размер = 10 * 1024 * 1024;
+	Погрешность = 1.01;
+
+	// Действие
+	МониторПамяти = Новый МониторПамяти();
+	МониторПамяти.Начать();
+
+	Буфер = Новый БуферДвоичныхДанных(Размер);
+	Буфер = Новый БуферДвоичныхДанных(Размер);
+	Буфер = Новый БуферДвоичныхДанных(Размер);
+
+	ВыделеноБайт = МониторПамяти.Завершить();
+
+	// Утверждение
+	Ожидаем.Что(ВыделеноБайт).Между(Размер, 3 * Размер * Погрешность);
+
+КонецПроцедуры
+
 &Тест
 Процедура ТестДолжен_ПроверитьФиксациюПотребленияПамятиДляМассиваСтрок() Экспорт