// File: /workspace/github_c_makefile_star2_O0/42Bastian[P]lyxass/pseudo.c
// Function: p_unreg
int p_unreg(int d)
{
  label_t label;
  label_t *plabel;
  int32_t l;

  do{
    if ( GetLabel( &label ) ) return 1;

    if ( (plabel = FindLabel( &label, &l)) == NULL ){
      return Error(SYNTAX_ERR,"");
    } else {
      int i,o;

      //      printf("UNREG : %s\n",plabel->name);

      if ( !(plabel->type & REGISTER) ) return Error(SYNTAX_ERR,"");

      if ( plabel->file == -1 ){
        char help[80];
        sprintf(help,"Multiple UNREG on (%s)!",plabel->name);
        Warning(help);
      }

      plabel->file = -1;
      plabel->value = -1;
      o = l;
      i = (int)strlen(plabel->name);
      if ( i > 2 &&
           plabel->name[i-2] == '.' &&
           plabel->name[i-1] == 'a'){
        o += 32;
      }
      --risc[jaguar_mode].regs[o].refCount;
      if ( risc[jaguar_mode].regs[o].refCount == 0 ){
        risc[jaguar_mode].regs[o].flag = 0;
      }
      risc[jaguar_mode].regs[o].line = 0;
      risc[jaguar_mode].regs[o].file = 0;
      risc[jaguar_mode].regs[o].label = NULL;
    }

  }while (TestAtom(','));

  return 0;
}

// Assembly:
pushq %rbp
movq %rsp, %rbp
subq $0xd0, %rsp
movl %edi, -0x8(%rbp)
leaq -0x68(%rbp), %rdi
callq 0x5de0
cmpl $0x0, %eax
je 0x9958
movl $0x1, -0x4(%rbp)
jmp 0x9b78
leaq -0x68(%rbp), %rdi
leaq -0x74(%rbp), %rsi
callq 0x6f20
movq %rax, -0x70(%rbp)
cmpq $0x0, %rax
jne 0x9988
movl $0x12, %edi
leaq 0x76e2(%rip), %rsi      # 0x1105d
callq 0xd130
movl %eax, -0x4(%rbp)
jmp 0x9b78
movq -0x70(%rbp), %rax
movl 0x4(%rax), %eax
andl $0x40, %eax
cmpl $0x0, %eax
jne 0x99b0
movl $0x12, %edi
leaq 0x76ba(%rip), %rsi      # 0x1105d
callq 0xd130
movl %eax, -0x4(%rbp)
jmp 0x9b78
movq -0x70(%rbp), %rax
cmpl $-0x1, 0x14(%rax)
jne 0x99e3
leaq -0xd0(%rbp), %rdi
movq -0x70(%rbp), %rdx
addq $0x38, %rdx
leaq 0x7a95(%rip), %rsi      # 0x11465
movb $0x0, %al
callq 0x31a0
leaq -0xd0(%rbp), %rdi
callq 0xd910
movq -0x70(%rbp), %rax
movl $0xffffffff, 0x14(%rax) # imm = 0xFFFFFFFF
movq -0x70(%rbp), %rax
movq $-0x1, 0x8(%rax)
movl -0x74(%rbp), %eax
movl %eax, -0x7c(%rbp)
movq -0x70(%rbp), %rdi
addq $0x38, %rdi
callq 0x30a0
movl %eax, -0x78(%rbp)
cmpl $0x2, -0x78(%rbp)
jle 0x9a4d
movq -0x70(%rbp), %rax
movl -0x78(%rbp), %ecx
subl $0x2, %ecx
movslq %ecx, %rcx
movsbl 0x38(%rax,%rcx), %eax
cmpl $0x2e, %eax
jne 0x9a4d
movq -0x70(%rbp), %rax
movl -0x78(%rbp), %ecx
subl $0x1, %ecx
movslq %ecx, %rcx
movsbl 0x38(%rax,%rcx), %eax
cmpl $0x61, %eax
jne 0x9a4d
movl -0x7c(%rbp), %eax
addl $0x20, %eax
movl %eax, -0x7c(%rbp)
leaq 0xeb90(%rip), %rax      # 0x185e4
movslq (%rax), %rcx
leaq 0xd6a2(%rip), %rax      # 0x17100
imulq $0x808, %rcx, %rcx      # imm = 0x808
addq %rcx, %rax
movslq -0x7c(%rbp), %rcx
shlq $0x5, %rcx
addq %rcx, %rax
movl 0x18(%rax), %ecx
addl $-0x1, %ecx
movl %ecx, 0x18(%rax)
leaq 0xeb61(%rip), %rax      # 0x185e4
movslq (%rax), %rcx
leaq 0xd673(%rip), %rax      # 0x17100
imulq $0x808, %rcx, %rcx      # imm = 0x808
addq %rcx, %rax
movslq -0x7c(%rbp), %rcx
shlq $0x5, %rcx
addq %rcx, %rax
cmpl $0x0, 0x18(%rax)
jne 0x9ad4
leaq 0xeb35(%rip), %rax      # 0x185e4
movslq (%rax), %rcx
leaq 0xd647(%rip), %rax      # 0x17100
imulq $0x808, %rcx, %rcx      # imm = 0x808
addq %rcx, %rax
movslq -0x7c(%rbp), %rcx
shlq $0x5, %rcx
addq %rcx, %rax
movl $0x0, (%rax)
leaq 0xeb09(%rip), %rax      # 0x185e4
movslq (%rax), %rcx
leaq 0xd61b(%rip), %rax      # 0x17100
imulq $0x808, %rcx, %rcx      # imm = 0x808
addq %rcx, %rax
movslq -0x7c(%rbp), %rcx
shlq $0x5, %rcx
addq %rcx, %rax
movl $0x0, 0x4(%rax)
leaq 0xeadc(%rip), %rax      # 0x185e4
movslq (%rax), %rcx
leaq 0xd5ee(%rip), %rax      # 0x17100
imulq $0x808, %rcx, %rcx      # imm = 0x808
addq %rcx, %rax
movslq -0x7c(%rbp), %rcx
shlq $0x5, %rcx
addq %rcx, %rax
movl $0x0, 0x8(%rax)
leaq 0xeaaf(%rip), %rax      # 0x185e4
movslq (%rax), %rcx
leaq 0xd5c1(%rip), %rax      # 0x17100
imulq $0x808, %rcx, %rcx      # imm = 0x808
addq %rcx, %rax
movslq -0x7c(%rbp), %rcx
shlq $0x5, %rcx
addq %rcx, %rax
movq $0x0, 0x10(%rax)
jmp 0x9b5e
movl $0x2c, %edi
callq 0x5a90
cmpl $0x0, %eax
jne 0x993e
movl $0x0, -0x4(%rbp)
movl -0x4(%rbp), %eax
addq $0xd0, %rsp
popq %rbp
retq
nopw %cs:(%rax,%rax)