Объединение двух линейных списков - Free Pascal

Есть два списка: list1 и list2. Нужна программа, которая объединит их(второй добавит в "хвост" первого).

Листинг программы

    std::list<int> L1, L2;
    // заполняем списки значениями
 
    L1.splice(L1.end(), L2); // объединяем

Объяснение кода листинга программы

Создаем два объекта типа std::list - L1 и L2
Заполняем значениями элементов списки L1 и L2
Используем метод splice для объединения элементов двух списков. В данном случае первый аргумент метода - это ссылка на последний элемент первого списка (L1.end()), а второй аргумент - это ссылка на начало второго списка (L2.begin()).