// File: Silica[P]PSL/./PSL/PSLlib.h
// Function: PSL::variable::PSLlib::Foreach(PSL::variable&)
static variable Foreach(variable &v)
	{
		variable l = v[0];
		variable f = v[1];
		size_t size = l.length();
		if (size)
		{
			for (size_t i = 0; i < size; ++i)
				f(l[i]);
			return size;
		}
		else
		{
			variable k = l.keys();
			size = k.length();
			for (size_t i = 0; i < size; ++i)
				f(k[i], l[k[i]]);
			return k;
		}
	}

// Assembly:
pushq %rbp
movq %rsp, %rbp
subq $0xa0, %rsp
movq %rdi, -0x90(%rbp)
movq %rdi, %rax
movq %rax, -0x88(%rbp)
movq %rdi, -0x8(%rbp)
movq %rsi, -0x10(%rbp)
movq -0x10(%rbp), %rsi
leaq -0x18(%rbp), %rdi
xorl %edx, %edx
callq 0x22460
movq -0x10(%rbp), %rsi
leaq -0x20(%rbp), %rdi
movl $0x1, %edx
callq 0x22460
jmp 0x20887
leaq -0x18(%rbp), %rdi
callq 0x1d280
movq %rax, -0x98(%rbp)
jmp 0x20899
movq -0x98(%rbp), %rax
movq %rax, -0x38(%rbp)
cmpq $0x0, -0x38(%rbp)
je 0x20965
movq $0x0, -0x40(%rbp)
movq -0x40(%rbp), %rax
cmpq -0x38(%rbp), %rax
jae 0x20947
movq -0x40(%rbp), %rdx
leaq -0x50(%rbp), %rdi
leaq -0x18(%rbp), %rsi
callq 0x1d2a0
jmp 0x208d8
leaq -0x48(%rbp), %rdi
leaq -0x20(%rbp), %rsi
leaq -0x50(%rbp), %rdx
callq 0x225b0
jmp 0x208eb
leaq -0x48(%rbp), %rdi
callq 0xcdc0
leaq -0x50(%rbp), %rdi
callq 0xcdc0
movq -0x40(%rbp), %rax
addq $0x1, %rax
movq %rax, -0x40(%rbp)
jmp 0x208b7
movq %rax, %rcx
movl %edx, %eax
movq %rcx, -0x28(%rbp)
movl %eax, -0x2c(%rbp)
jmp 0x20ae7
movq %rax, %rcx
movl %edx, %eax
movq %rcx, -0x28(%rbp)
movl %eax, -0x2c(%rbp)
jmp 0x20ade
movq %rax, %rcx
movl %edx, %eax
movq %rcx, -0x28(%rbp)
movl %eax, -0x2c(%rbp)
leaq -0x50(%rbp), %rdi
callq 0xcdc0
jmp 0x20ade
movq -0x90(%rbp), %rdi
movq -0x38(%rbp), %rsi
callq 0x1f4c0
jmp 0x20959
movl $0x1, -0x54(%rbp)
jmp 0x20abc
movq -0x90(%rbp), %rdi
movb $0x0, -0x55(%rbp)
leaq -0x18(%rbp), %rsi
callq 0x1d240
jmp 0x2097b
movq -0x90(%rbp), %rdi
callq 0x1d280
movq %rax, -0xa0(%rbp)
jmp 0x20990
movq -0xa0(%rbp), %rax
movq %rax, -0x38(%rbp)
movq $0x0, -0x60(%rbp)
movq -0x60(%rbp), %rax
cmpq -0x38(%rbp), %rax
jae 0x20a8f
movq -0x90(%rbp), %rsi
movq -0x60(%rbp), %rdx
leaq -0x70(%rbp), %rdi
callq 0x1d2a0
jmp 0x209c7
movq -0x90(%rbp), %rsi
movq -0x60(%rbp), %rdx
leaq -0x80(%rbp), %rdi
callq 0x1d2a0
jmp 0x209dd
leaq -0x78(%rbp), %rdi
leaq -0x18(%rbp), %rsi
leaq -0x80(%rbp), %rdx
callq 0x22770
jmp 0x209f0
leaq -0x68(%rbp), %rdi
leaq -0x20(%rbp), %rsi
leaq -0x70(%rbp), %rdx
leaq -0x78(%rbp), %rcx
callq 0x22690
jmp 0x20a07
leaq -0x68(%rbp), %rdi
callq 0xcdc0
leaq -0x78(%rbp), %rdi
callq 0xcdc0
leaq -0x80(%rbp), %rdi
callq 0xcdc0
leaq -0x70(%rbp), %rdi
callq 0xcdc0
movq -0x60(%rbp), %rax
addq $0x1, %rax
movq %rax, -0x60(%rbp)
jmp 0x209a3
movq %rax, %rcx
movl %edx, %eax
movq %rcx, -0x28(%rbp)
movl %eax, -0x2c(%rbp)
jmp 0x20aae
movq %rax, %rcx
movl %edx, %eax
movq %rcx, -0x28(%rbp)
movl %eax, -0x2c(%rbp)
jmp 0x20a84
movq %rax, %rcx
movl %edx, %eax
movq %rcx, -0x28(%rbp)
movl %eax, -0x2c(%rbp)
jmp 0x20a7b
movq %rax, %rcx
movl %edx, %eax
movq %rcx, -0x28(%rbp)
movl %eax, -0x2c(%rbp)
leaq -0x78(%rbp), %rdi
callq 0xcdc0
leaq -0x80(%rbp), %rdi
callq 0xcdc0
leaq -0x70(%rbp), %rdi
callq 0xcdc0
jmp 0x20aae
movb $0x1, -0x55(%rbp)
movl $0x1, -0x54(%rbp)
testb $0x1, -0x55(%rbp)
jne 0x20aac
movq -0x90(%rbp), %rdi
callq 0xcdc0
jmp 0x20abc
movq -0x90(%rbp), %rdi
callq 0xcdc0
jmp 0x20ade
leaq -0x20(%rbp), %rdi
callq 0xcdc0
leaq -0x18(%rbp), %rdi
callq 0xcdc0
movq -0x88(%rbp), %rax
addq $0xa0, %rsp
popq %rbp
retq
leaq -0x20(%rbp), %rdi
callq 0xcdc0
leaq -0x18(%rbp), %rdi
callq 0xcdc0
movq -0x28(%rbp), %rdi
callq 0xc280
nopl (%rax)