// File: Silica[P]PSL/./PSL/parser.h
// Function: PSL::variable::Parser::ParseWhile(PSL::variable&, PSL::variable&)
void ParseWhile(variable &g, variable &c)
	{
		variable v;
		if (t->getNextIf('('/*')'*/))
			ParseExpression(v, /*'('*/')');
		else
			Error(TINA, '('/*')'*/, "while");
		size_t l = v.codelength();
		Variable::OpCode *oc = NULL;
		if (l)
		{
			oc = new Variable::JF(static_cast<int>(l));
			v.pushcode(oc);
		}
		else
			Error(TINSC, 0, "while");

		ParseDangling(g, v);

		v.pushcode(new Variable::JMP(0));
		if (oc)
			oc->set(static_cast<int>(v.codelength()));
		if (t->checkNext() == Tokenizer::IDENTIFIER && t->nstr == "else")
		{
			t->getNext();
			ParseDangling(g, v);
		}
		if (Variable::Code *x = v.getcode())
			c.pushcode(new Variable::LOOP(x, 0));
	}

// Assembly:
pushq %rbp
movq %rsp, %rbp
subq $0xa0, %rsp
movq %rdi, -0x8(%rbp)
movq %rsi, -0x10(%rbp)
movq %rdx, -0x18(%rbp)
movq -0x8(%rbp), %rax
movq %rax, -0x58(%rbp)
leaq -0x20(%rbp), %rdi
callq 0x1a130
movq -0x58(%rbp), %rax
movq (%rax), %rdi
movl $0x28, %esi
callq 0x27d30
movb %al, -0x49(%rbp)
jmp 0x27a5e
movb -0x49(%rbp), %al
testb $0x1, %al
jne 0x27a67
jmp 0x27a90
movq -0x58(%rbp), %rdi
leaq -0x20(%rbp), %rsi
movl $0x29, %edx
xorl %ecx, %ecx
callq 0x27150
jmp 0x27a7d
jmp 0x27ab4
movq %rax, %rcx
movl %edx, %eax
movq %rcx, -0x28(%rbp)
movl %eax, -0x2c(%rbp)
jmp 0x27cd4
movq -0x58(%rbp), %rdi
leaq 0x17100(%rip), %rcx     # 0x3eb9b
movl $0x2, %esi
movl $0x28, %edx
movl $0xffffffff, %r8d       # imm = 0xFFFFFFFF
callq 0x27d80
jmp 0x27ab2
jmp 0x27ab4
leaq -0x20(%rbp), %rdi
callq 0x27030
movq %rax, -0x60(%rbp)
jmp 0x27ac3
movq -0x60(%rbp), %rax
movq %rax, -0x38(%rbp)
movq $0x0, -0x40(%rbp)
cmpq $0x0, -0x38(%rbp)
je 0x27b2b
movl $0x10, %edi
callq 0x2a950
movq %rax, -0x68(%rbp)
jmp 0x27aea
movq -0x68(%rbp), %rdi
movl -0x38(%rbp), %esi
callq 0x33390
jmp 0x27af8
movq -0x68(%rbp), %rax
movq %rax, -0x40(%rbp)
movq -0x40(%rbp), %rsi
leaq -0x20(%rbp), %rdi
callq 0x23150
jmp 0x27b0f
jmp 0x27b4c
movq -0x68(%rbp), %rdi
movq %rax, %rcx
movl %edx, %eax
movq %rcx, -0x28(%rbp)
movl %eax, -0x2c(%rbp)
callq 0x2a9b0
jmp 0x27cd4
movq -0x58(%rbp), %rdi
leaq 0x17065(%rip), %rcx     # 0x3eb9b
movl $0x3, %esi
xorl %edx, %edx
movl $0xffffffff, %r8d       # imm = 0xFFFFFFFF
callq 0x27d80
jmp 0x27b4a
jmp 0x27b4c
movq -0x58(%rbp), %rdi
movq -0x10(%rbp), %rsi
leaq -0x20(%rbp), %rdx
callq 0x33330
jmp 0x27b5f
movl $0x10, %edi
callq 0x2a950
movq %rax, -0x70(%rbp)
jmp 0x27b6f
movq -0x70(%rbp), %rdi
xorl %esi, %esi
callq 0x31670
jmp 0x27b7c
movq -0x70(%rbp), %rsi
leaq -0x20(%rbp), %rdi
callq 0x23150
jmp 0x27b8b
cmpq $0x0, -0x40(%rbp)
je 0x27bda
movq -0x40(%rbp), %rax
movq %rax, -0x80(%rbp)
leaq -0x20(%rbp), %rdi
callq 0x27030
movq %rax, -0x78(%rbp)
jmp 0x27ba9
movq -0x80(%rbp), %rdi
movq -0x78(%rbp), %rax
movl %eax, %esi
movq (%rdi), %rax
movq 0x20(%rax), %rax
callq *%rax
jmp 0x27bbe
jmp 0x27bda
movq -0x70(%rbp), %rdi
movq %rax, %rcx
movl %edx, %eax
movq %rcx, -0x28(%rbp)
movl %eax, -0x2c(%rbp)
callq 0x2a9b0
jmp 0x27cd4
movq -0x58(%rbp), %rax
movq (%rax), %rdi
callq 0x232e0
movl %eax, -0x84(%rbp)
jmp 0x27bee
movl -0x84(%rbp), %eax
cmpl $0x1, %eax
jne 0x27c39
movq -0x58(%rbp), %rax
movq (%rax), %rdi
addq $0x68, %rdi
leaq 0x16f12(%rip), %rsi     # 0x3eb1d
callq 0x26a00
testb $0x1, %al
jne 0x27c16
jmp 0x27c39
movq -0x58(%rbp), %rax
movq (%rax), %rdi
callq 0x26620
jmp 0x27c24
movq -0x58(%rbp), %rdi
movq -0x10(%rbp), %rsi
leaq -0x20(%rbp), %rdx
callq 0x33330
jmp 0x27c37
jmp 0x27c39
leaq -0x20(%rbp), %rdi
callq 0x27070
movq %rax, -0x90(%rbp)
jmp 0x27c4b
movq -0x90(%rbp), %rax
movq %rax, -0x48(%rbp)
cmpq $0x0, -0x48(%rbp)
je 0x27cc2
movq -0x18(%rbp), %rax
movq %rax, -0xa0(%rbp)
movl $0x18, %edi
callq 0x333d0
movq %rax, -0x98(%rbp)
jmp 0x27c7b
movq -0x98(%rbp), %rdi
movq -0x48(%rbp), %rsi
xorl %eax, %eax
movl %eax, %edx
callq 0x333f0
jmp 0x27c91
movq -0x98(%rbp), %rsi
movq -0xa0(%rbp), %rdi
callq 0x23150
jmp 0x27ca6
jmp 0x27cc2
movq -0x98(%rbp), %rdi
movq %rax, %rcx
movl %edx, %eax
movq %rcx, -0x28(%rbp)
movl %eax, -0x2c(%rbp)
callq 0x33450
jmp 0x27cd4
leaq -0x20(%rbp), %rdi
callq 0xcdc0
addq $0xa0, %rsp
popq %rbp
retq
leaq -0x20(%rbp), %rdi
callq 0xcdc0
movq -0x28(%rbp), %rdi
callq 0xc280
nopw %cs:(%rax,%rax)