popsv     Запись элемента в стек-вектор как в стек

 system popsv

 <popsv SbEm>
                   где Sb - символ-ссылка - имя стек-вектора или
                            символ-метка - имя ящика, содержащего имя
                            стек-вектора.
                       Em - макроцифры по 16 бит - элемент для записи
                            в стек-вектор.

   Значение:  Процедура возвращает номер записанного элемента.

  -------------------------------- Пример ----------------------------------

                       start
                       entry task
                       system newsv,wtr,popsv,rdrsv,cvd,prout
                       swap box

             task =    <wtr /box/<newsv 'D'/12//X'FFFF/>> +
                       <popsv /box//1//2//3//4/>          +
                       <popsv /box//5//6//7//8/>          +
                       <prout <cvd <rdrsv /box//1/>>>     +
                       <prout <cvd <rdrsv /box//2/>>>
                       end

          Даст в результате выполнения:

            C:\PRIMER>primer.exe
            1000000002000000003000000004
            5000000006000000007000000008

            C:\PRIMER>

Seealso:



This page last updated on Fri Nov 30 11:06:55 MSK 2001
Copyright © 1992-2001, Vitaly Filatov, Moscow, Russia
Webmaster