LLM4Binary/decompile-bench-makefile huggingface dataset:
// File: /workspace/github_c_makefile_star2_O3/heltilda[P]cicada/userfn.c
// Function: getArgs
void getArgs(ccInt argc, char **argv, ...)
{
    ccInt loopArg;
    va_list theArgs;
    char **nextarg;
    arg_info *myArgInfo = (arg_info *) argv[argc];
    
    va_start(theArgs, argv);
    for (loopArg = 0; loopArg < argc; loopArg++)  {
        nextarg = va_arg(theArgs, char **);
        if (nextarg != NULL)
            *nextarg = argv[loopArg];
        else  {
            nextarg = va_arg(theArgs, char **);
            if (nextarg == NULL)  {
                loopArg = ((ccInt) va_arg(theArgs, int)) - 1;
                if (loopArg < -1)  break;       }
            else  {
                size_t numBytes = (size_t) myArgInfo[loopArg].argIndices*typeSizes[myArgInfo[loopArg].argType];
                if (numBytes > 0)  memcpy((void *) nextarg, (void *) argv[loopArg], numBytes);
    }   }   }
    va_end(theArgs);
    
    return;
}

// Assembly:
pushq %rbp
pushq %r15
pushq %r14
pushq %r12
pushq %rbx
subq $0xd0, %rsp
movq %rsi, %rbx
leaq 0x20(%rsp), %rsi
movq %rdx, 0x10(%rsi)
movq %rcx, 0x18(%rsi)
movq %r8, 0x20(%rsi)
movq %r9, 0x28(%rsi)
testb %al, %al
je 0x19b1d
movaps %xmm0, 0x50(%rsp)
movaps %xmm1, 0x60(%rsp)
movaps %xmm2, 0x70(%rsp)
movaps %xmm3, 0x80(%rsp)
movaps %xmm4, 0x90(%rsp)
movaps %xmm5, 0xa0(%rsp)
movaps %xmm6, 0xb0(%rsp)
movaps %xmm7, 0xc0(%rsp)
movslq %edi, %rax
movq (%rbx,%rax,8), %r14
movq %rsi, 0x10(%rsp)
leaq 0x100(%rsp), %rcx
movq %rcx, 0x8(%rsp)
movabsq $0x3000000010, %rcx     # imm = 0x3000000010
movq %rcx, (%rsp)
testl %eax, %eax
jle 0x19c1e
movl %edi, %ebp
xorl %r12d, %r12d
leaq 0x21a8(%rip), %r15      # 0x1bd00
movl (%rsp), %eax
cmpq $0x28, %rax
ja 0x19b71
movq %rax, %rcx
addq 0x10(%rsp), %rcx
addl $0x8, %eax
movl %eax, (%rsp)
jmp 0x19b7f
movq 0x8(%rsp), %rcx
leaq 0x8(%rcx), %rdx
movq %rdx, 0x8(%rsp)
movq (%rcx), %rcx
testq %rcx, %rcx
je 0x19b9e
movl %r12d, %eax
movq (%rbx,%rax,8), %rax
movq %rax, (%rcx)
incl %r12d
cmpl %ebp, %r12d
jl 0x19b58
jmp 0x19c1e
cmpl $0x28, %eax
ja 0x19bb2
movl %eax, %ecx
addq 0x10(%rsp), %rcx
addl $0x8, %eax
movl %eax, (%rsp)
jmp 0x19bc0
movq 0x8(%rsp), %rcx
leaq 0x8(%rcx), %rdx
movq %rdx, 0x8(%rsp)
movq (%rcx), %rdi
testq %rdi, %rdi
je 0x19bec
movl %r12d, %eax
movslq 0x4(%r14,%rax,8), %rcx
movslq (%r14,%rax,8), %rdx
movslq (%r15,%rdx,4), %rdx
imulq %rcx, %rdx
testq %rdx, %rdx
je 0x19b91
movq (%rbx,%rax,8), %rsi
callq 0x8110
jmp 0x19b91
cmpl $0x28, %eax
ja 0x19c00
movl %eax, %ecx
addq 0x10(%rsp), %rcx
addl $0x8, %eax
movl %eax, (%rsp)
jmp 0x19c0e
movq 0x8(%rsp), %rcx
leaq 0x8(%rcx), %rax
movq %rax, 0x8(%rsp)
movl (%rcx), %r12d
testl %r12d, %r12d
js 0x19c1e
decl %r12d
jmp 0x19b91
addq $0xd0, %rsp
popq %rbx
popq %r12
popq %r14
popq %r15
popq %rbp
retq
// File: /workspace/github_c_makefile_star2_O3/heltilda[P]cicada/userfn.c
// Function: makeLinkList
ccInt makeLinkList(const ccInt left, const ccInt right, const ccInt direction, const ccFloat *sortingList, ccInt *linklist)
{
    ccInt middle, first, toWrite, side, nextSide, idx[2];
    
    if (right > left)  {
        
        middle = floor((right + left)/2);
        idx[0] = makeLinkList(left, middle, direction, sortingList, linklist);
        idx[1] = makeLinkList(middle + 1, right, direction, sortingList, linklist);
        
        if ((sortingList[idx[0]] - sortingList[idx[1]])*direction <= 0)  side = 0;
        else  side = 1;
        
        first = toWrite = idx[side];
        idx[side] = linklist[idx[side]];
        
        while ((idx[0] != -1) && (idx[1] != -1))  {
            
            if ((sortingList[idx[0]] - sortingList[idx[1]])*direction <= 0)  nextSide = 0;
            else  nextSide = 1;
            
            if (side != nextSide)  {
                linklist[toWrite] = idx[nextSide];
                side = nextSide;       }
            
            toWrite = idx[side];
            idx[side] = linklist[idx[side]];    }
        
        linklist[toWrite] = idx[1-side];
        
        return first;    }
        
    else  return left;
}

// Assembly:
cmpl %edi, %esi
jle 0x19d4d
pushq %rbp
pushq %r15
pushq %r14
pushq %r13
pushq %r12
pushq %rbx
pushq %rax
movq %r8, %rbx
movq %rcx, %r14
movl %edx, %ebp
movl %esi, %r15d
leal (%r15,%rdi), %eax
movl %eax, %r12d
shrl $0x1f, %r12d
addl %eax, %r12d
sarl %r12d
movl %r12d, %esi
callq 0x19c2e
movl %eax, %r13d
movl %eax, (%rsp)
incl %r12d
movl %r12d, %edi
movl %r15d, %esi
movl %ebp, %edx
movq %r14, %rcx
movq %rbx, %r8
callq 0x19c2e
movl %eax, 0x4(%rsp)
movslq %r13d, %rcx
movsd (%r14,%rcx,8), %xmm2
cltq
subsd (%r14,%rax,8), %xmm2
cvtsi2sd %ebp, %xmm0
mulsd %xmm0, %xmm2
xorpd %xmm1, %xmm1
xorl %eax, %eax
ucomisd %xmm2, %xmm1
setb %al
movl (%rsp,%rax,4), %edi
movslq %edi, %rdx
movl (%rbx,%rdx,4), %ecx
movl %ecx, (%rsp,%rax,4)
movl (%rsp), %esi
movl 0x4(%rsp), %r8d
cmpl $-0x1, %esi
setne %cl
cmpl $-0x1, %r8d
setne %r9b
andb %cl, %r9b
cmpb $0x1, %r9b
jne 0x19d32
movl %edi, %ecx
movslq %esi, %rdx
movsd (%r14,%rdx,8), %xmm2
movslq %r8d, %rdx
subsd (%r14,%rdx,8), %xmm2
mulsd %xmm0, %xmm2
xorl %edx, %edx
ucomisd %xmm2, %xmm1
setb %dl
cmpl %edx, %eax
je 0x19d0f
xorl %eax, %eax
ucomisd %xmm2, %xmm1
setb %al
movl (%rsp,%rax,4), %eax
movslq %ecx, %rcx
movl %eax, (%rbx,%rcx,4)
movl %edx, %eax
movl %eax, %esi
movl (%rsp,%rsi,4), %ecx
movslq %ecx, %rdx
movl (%rbx,%rdx,4), %r8d
movl %r8d, (%rsp,%rsi,4)
movl (%rsp), %esi
cmpl $-0x1, %esi
je 0x19d32
movl 0x4(%rsp), %r8d
cmpl $-0x1, %r8d
jne 0x19cd8
movl $0x1, %ecx
subl %eax, %ecx
movl (%rsp,%rcx,4), %eax
movl %eax, (%rbx,%rdx,4)
addq $0x8, %rsp
popq %rbx
popq %r12
popq %r13
popq %r14
popq %r15
popq %rbp
movl %edi, %eax
retq
// File: /workspace/github_c_makefile_star2_O3/heltilda[P]cicada/ccmain.c
// Function: runCicada
ccInt runCicada(ccInt argc, char **argv)
{
    ccInt rtrn;
    
    cc_compile_global_struct hold_compile_globals = cc_compile_globals;
    cc_interpret_global_struct hold_interpret_globals = cc_interpret_globals;
    cc_bytecode_global_struct hold_bytecode_globals = cc_bytecode_globals;
    
    rtrn = cicadaMain(argc, argv);
    
    cc_compile_globals = hold_compile_globals;
    cc_interpret_globals = hold_interpret_globals;
    cc_bytecode_globals = hold_bytecode_globals;
    
    return rtrn;
}

// Assembly:
pushq %rbp
pushq %r15
pushq %r14
pushq %r13
pushq %r12
pushq %rbx
subq $0x388, %rsp            # imm = 0x388
movq %rsi, %r13
movl %edi, %ebp
leaq 0xb533(%rip), %rbx      # 0x252a0
movq 0x10(%rbx), %rax
movq %rax, 0x10(%rsp)
movups (%rbx), %xmm0
movaps %xmm0, (%rsp)
leaq 0xb924(%rip), %rsi      # 0x256a8
leaq 0x20(%rsp), %r14
movl $0xb8, %edx
movq %r14, %rdi
callq 0x8110
leaq 0xb9c3(%rip), %r15      # 0x25760
leaq 0xd8(%rsp), %r12
movl $0x2b0, %edx            # imm = 0x2B0
movq %r12, %rdi
movq %r15, %rsi
callq 0x8110
movl %ebp, %edi
movq %r13, %rsi
callq 0x19e09
movl %eax, %ebp
movaps (%rsp), %xmm0
movups %xmm0, (%rbx)
movq 0x10(%rsp), %rax
movq %rax, 0x10(%rbx)
movl $0xb8, %edx
leaq 0xb8cb(%rip), %rdi      # 0x256a8
movq %r14, %rsi
callq 0x8110
movl $0x2b0, %edx            # imm = 0x2B0
movq %r15, %rdi
movq %r12, %rsi
callq 0x8110
movl %ebp, %eax
addq $0x388, %rsp            # imm = 0x388
popq %rbx
popq %r12
popq %r13
popq %r14
popq %r15
popq %rbp
retq
// File: /workspace/github_c_makefile_star2_O3/heltilda[P]cicada/ccmain.c
// Function: cleanUp
void cleanUp()
{
    derefCodeList(&codeRegister);
    
    deletePLL(&VariableList);
    deletePLL(&MasterCodeList);
    deleteStack(&PCStack);
    deleteLinkedList(&codeRegister);
    deleteLinkedList(&(GL_Object.arrayDimList));
    deleteLinkedList(&stringRegister);
    
    return;
}

// Assembly:
pushq %r15
pushq %r14
pushq %rbx
leaq 0xaf84(%rip), %rbx      # 0x25760
leaq 0x98(%rbx), %r14
movq %r14, %rdi
callq 0x15071
leaq 0xaeb6(%rip), %r15      # 0x256a8
leaq 0x48(%r15), %rdi
callq 0x9289
movq %r15, %rdi
callq 0x9289
addq $0x90, %r15
movq %r15, %rdi
callq 0x9513
movq %r14, %rdi
callq 0x847e
leaq 0xe0(%rbx), %rdi
callq 0x847e
addq $0x78, %rbx
movq %rbx, %rdi
popq %rbx
popq %r14
popq %r15
jmp 0x847e
nop
// File: /workspace/github_c_makefile_star2_O3/MrOneTwo[P]tinycc-dynamic-compilation/main.c
// Function: main
int
main(int argc, char* argv[])
{
  signal(SIGINT, signal_handler);

  script_t script;
  script.path = argv[1];

  while (1)
  {
    struct timespec t = {};
    t.tv_sec = 0;
    t.tv_nsec = 200000000;
    nanosleep(&t, &t);

    compile_program(&script);
    printf("%s\n", script.hello());
    printf("%s\n", script.bye());
  }

}

// Assembly:
pushq %rbp
movq %rsp, %rbp
pushq %r15
pushq %r14
pushq %r13
pushq %r12
pushq %rbx
subq $0x18, %rsp
movq %rsi, %rbx
leaq -0x26(%rip), %rsi       # 0x256c
movl $0x2, %edi
callq 0x2280
movq 0x8(%rbx), %rax
movq %rax, -0x30(%rbp)
leaq -0x40(%rbp), %r14
leaq 0x2fa55(%rip), %r12     # 0x32004
movq $0x0, -0x40(%rbp)
movq $0xbebc200, -0x38(%rbp) # imm = 0xBEBC200
movq %r14, %rdi
movq %r14, %rsi
callq 0x2170
callq 0x3be0
testq %rax, %rax
je 0x267f
movq %rax, %rbx
movq %rax, %rdi
movq %r12, %rsi
callq 0x45b0
movq %rbx, %rdi
movq %r12, %rsi
callq 0x3d90
movq %rbx, %rdi
xorl %esi, %esi
leaq 0xc8(%rip), %rdx        # 0x26c5
callq 0x3050
movq %rbx, %rdi
leaq 0x2fa04(%rip), %rsi     # 0x32010
callq 0x46d0
movq %rbx, %rdi
movl $0x1, %esi
callq 0x42a0
movq %rbx, %rdi
movq -0x30(%rbp), %rsi
callq 0x4120
testl %eax, %eax
js 0x2696
movq %rbx, %rdi
xorl %esi, %esi
callq 0x296b0
movslq %eax, %rsi
movl $0x1, %edi
callq 0x2260
testq %rax, %rax
je 0x268d
movq %rbx, %rdi
movq %rax, %rsi
callq 0x296b0
testl %eax, %eax
js 0x268d
movq %rbx, %rdi
leaq 0x2f9b0(%rip), %rsi     # 0x32013
callq 0x1fb70
movq %rax, %r13
movq %rbx, %rdi
leaq 0x2f9ab(%rip), %rsi     # 0x32020
callq 0x1fb70
movq %rax, %r15
jmp 0x26aa
leaq 0x2f9b3(%rip), %rdi     # 0x32039
callq 0x20e0
jmp 0x26aa
leaq 0x2f9cd(%rip), %rdi     # 0x32061
jmp 0x269d
leaq 0x2f9f9(%rip), %rdi     # 0x32096
callq 0x20e0
movq %rbx, %rdi
callq 0x3c70
callq *%r13
movq %rax, %rdi
callq 0x20e0
callq *%r15
movq %rax, %rdi
callq 0x20e0
jmp 0x25af
// File: /workspace/github_c_makefile_star2_O3/simh[P]simtools/crossassemblers/macro1/macro1.c
// Function: defineSymbol
SYM_T *defineSymbol( char *name, WORD32 val, SYMTYP type, WORD32 start )
{
    SYM_T  *sym;
    WORD32  xref_count;

    if( strlen( name ) < 1 )
    {
	return( &sym_undefined );		/* Protect against non-existent names. */
    }
    sym = lookup( name, type );
    xref_count = 0;			/* Set concordance for normal defintion. */

    if( M_DEFINED( sym->type ) && sym->val != val && M_NOTRDEF( sym -> type ))
    {
	if( pass == 2 )
	{
	    errorSymbol( &redefined_symbol, sym->name, start );
	    type = type | REDEFINED;
	    sym->xref_count++;		/* Referenced symbol, count it. */
	    xref_count = sym->xref_count;
	    /* moved inside "if pass2" -plb 10/2/03 allow redefinition
	     * of predefined symbols during pass1
	     */
	    return ( sym );
	}
    }

    if( pass == 2 && xref )
    {
	/* Put the definition line number in the concordance table. */
	/* Defined symbols are not counted as references. */
	if (sym->xref_index >= 0) {	/* beware macro dummies */
	    xreftab[sym->xref_index] = lineno;
	    /* Put the line number in the concordance table. */
	    xreftab[sym->xref_index + xref_count] = lineno;
	}
    }

    /* Now set the value and the type. */
    sym->val = val & 0777777;
    sym->type = type;
    return( sym );
}

// Assembly:
pushq %rbp
pushq %r15
pushq %r14
pushq %rbx
pushq %rax
cmpb $0x0, (%rdi)
je 0x2958
movl %ecx, %r15d
movl %edx, %ebp
movl %esi, %r14d
movl %edx, %esi
callq 0x40cf
movq %rax, %rbx
movl (%rax), %ecx
testb $0x1, %cl
jne 0x2961
movl 0x742a(%rip), %eax      # 0x9d80
jmp 0x299e
leaq 0x73d1(%rip), %rbx      # 0x9d30
jmp 0x29d9
movl 0x7419(%rip), %eax      # 0x9d80
cmpl %r14d, 0xc(%rbx)
je 0x299e
testl $0x14a, %ecx            # imm = 0x14A
setne %cl
cmpl $0x2, %eax
sete %dl
andb %cl, %dl
cmpb $0x1, %dl
jne 0x299e
movq %rbx, %rsi
addq $0x4, %rsi
leaq 0x71af(%rip), %rdi      # 0x9b40
movl %r15d, %edx
callq 0x4353
incl 0x14(%rbx)
jmp 0x29d9
cmpl $0x2, %eax
jne 0x29cc
cmpb $0x0, 0x73bf(%rip)      # 0x9d69
je 0x29cc
movslq 0x10(%rbx), %rax
testq %rax, %rax
js 0x29cc
movl 0x97a1(%rip), %ecx      # 0xc15c
movq 0x74f6(%rip), %rdx      # 0x9eb8
movl %ecx, (%rdx,%rax,4)
movslq 0x10(%rbx), %rax
movl %ecx, (%rdx,%rax,4)
andl $0x3ffff, %r14d         # imm = 0x3FFFF
movl %r14d, 0xc(%rbx)
movl %ebp, (%rbx)
movq %rbx, %rax
addq $0x8, %rsp
popq %rbx
popq %r14
popq %r15
popq %rbp
retq
// File: /workspace/github_c_makefile_star2_O3/simh[P]simtools/crossassemblers/macro1/macro1.c
// Function: onePass
void onePass() {
    int     ix;

    clc = 4;				/* Default location is 4 */
    start_addr = 0;			/* No starting address. */
    nconst = 0;				/* No constant blocks seen */
    nvars = 0;				/* No variables seen */

    while (curmacro) {			/* pop macro stack */
	struct macinv *mp;

	mp = curmacro->prev;
	free(curmacro);
	curmacro = mp;
    }

    for( ix = 0; ix < mac_count; ix++) {
	if (mac_defs[ix])
	    free( mac_defs[ix] );
	mac_defs[ix] = NULL;
    }
    mac_count = 0;			/* No macros defined. */

    listed = TRUE;
    lineno = 0;
    list_pageno = 0;
    list_lineno = 0;
    list_title_set = FALSE;
    page_lineno = LIST_LINES_PER_PAGE;	/* Force top of page for new titles. */
    radix = 8;				/* Initial radix is octal (base 8). */

    /* Now open the first input file. */
    end_of_input = FALSE;
    filix_curr = filix_start;		/* Initialize pointer to input files. */
    if(( infile = fopen( save_argv[filix_curr], "r" )) == NULL ) {
	fprintf( stderr, "%s: cannot open \"%s\"\n", save_argv[0],
		save_argv[filix_curr] );
	exit( -1 );
    }

    for (;;) {
	readLine();
	if (end_of_input) {
	    eob();
	    fclose( infile );
	    return;
	}
	processLine();
    } /* forever */
}

// Assembly:
pushq %r14
pushq %rbx
pushq %rax
movl $0x4, 0x9429(%rip)      # 0xc0b4
xorl %eax, %eax
movl %eax, 0x94b5(%rip)      # 0xc148
movl %eax, 0x94b3(%rip)      # 0xc14c
movl %eax, 0x94b1(%rip)      # 0xc150
movq 0x941a(%rip), %rdi      # 0xc0c0
testq %rdi, %rdi
je 0x2cc3
movq 0x78(%rdi), %rbx
callq 0x2030
movq %rbx, 0x9405(%rip)      # 0xc0c0
movq %rbx, %rdi
testq %rbx, %rbx
jne 0x2cab
movl 0x948b(%rip), %eax      # 0xc154
testl %eax, %eax
jle 0x2d00
leaq 0x737c(%rip), %rbx      # 0xa050
xorl %r14d, %r14d
movq (%rbx), %rdi
testq %rdi, %rdi
je 0x2cea
callq 0x2030
movl 0x946a(%rip), %eax      # 0xc154
movq $0x0, (%rbx)
incq %r14
movslq %eax, %rcx
addq $0x8, %rbx
cmpq %rcx, %r14
jl 0x2cd7
xorl %eax, %eax
movl %eax, 0x944c(%rip)      # 0xc154
movl $0x1, 0x9446(%rip)      # 0xc158
movl %eax, 0x9444(%rip)      # 0xc15c
movl %eax, 0x9442(%rip)      # 0xc160
movl %eax, 0x9440(%rip)      # 0xc164
movb %al, 0x939e(%rip)       # 0xc0c8
movl $0x3c, 0x9434(%rip)     # 0xc168
movl $0x8, 0x9402(%rip)      # 0xc140
movb %al, 0x93ec(%rip)       # 0xc130
movslq 0x717d(%rip), %rax      # 0x9ec8
movl %eax, 0x941b(%rip)      # 0xc16c
movq 0x7000(%rip), %rcx      # 0x9d58
movq (%rcx,%rax,8), %rdi
leaq 0x33d9(%rip), %rsi      # 0x613c
callq 0x2140
movq %rax, 0x7151(%rip)      # 0x9ec0
testq %rax, %rax
je 0x2d9c
callq 0x48f1
cmpb $0x0, 0x93b0(%rip)      # 0xc130
jne 0x2d89
callq 0x3a77
jmp 0x2d74
movq 0x7130(%rip), %rdi      # 0x9ec0
addq $0x8, %rsp
popq %rbx
popq %r14
jmp 0x2080
callq 0x2313
// File: /workspace/github_c_makefile_star2_O3/simh[P]simtools/crossassemblers/macro1/macro1.c
// Function: punchLeader
void punchLeader( WORD32 count )
{
  WORD32  ix;

  /* If value is zero, set to the default of 2 feet of leader. */
  count = ( count == 0 ) ? 240 : count;

  if( objectfile != NULL )
  {
    for( ix = 0; ix < count; ix++ )
    {
      fputc( 0, objectfile );
    }
  }
}

// Assembly:
pushq %rbx
testl %edi, %edi
movl $0xf0, %ebx
cmovnel %edi, %ebx
cmpq $0x0, 0x705c(%rip)      # 0x9e10
sete %al
testl %ebx, %ebx
setle %cl
orb %al, %cl
jne 0x2dd2
movq 0x7049(%rip), %rsi      # 0x9e10
xorl %edi, %edi
callq 0x20c0
decl %ebx
jne 0x2dc0
popq %rbx
retq
// File: /workspace/github_c_makefile_star2_O3/simh[P]simtools/crossassemblers/macro1/macro1.c
// Function: punchLoader
void
punchLoader() {
    int i;

    if (noinput)
	return;

    for (i = 0; i < DIM(loader); i++)
	punchLocObjectRIM(LOADERBASE+i, loader[i]);
    punchTriplet( JMP | LOADERBASE );
}

// Assembly:
cmpl $0x0, 0x6f89(%rip)      # 0x9d64
je 0x2dde
retq
pushq %rbp
pushq %r15
pushq %r14
pushq %rbx
pushq %rax
movl $0x1afe9, %ebx          # imm = 0x1AFE9
xorl %r14d, %r14d
leaq 0x6bec(%rip), %r15      # 0x99e0
movl (%r14,%r15), %ebp
movl %ebx, %edi
callq 0x5578
movl %ebp, %edi
callq 0x5578
incl %ebx
addq $0x4, %r14
cmpq $0x54, %r14
jne 0x2df4
movl $0x30fe9, %edi          # imm = 0x30FE9
addq $0x8, %rsp
popq %rbx
popq %r14
popq %r15
popq %rbp
jmp 0x5578
// File: /workspace/github_c_makefile_star2_O3/simh[P]simtools/crossassemblers/macro1/macro1.c
// Function: constants
void
constants(void) {
    int i;

    /* XXX illegal inside macro (curmacro != NULL) */

    if (pass == 1) {
	lit_loc[nconst] = clc;

	/* just use addition?! */
	for (i = 0; i < lit_count[nconst]; i++)
	    incrementClc();

	nconst++;
	return;
    }

    /* pass 2: */
    /* XXX complain if clc != lit_base[nconst]? */

    for (i = 0; i < lit_count[nconst]; i++) {
	if (i < nlit)
	    punchOutObject( clc, litter[i] & 0777777); /* punch it! */
	incrementClc();
    }

    nconst++;
    nlit = 0;				/* litter[] now empty */
}

// Assembly:
cmpl $0x1, 0x6f53(%rip)      # 0x9d80
jne 0x2e6f
movl 0x927f(%rip), %ecx      # 0xc0b4
movslq 0x9310(%rip), %rax      # 0xc14c
leaq 0xa54d(%rip), %rdx      # 0xd390
movl %ecx, (%rdx,%rax,4)
leaq 0x9573(%rip), %rdx      # 0xc3c0
movl (%rdx,%rax,4), %edx
testl %edx, %edx
jle 0x2e66
incl %ecx
andl $0xfff, %ecx            # imm = 0xFFF
decl %edx
jne 0x2e54
movl %ecx, 0x924e(%rip)      # 0xc0b4
incl %eax
movl %eax, 0x92de(%rip)      # 0xc14c
retq
pushq %rbp
pushq %r15
pushq %r14
pushq %r13
pushq %r12
pushq %rbx
pushq %rax
movslq 0x92cb(%rip), %rax      # 0xc14c
leaq 0x9538(%rip), %r15      # 0xc3c0
cmpl $0x0, (%r15,%rax,4)
jle 0x2f13
movl 0x7017(%rip), %ecx      # 0x9eb0
leaq 0x9550(%rip), %r12      # 0xc3f0
movl 0x920e(%rip), %ebp      # 0xc0b4
xorl %r13d, %r13d
leaq 0x91a0(%rip), %rbx      # 0xc050
movslq %ecx, %rdx
cmpq %rdx, %r13
jge 0x2ef2
movl (%r12), %r14d
movl $0x3ffff, %eax          # imm = 0x3FFFF
andl %eax, %r14d
movq %rbx, %rdi
movl %ebp, %esi
movl %r14d, %edx
movl $0x2, %ecx
callq 0x3f62
movl %ebp, %edi
movl %r14d, %esi
callq 0x55d6
movl 0x6fca(%rip), %ecx      # 0x9eb0
movl 0x91c8(%rip), %ebp      # 0xc0b4
movl 0x925a(%rip), %eax      # 0xc14c
incl %ebp
andl $0xfff, %ebp            # imm = 0xFFF
movl %ebp, 0x91b4(%rip)      # 0xc0b4
incq %r13
movslq %eax, %rdx
movslq (%r15,%rdx,4), %rdx
addq $0x4, %r12
cmpq %rdx, %r13
jl 0x2eb0
incl %eax
movl %eax, 0x9231(%rip)      # 0xc14c
movl $0x0, 0x6f8b(%rip)      # 0x9eb0
addq $0x8, %rsp
popq %rbx
popq %r12
popq %r13
popq %r14
popq %r15
popq %rbp
retq
// File: /workspace/github_c_makefile_star2_O3/simh[P]simtools/crossassemblers/macro1/macro1.c
// Function: printSymbolTable
void printSymbolTable()
{
    int    ix;
    int    symbol_lines;
    SYM_T *sym;
    char mark;

    symbol_lines = 0;
    for (ix = 0, sym = symtab; ix < symbol_top; ix++, sym++) {
	if (M_FIXED(sym->type) || M_PSEUDO(sym->type) ||
	    M_MACRO(sym->type) || M_EPSEUDO(sym->type))
	    continue;

	if (symbol_lines == 0) {
	    topOfForm( list_title, s_symtable );
	    symbol_lines = LIST_LINES_PER_PAGE;
	}

	switch( sym->type & ( DEFINED | REDEFINED )) {
	case UNDEFINED:
	    mark = '?';
	    break;

	case REDEFINED:
	    mark = '#';
	    break;

	default:
	    mark = ' ';
	    break;
	}
	fprintf( listfile, "%c%-6.6s %6.6o\n", mark, sym->name, sym->val );
	symbol_lines--;
    }
}

// Assembly:
movl 0x6e16(%rip), %eax      # 0x9d50
testl %eax, %eax
jle 0x2ff9
pushq %rbp
pushq %r15
pushq %r14
pushq %r13
pushq %r12
pushq %rbx
pushq %rax
movq 0x6df4(%rip), %r12      # 0x9d48
leaq 0x6af7(%rip), %r14      # 0x9a52
movl $0x3f, %ebp
leaq 0x38b8(%rip), %r15      # 0x681f
xorl %ebx, %ebx
xorl %r13d, %r13d
movl (%r12), %ecx
movl %ecx, %edx
andl $0x2, %edx
shrl %edx
movl %ecx, %esi
notl %esi
testl $0x101, %esi            # imm = 0x101
sete %sil
orb %dl, %sil
jne 0x2fdf
testl %ebx, %ebx
jne 0x2fa6
leaq 0x913b(%rip), %rdi      # 0xc0d0
movq %r14, %rsi
callq 0x534c
movl (%r12), %ecx
movl $0x3c, %ebx
andl $0x11, %ecx
xorl %eax, %eax
cmpl $0x11, %ecx
sete %al
leal (%rax,%rax,2), %edx
addl $0x20, %edx
testl %ecx, %ecx
cmovel %ebp, %edx
movq 0x6edd(%rip), %rdi      # 0x9ea0
leaq 0x4(%r12), %rcx
movl 0xc(%r12), %r8d
movq %r15, %rsi
xorl %eax, %eax
callq 0x2110
decl %ebx
movl 0x6d71(%rip), %eax      # 0x9d50
incl %r13d
addq $0x18, %r12
cmpl %eax, %r13d
jl 0x2f6c
addq $0x8, %rsp
popq %rbx
popq %r12
popq %r13
popq %r14
popq %r15
popq %rbp
retq
// File: /workspace/github_c_makefile_star2_O3/simh[P]simtools/crossassemblers/macro1/macro1.c
// Function: printPermanentSymbolTable
void printPermanentSymbolTable()
{
    int     ix;
    FILE   *permfile;

    if(( permfile = fopen( permpathname, "w" )) == NULL )
    {
	exit( 2 );
    }

    fprintf( permfile, "/ PERMANENT SYMBOL TABLE\n/\n" );
    fprintf( permfile, "        expunge\n/\n" );

    for( ix = 0; ix < symbol_top; ix++ )
    {
	int type = symtab[ix].type;
	if( M_FIXED(type) && !M_PSEUDO(type) && !M_EPSEUDO(type) )
	    fprintf( permfile, "\t%s=%o\n",
		     symtab[ix].name, symtab[ix].val );
    }
    fclose( permfile );
}

// Assembly:
pushq %r15
pushq %r14
pushq %r12
pushq %rbx
pushq %rax
leaq 0x6ec7(%rip), %rdi      # 0x9ed0
leaq 0x3526(%rip), %rsi      # 0x6536
callq 0x2140
testq %rax, %rax
je 0x30d5
movq %rax, %rbx
leaq 0x3807(%rip), %rdi      # 0x682f
movl $0x1b, %esi
movl $0x1, %edx
movq %rax, %rcx
callq 0x2180
leaq 0x380a(%rip), %rdi      # 0x684b
movl $0x12, %esi
movl $0x1, %edx
movq %rbx, %rcx
callq 0x2180
movl 0x6cf7(%rip), %eax      # 0x9d50
testl %eax, %eax
jle 0x30c2
movq 0x6ce4(%rip), %rcx      # 0x9d48
leaq 0x37f3(%rip), %r14      # 0x685e
xorl %r15d, %r15d
xorl %r12d, %r12d
movl (%rcx,%r15), %edx
movl %edx, %esi
notl %esi
testb $-0x7d, %sil
je 0x30b3
movl %edx, %esi
andl $0x2, %esi
je 0x30b3
andl $0x43, %edx
cmpl $0x43, %edx
je 0x30b3
leaq (%rcx,%r15), %rdx
addq $0x4, %rdx
movl 0x8(%rdx), %ecx
movq %rbx, %rdi
movq %r14, %rsi
xorl %eax, %eax
callq 0x2110
movq 0x6c9b(%rip), %rcx      # 0x9d48
movl 0x6c9d(%rip), %eax      # 0x9d50
incq %r12
movslq %eax, %rdx
addq $0x18, %r15
cmpq %rdx, %r12
jl 0x3071
movq %rbx, %rdi
addq $0x8, %rsp
popq %rbx
popq %r12
popq %r14
popq %r15
jmp 0x2080
movl $0x2, %edi
callq 0x2170
// File: /workspace/github_c_makefile_star2_O3/simh[P]simtools/crossassemblers/macro1/macro1.c
// Function: dump_symbols
void
dump_symbols(void) {
    int ix;
    WORD32 addr;

    objectfile = fopen( sympathname, "wb" );
    if (!objectfile) {
	perror(sympathname);
	return;
    }

    punchLeader(0);
    punchLoader();
    punchLeader(5);

    /* XXX fudge addr -- get count, and subtract 2N from 07750? */
    addr = 05000;

    for( ix = 0; ix < symbol_top; ix++ ) {
	int i, type;
	WORD32 name;

	type = symtab[ix].type;
	if (M_FIXED(type) || M_PSEUDO(type) || M_MACRO(type))
	    continue;

	name = 0;
	for (i = 0; i < 3; i++) {
	    char c;

	    c = symtab[ix].name[i];
	    /* XXX leave on NUL? */

	    c = ascii_to_fiodec[tolower(c) & 0177];
	    /* XXX check for BAD entries? */

	    /* XXX OR in val<<(3-i)*6?? */
	    name <<= 6;
	    name |= c & CHARBITS;
	}
	punchLocObject(addr++, permute(name));
	punchLocObject(addr++, symtab[ix].val);
    }
    flushLoader();
    punchTriplet( JMP );		/* ??? */
    punchLeader(0);
    fclose(objectfile);
}

// Assembly:
pushq %rbp
pushq %r15
pushq %r14
pushq %r13
pushq %r12
pushq %rbx
pushq %rax
leaq 0x6c72(%rip), %rdi      # 0x9f50
leaq 0x324e(%rip), %rsi      # 0x6533
callq 0x2140
movq %rax, 0x6b1f(%rip)      # 0x9e10
testq %rax, %rax
je 0x3449
movl $0xf0, %ebx
movq 0x6b0a(%rip), %rsi      # 0x9e10
xorl %edi, %edi
callq 0x20c0
decl %ebx
jne 0x32ff
callq 0x2dd4
movl $0x5, %edi
callq 0x2da1
movl 0x6a2a(%rip), %eax      # 0x9d50
testl %eax, %eax
jle 0x33fb
movl $0xa00, %ecx            # imm = 0xA00
movq %rcx, (%rsp)
movl $0x4, %r14d
movq 0x6a04(%rip), %r13      # 0x9d48
xorl %r15d, %r15d
leaq 0x6912(%rip), %r12      # 0x9c60
leaq (%r15,%r15,2), %rbx
movl (%r13,%rbx,8), %ecx
movl %ecx, %edx
andl $0x2, %edx
shrl %edx
notl %ecx
testl $0x101, %ecx            # imm = 0x101
sete %cl
orb %dl, %cl
jne 0x33e8
callq 0x21a0
movq (%rax), %rax
addq %r14, %r13
xorl %edx, %edx
xorl %ecx, %ecx
movsbq (%r13,%rdx), %rsi
movl (%rax,%rsi,4), %esi
andl $0x7f, %esi
movl %ecx, %edi
movzbl (%rsi,%r12), %ecx
shll $0x6, %edi
andl $0x3f, %ecx
orl %edi, %ecx
incq %rdx
cmpq $0x3, %rdx
jne 0x337c
movq (%rsp), %r13
leal 0x1(%r13), %ebp
leal (%rcx,%rcx), %esi
andl $0x20820, %esi          # imm = 0x20820
xorl %ecx, %esi
xorl $0x20000, %esi          # imm = 0x20000
movl %r13d, %edi
callq 0x55d6
addl $0x2, %r13d
movq %r13, (%rsp)
movq 0x6978(%rip), %rax      # 0x9d48
movl 0xc(%rax,%rbx,8), %esi
movl %ebp, %edi
callq 0x55d6
movq 0x6966(%rip), %r13      # 0x9d48
movl 0x6968(%rip), %eax      # 0x9d50
incq %r15
movslq %eax, %rcx
addq $0x18, %r14
cmpq %rcx, %r15
jl 0x334e
callq 0x5665
movl $0x30000, %edi          # imm = 0x30000
callq 0x5578
cmpq $0x0, 0x69fe(%rip)      # 0x9e10
je 0x3434
movl $0xf0, %ebx
movq 0x69f0(%rip), %rsi      # 0x9e10
xorl %edi, %edi
callq 0x20c0
decl %ebx
jne 0x3419
movq 0x69de(%rip), %rdi      # 0x9e10
jmp 0x3436
xorl %edi, %edi
addq $0x8, %rsp
popq %rbx
popq %r12
popq %r13
popq %r14
popq %r15
popq %rbp
jmp 0x2080
leaq 0x6b00(%rip), %rdi      # 0x9f50
addq $0x8, %rsp
popq %rbx
popq %r12
popq %r13
popq %r14
popq %r15
popq %rbp
jmp 0x2150
// File: /workspace/github_c_makefile_star2_O3/simh[P]simtools/crossassemblers/macro1/macro1.c
// Function: next
void
next(int op) {
    char c;

    /* Save start column of previous lexeme for diagnostic messages. */
    lexstartprev = lexstart;
    lextermprev = lexterm;

    c = line[cc];
    if (c == ' ') {
	/* eat spaces */
	do {
	    c = line[++cc];
	} while (c == ' ');
	if (op)				/* looking for operators? */
	    cc--;			/* return one */
    }

    overbar = 0;
    lexstart = cc;
    c = line[cc];
    if( isalnum(c) || ISOVERBAR(c)) {
	if (ISOVERBAR(c))
	    overbar = 1;
	do {
	    c = line[++cc];
	    if (ISOVERBAR(c))
		overbar = 1;
	} while (isalnum(c) || ISOVERBAR(c));
    }
    else if(!ISDONE(c) || c == '\t')	/* not end of line, or comment */
	cc++;				/* advance past all punctuation */
    lexterm = cc;
}

// Assembly:
pushq %r15
pushq %r14
pushq %r13
pushq %r12
pushq %rbx
movl 0x8790(%rip), %eax      # 0xc0b0
movl %eax, 0x881e(%rip)      # 0xc144
movl 0x8810(%rip), %eax      # 0xc13c
movl %eax, 0x9a8e(%rip)      # 0xd3c0
movl 0x8780(%rip), %ebx      # 0xc0b8
movslq %ebx, %rax
leaq 0x870e(%rip), %r14      # 0xc050
cmpb $0x20, (%rax,%r14)
jne 0x396c
addq %r14, %rax
incq %rax
incl %ebx
cmpb $0x20, (%rax)
leaq 0x1(%rax), %rax
je 0x394f
movl %ebx, 0x8758(%rip)      # 0xc0b8
testl %edi, %edi
je 0x396c
decl %ebx
movl %ebx, 0x874c(%rip)      # 0xc0b8
movl $0x0, 0x9a42(%rip)      # 0xd3b8
movl %ebx, 0x8734(%rip)      # 0xc0b0
movslq %ebx, %r15
movsbq (%r15,%r14), %r13
movzbl %r13b, %r12d
callq 0x21b0
movq (%rax), %rax
movzwl (%rax,%r13,2), %ecx
testb $0x8, %cl
jne 0x39e2
cmpl $0x5c, %r12d
je 0x39ee
cmpl $0x7e, %r12d
je 0x39ee
cmpl $0x2f, %r12d
setne %al
testl %r12d, %r12d
setne %cl
leal -0xb(%r12), %edx
cmpb $-0x2, %dl
setb %dl
cmpl $0x9, %r12d
je 0x39ca
andb %cl, %al
andb %dl, %al
je 0x39d2
incl %ebx
movl %ebx, 0x86e6(%rip)      # 0xc0b8
movl %ebx, 0x8764(%rip)      # 0xc13c
popq %rbx
popq %r12
popq %r13
popq %r14
popq %r15
retq
cmpl $0x7e, %r12d
je 0x39ee
cmpl $0x5c, %r12d
jne 0x39f8
movl $0x1, 0x99c0(%rip)      # 0xd3b8
leal 0x1(%r15), %ebx
leaq (%r15,%r14), %rcx
incq %rcx
movzbl (%rcx), %edx
cmpl $0x7e, %edx
je 0x3a10
cmpl $0x5c, %edx
jne 0x3a1a
movl $0x1, 0x999e(%rip)      # 0xd3b8
movsbq %dl, %rsi
testb $0x8, (%rax,%rsi,2)
jne 0x3a32
cmpb $0x5c, %dl
je 0x3a32
movzbl %sil, %edx
cmpl $0x7e, %edx
jne 0x39cc
incl %ebx
incq %rcx
jmp 0x3a03
// File: /workspace/github_c_makefile_star2_O3/simh[P]simtools/crossassemblers/macro1/macro1.c
// Function: getExprs
WORD32 getExprs()
{
    SYM_T sym;

    sym = getExpr();
    if (sym.type == PSEUDO)
	errorMessage( &value_required, lexstart ); /* XXX wrong pointer? */

    return sym.val & 0777777;
}

// Assembly:
pushq %r14
pushq %rbx
subq $0x18, %rsp
movq %rsp, %r14
movq %r14, %rdi
callq 0x4691
movl 0xc(%r14), %ebx
cmpl $0x43, (%r14)
jne 0x3a67
movl 0x8655(%rip), %esi      # 0xc0b0
leaq 0x60ee(%rip), %rdi      # 0x9b50
callq 0x4b12
andl $0x3ffff, %ebx          # imm = 0x3FFFF
movl %ebx, %eax
addq $0x18, %rsp
popq %rbx
popq %r14
retq
// File: /workspace/github_c_makefile_star2_O3/simh[P]simtools/crossassemblers/macro1/macro1.c
// Function: lexemeToName
char *lexemeToName( char *name, WORD32 from, WORD32 term )
{
    int to;

    to = 0;
    while( from < term && to < SYMLEN-1) {
	char c = line[from++];
	if (ISOVERBAR(c))
	    continue;
	name[to++] = c;
    }
    name[to] = '\0';

    return( name );
}

// Assembly:
movq %rdi, %rax
xorl %ecx, %ecx
cmpl %edx, %esi
jge 0x434e
movslq %esi, %rsi
movslq %edx, %rdx
leaq 0x7d2c(%rip), %rdi      # 0xc050
movzbl (%rsi,%rdi), %r8d
cmpl $0x5c, %r8d
je 0x433e
cmpl $0x7e, %r8d
je 0x433e
movslq %ecx, %r9
incl %ecx
movb %r8b, (%rax,%r9)
incq %rsi
cmpq %rdx, %rsi
jge 0x434b
cmpl $0x6, %ecx
jl 0x4324
movslq %ecx, %rcx
movb $0x0, (%rax,%rcx)
retq
// File: /workspace/github_c_makefile_star2_O3/simh[P]simtools/crossassemblers/macro1/macro1.c
// Function: evalSymbol
SYM_T *evalSymbol()
{
    char   name[SYMLEN];
    SYM_T *sym;

    sym = lookup( lexemeToName( name, lexstart, lexterm ), UNDEFINED);

    sym->xref_count++;			/* Count the number of references to symbol. */

    if( xref && pass == 2 && sym->xref_index >= 0)
    {
	/* Put the line number in the concordance table. */
	xreftab[sym->xref_index + sym->xref_count] = lineno;
    }

    return( sym );
}

// Assembly:
pushq %rbx
subq $0x10, %rsp
movl 0x7c3e(%rip), %esi      # 0xc0b0
movl 0x7cc4(%rip), %edx      # 0xc13c
leaq 0x9(%rsp), %rbx
movq %rbx, %rdi
callq 0x430e
movq %rbx, %rdi
xorl %esi, %esi
callq 0x40cf
movslq 0x14(%rax), %rcx
incq %rcx
movl %ecx, 0x14(%rax)
cmpb $0x0, 0x58c9(%rip)      # 0x9d69
je 0x44c7
cmpl $0x2, 0x58d7(%rip)      # 0x9d80
jne 0x44c7
movslq 0x10(%rax), %rdx
testq %rdx, %rdx
js 0x44c7
movl 0x7ca2(%rip), %esi      # 0xc15c
movq 0x59f7(%rip), %rdi      # 0x9eb8
addq %rcx, %rdx
movl %esi, (%rdi,%rdx,4)
addq $0x10, %rsp
popq %rbx
retq
// File: /workspace/github_c_makefile_star2_O3/simh[P]simtools/crossassemblers/macro1/macro1.c
// Function: eval
SYM_T eval() {
    SYM_T sym;

    switch (line[lexstart]) {
    case '-':				/* unary - */
	next(1);
	sym = eval2();			/* skip op */
	sym.val ^= 0777777;
	break;
    case '+':				/* unary + */
	next(1);			/* skip op */
	/* fall */
    default:
	sym = eval2();
    }
    return sym;
}

// Assembly:
pushq %rbx
movq %rdi, %rbx
movslq 0x7512(%rip), %rax      # 0xc0b0
leaq 0x74ab(%rip), %rcx      # 0xc050
movzbl (%rax,%rcx), %eax
cmpl $0x2b, %eax
je 0x4bce
cmpl $0x2d, %eax
jne 0x4bd8
movl $0x1, %edi
callq 0x3911
movq %rbx, %rdi
callq 0x4f06
xorl $0x3ffff, 0xc(%rbx)     # imm = 0x3FFFF
jmp 0x4be0
movl $0x1, %edi
callq 0x3911
movq %rbx, %rdi
callq 0x4f06
movq %rbx, %rax
popq %rbx
retq
// File: /workspace/github_c_makefile_star2_O3/simh[P]simtools/crossassemblers/macro1/macro1.c
// Function: moveToEndOfLine
void moveToEndOfLine()
{
    while( !ISEND( line[cc] )) cc++;	/* XXX wrong! will stop on a tab! */
    lexstart = cc;
    lexterm = cc;
    lexstartprev = lexstart;
}

// Assembly:
movslq 0x74cc(%rip), %rax      # 0xc0b8
leaq 0x745d(%rip), %rcx      # 0xc050
addq %rax, %rcx
movl $0x601, %edx            # imm = 0x601
movzbl (%rcx), %esi
cmpl $0xa, %esi
ja 0x4c08
btl %esi, %edx
jb 0x4c15
incl %eax
movl %eax, 0x74a8(%rip)      # 0xc0b8
incq %rcx
jmp 0x4bfb
movl %eax, 0x7495(%rip)      # 0xc0b0
movl %eax, 0x751b(%rip)      # 0xc13c
movl %eax, 0x751d(%rip)      # 0xc144
retq
// File: /workspace/github_c_makefile_star2_O3/simh[P]simtools/crossassemblers/macro1/macro1.c
// Function: nextfiodec
int
nextfiodec(int *ccase, int delim)
{
    unsigned char c;

    for (;;) {
	if (cc >= maxcc) {
	    if (delim == -1)
		return -1;

	    /* XXX MUST NOT BE IN A REPEAT!! */
	    readLine();			/* danger will robinson! */
	    if (end_of_input)
		return -1;
	}
	c = line[cc];
	switch (c) {
	case '\n':
	    c = '\r';
	    break;
	case '\r':
	    continue;
	}
	break;
    }

    if (delim != -1 && c == delim) {
	if (*ccase == LC) {
	    cc++;			/* eat delim */
	    return -1;
	}
	*ccase = LC;
	return CONCISE_LC;		/* shift down first */
    }

    if (c > 0177) {			/* non-ascii */
	errorMessage( &illegal_character, cc );
	c = 0;				/* space?! */
    }

    c = ascii_to_fiodec[c&0177];
    if (c == BAD) {
	errorMessage( &illegal_character, cc );
	c = 0;				/* space?! */
    }

    if (!(c & *ccase)) {		/* char not in current case? */
	*ccase ^= BC;			/* switch case */
	if (*ccase == LC)
	    return CONCISE_LC;		/* shift down */
	else
	    return CONCISE_UC;		/* shift up */
    }
    cc++;
    return c & CHARBITS;
}

// Assembly:
pushq %rbp
pushq %r15
pushq %r14
pushq %rbx
pushq %rax
movl %esi, %ebp
movq %rdi, %rbx
movl 0x747e(%rip), %esi      # 0xc0b8
movl 0x74f4(%rip), %ecx      # 0xc134
leaq 0x7409(%rip), %r15      # 0xc050
movl $0xffffffff, %r14d      # imm = 0xFFFFFFFF
cmpl %ecx, %esi
jl 0x4c78
cmpl $-0x1, %ebp
je 0x4d25
callq 0x48f1
cmpb $0x0, 0x74ca(%rip)      # 0xc130
jne 0x4d25
movl 0x74c2(%rip), %ecx      # 0xc134
movl 0x7440(%rip), %esi      # 0xc0b8
movslq %esi, %rax
movzbl (%rax,%r15), %eax
cmpl $0xd, %eax
je 0x4c4d
cmpl $0xa, %eax
jne 0x4c93
movb $0xd, %al
cmpl $0xd, %ebp
je 0x4c97
jmp 0x4cc1
cmpl %ebp, %eax
jne 0x4caf
cmpl $0x80, (%rbx)
jne 0x4cfd
incl %esi
movl %esi, 0x7411(%rip)      # 0xc0b8
movl $0xffffffff, %r14d      # imm = 0xFFFFFFFF
jmp 0x4d25
testb %al, %al
jns 0x4cc1
leaq 0x4dd6(%rip), %rdi      # 0x9a90
callq 0x4b12
xorl %eax, %eax
movzbl %al, %eax
leaq 0x4f95(%rip), %rcx      # 0x9c60
movb (%rax,%rcx), %al
cmpb $0xc, %al
jne 0x4ce6
movl 0x73e0(%rip), %esi      # 0xc0b8
leaq 0x4db1(%rip), %rdi      # 0x9a90
callq 0x4b12
xorl %eax, %eax
movzbl %al, %r14d
movl (%rbx), %eax
testl %r14d, %eax
je 0x4d0b
incl 0x73c1(%rip)            # 0xc0b8
andl $0x3f, %r14d
jmp 0x4d25
movl $0x80, (%rbx)
movl $0x3a, %r14d
jmp 0x4d25
movl %eax, %ecx
xorl $0xc0, %ecx
movl %ecx, (%rbx)
xorl %ecx, %ecx
cmpl $0x40, %eax
setne %cl
leal 0x3a(,%rcx,2), %r14d
movl %r14d, %eax
addq $0x8, %rsp
popq %rbx
popq %r14
popq %r15
popq %rbp
retq
// File: /workspace/github_c_makefile_star2_O3/simh[P]simtools/crossassemblers/macro1/macro1.c
// Function: flex
WORD32 flex()
{
    WORD32 w;
    int shift;
    int ccase;

    if (line[lexstart] == ' ')		/* always? */
	next(0);

    /* original version appears to take next 3 characters,
     * REGARDLESS of what they are (tab, newline, space?)!
     */
    w = 0;
    ccase = LC;				/* current case */
    for (shift = 12; shift >= 0; shift -= 6) {
	unsigned char c;
	if( lexstart >= maxcc )
	    break;

	c = line[lexstart];
	if (c == '\t' || c == '\n') {
	    if (ccase == LC)
		break;
	    c = CONCISE_LC;			/* shift down first */
	}
	else {
	    if (c > 0177) {		/* non-ascii */
		errorMessage( &illegal_character, lexstart );
		c = 0;
	    }

	    c = ascii_to_fiodec[c&0177];
	    if (c == BAD) {
		errorMessage( &illegal_character, lexstart );
		c = 0;
	    }

	    if (!(c & ccase)) {		/* char not in current case? */
		ccase ^= BC;		/* switch case */
		if (ccase == LC)
		    c = CONCISE_LC;	/* shift down */
		else
		    c = CONCISE_UC;	/* shift up */
	    }
	    else
		lexstart++;
	}
	w |= (c & CHARBITS) << shift;
    }
    /* error to get here w/ case == UC? nah. shift down could be next */
    return w;
}

// Assembly:
pushq %rbp
pushq %r15
pushq %r14
pushq %r13
pushq %r12
pushq %rbx
pushq %rax
movslq 0x736b(%rip), %rax      # 0xc0b0
leaq 0x7304(%rip), %r15      # 0xc050
cmpb $0x20, (%rax,%r15)
jne 0x4d5a
xorl %edi, %edi
callq 0x3911
xorl %ebx, %ebx
movl $0x80, %r12d
movl $0x12, %ebp
leaq 0x4d22(%rip), %r14      # 0x9a90
leaq 0x4eeb(%rip), %r13      # 0x9c60
movslq 0x7334(%rip), %rsi      # 0xc0b0
cmpl 0x73b2(%rip), %esi      # 0xc134
jge 0x4e0b
movb (%rsi,%r15), %al
leal -0x9(%rax), %ecx
cmpb $0x1, %cl
ja 0x4da4
movl $0x3a, %eax
cmpl $0x80, %r12d
jne 0x4df9
jmp 0x4e0b
testb %al, %al
jns 0x4db2
movq %r14, %rdi
callq 0x4b12
xorl %eax, %eax
movzbl %al, %eax
movb (%rax,%r13), %al
cmpb $0xc, %al
jne 0x4dcd
movl 0x72ed(%rip), %esi      # 0xc0b0
movq %r14, %rdi
callq 0x4b12
xorl %eax, %eax
movzbl %al, %ecx
testl %ecx, %r12d
je 0x4de2
incl 0x72d5(%rip)            # 0xc0b0
andb $0x3f, %al
movzbl %al, %eax
jmp 0x4df9
xorl %eax, %eax
cmpl $0x40, %r12d
setne %al
xorl $0xc0, %r12d
leal 0x3a(,%rax,2), %eax
addl $-0x6, %ebp
movl %ebp, %ecx
shll %cl, %eax
orl %eax, %ebx
cmpl $0x5, %ebp
ja 0x4d75
movl %ebx, %eax
addq $0x8, %rsp
popq %rbx
popq %r12
popq %r13
popq %r14
popq %r15
popq %rbp
retq
// File: /workspace/github_c_makefile_star2_O3/simh[P]simtools/crossassemblers/macro1/macro1.c
// Function: getChar
WORD32 getChar()
{
    unsigned char c, pos;

    if( cc >= maxcc )
	return 0;			/* XXX error? */
    pos = line[cc++];
    if (pos != 'l' && pos != 'm' && pos != 'r') {
	errorMessage( &illegal_character, lexstart );
	return 0;
    }

    if( cc >= maxcc )
	return 0;			/* XXX error? */

    c = line[cc++];
    if (c > 0177) {
	errorMessage( &illegal_character, lexstart );
	c = 0;
    }

    c = ascii_to_fiodec[c];
    if (c == BAD) {
	errorMessage( &illegal_character, lexstart );
	c = 0;
    }

    if (!(c & LC)) {			/* upper case only char? */
	c = CONCISE_UC;			/* take a shift up */
	cc--;				/* and leave char for next luser */
    }

    c &= CHARBITS;
    switch (pos) {
    case 'l': return c << 12;
    case 'm': return c << 6;
    case 'r': return c;
    }
    /* should not happen */
    return 0;
}

// Assembly:
pushq %r14
pushq %rbx
pushq %rax
movslq 0x7291(%rip), %rax      # 0xc0b8
movl 0x7307(%rip), %edx      # 0xc134
xorl %ebx, %ebx
cmpl %edx, %eax
jge 0x4efc
movq %rax, %rcx
incq %rcx
movl %ecx, 0x7275(%rip)      # 0xc0b8
leaq 0x7206(%rip), %rsi      # 0xc050
movzbl (%rax,%rsi), %r14d
leal -0x6c(%r14), %edi
cmpl $0x6, %edi
ja 0x4eb5
movl $0x43, %r8d
btl %edi, %r8d
jae 0x4eb5
cmpl %edx, %ecx
jge 0x4efc
addl $0x2, %eax
movl %eax, 0x7243(%rip)      # 0xc0b8
movb (%rcx,%rsi), %al
testb %al, %al
jns 0x4e90
movl 0x722e(%rip), %esi      # 0xc0b0
leaq 0x4c07(%rip), %rdi      # 0x9a90
callq 0x4b12
xorl %eax, %eax
movzbl %al, %eax
leaq 0x4dc6(%rip), %rcx      # 0x9c60
movb (%rax,%rcx), %al
cmpb $0xc, %al
jne 0x4ec9
movl 0x7209(%rip), %esi      # 0xc0b0
leaq 0x4be2(%rip), %rdi      # 0x9a90
callq 0x4b12
jmp 0x4ecd
movl 0x71f5(%rip), %esi      # 0xc0b0
leaq 0x4bce(%rip), %rdi      # 0x9a90
callq 0x4b12
jmp 0x4efc
testb %al, %al
js 0x4ed5
decl 0x71e5(%rip)            # 0xc0b8
movb $0x3c, %al
andb $0x3f, %al
cmpl $0x72, %r14d
je 0x4ef9
cmpl $0x6d, %r14d
je 0x4ef1
cmpl $0x6c, %r14d
jne 0x4efc
movzbl %al, %ebx
shll $0xc, %ebx
jmp 0x4efc
movzbl %al, %ebx
shll $0x6, %ebx
jmp 0x4efc
movzbl %al, %ebx
movl %ebx, %eax
addq $0x8, %rsp
popq %rbx
popq %r14
retq
// File: /workspace/github_c_makefile_star2_O3/simh[P]simtools/crossassemblers/macro1/macro1.c
// Function: literal
WORD32
literal( WORD32 value )
{
    int i;

    if (nconst >= MAX_CONSTANTS) {
	fprintf(stderr, "too many 'constants'; increase MAX_CONSTANTS\n");
	exit(1);
    }

    if (pass == 1) {
	if (++lit_count[nconst] == MAX_LITERALS) {
	    fprintf(stderr, "too many literals; increase MAX_LITERALS\n");
	    exit(1);
	}
	return lit_count[nconst];
    }

#if 1
    /*
     * pool constants; makes for a shorter tape
     * (but "middle" constants blocks can't shrink)
     */
    for (i = 0; i < nlit; i++)
	if (litter[i] == value)
	    return lit_loc[nconst] + i;
#endif

    /* paranoia */
    if (nlit == MAX_LITERALS) {
	fprintf(stderr, "too many literals; increase MAX_LITERALS\n");
	exit(1);
    }

    /* not found, save it */
    litter[nlit] = value;

    /* use base for this block, determined on pass1 */
    return lit_loc[nconst] + nlit++;
}

// Assembly:
pushq %rax
movslq 0x6ebe(%rip), %rcx      # 0xc14c
cmpq $0xa, %rcx
jge 0x531c
cmpl $0x1, 0x4ae1(%rip)      # 0x9d80
jne 0x52bc
leaq 0x7118(%rip), %rdx      # 0xc3c0
movl (%rdx,%rcx,4), %eax
incl %eax
movl %eax, (%rdx,%rcx,4)
cmpl $0x3e8, %eax            # imm = 0x3E8
jne 0x531a
callq 0x2427
movslq 0x4bed(%rip), %rdx      # 0x9eb0
leaq 0x7126(%rip), %rax      # 0xc3f0
testq %rdx, %rdx
jle 0x52f4
movl %edx, %r8d
xorl %esi, %esi
movq %rax, %r9
cmpl %edi, (%r9)
je 0x530e
decq %rsi
addq $0x4, %r9
movq %r8, %r10
addq %rsi, %r10
jne 0x52d7
cmpl $0x3e8, %r8d            # imm = 0x3E8
je 0x5321
movl %edi, (%rax,%rdx,4)
leaq 0x8092(%rip), %rax      # 0xd390
leal 0x1(%rdx), %esi
movl %esi, 0x4ba9(%rip)      # 0x9eb0
movl (%rax,%rcx,4), %eax
addl %edx, %eax
jmp 0x531a
leaq 0x807b(%rip), %rax      # 0xd390
movl (%rax,%rcx,4), %eax
subl %esi, %eax
popq %rcx
retq
callq 0x244c
callq 0x2402
// File: /workspace/github_c_makefile_star2_O3/simh[P]simtools/crossassemblers/macro1/macro1.c
// Function: punchLocObject
void punchLocObject( WORD32 loc, WORD32 val )
{
    if (!rim_mode) {
	if ((loc & LOADERBUFMASK) == 0 || /* full/force alignment */
	    loaderbufcount > 0 &&
	    loc != loaderbufstart + loaderbufcount) /* disjoint */
	    flushLoader();
	if (loaderbufcount == 0)
	    loaderbufstart = loc;
	loaderbuf[loaderbufcount++] = val;
    }
    else
	punchLocObjectRIM( loc, val );
}

// Assembly:
pushq %rbp
pushq %rbx
pushq %rax
movl %esi, %ebx
movl %edi, %ebp
cmpb $0x0, 0x477e(%rip)      # 0x9d62
je 0x5600
orl $0x1a000, %ebp          # imm = 0x1A000
movl %ebp, %edi
callq 0x5578
movl %ebx, %edi
addq $0x8, %rsp
popq %rbx
popq %rbp
jmp 0x5578
testb $0x3f, %bpl
je 0x561c
movl 0x6ca4(%rip), %eax      # 0xc2b0
testl %eax, %eax
jle 0x5627
movl 0x6c9e(%rip), %ecx      # 0xc2b4
addl %eax, %ecx
cmpl %ebp, %ecx
je 0x5633
callq 0x5665
movl 0x6c89(%rip), %eax      # 0xc2b0
testl %eax, %eax
jne 0x5633
movl %ebp, 0x6c83(%rip)      # 0xc2b4
xorl %eax, %eax
leal 0x1(%rax), %ecx
movl %ecx, 0x6c74(%rip)      # 0xc2b0
cltq
leaq 0x6c7b(%rip), %rcx      # 0xc2c0
movl %ebx, (%rcx,%rax,4)
addq $0x8, %rsp
popq %rbx
popq %rbp
retq
// File: /workspace/github_c_makefile_star2_O3/simh[P]simtools/crossassemblers/macro1/macro1.c
// Function: flushLoader
void
flushLoader() {
    WORD32 sum;
    int i;

    if (loaderbufcount == 0)
	return;

    sum = 0;
    PW( DIO | loaderbufstart );
    PW( DIO | loaderbufstart + loaderbufcount );
    for (i = 0; i < loaderbufcount; i++)
	PW( loaderbuf[i] );

    /* roll over all the overflows at once */
    if (sum & ~0777777)
	sum = (sum & 0777777) + (sum >> 18);
    if (sum & 01000000)			/* one more time */
	sum++;
    PW( sum );

    punchLeader(5);
    loaderbufcount = 0;
}

// Assembly:
cmpl $0x0, 0x6c44(%rip)      # 0xc2b0
je 0x5713
pushq %rbp
pushq %r15
pushq %r14
pushq %rbx
pushq %rax
movl $0x1a000, %ebp          # imm = 0x1A000
movl 0x6c30(%rip), %ebx      # 0xc2b4
orl %ebp, %ebx
movl %ebx, %edi
callq 0x5578
movl 0x6c1d(%rip), %edi      # 0xc2b0
addl 0x6c1b(%rip), %edi      # 0xc2b4
orl %ebp, %edi
addl %edi, %ebx
callq 0x5578
cmpl $0x0, 0x6c07(%rip)      # 0xc2b0
jle 0x56d2
leaq 0x6c0e(%rip), %r14      # 0xc2c0
xorl %r15d, %r15d
movl (%r14), %edi
addl %edi, %ebx
callq 0x5578
incq %r15
movslq 0x6be7(%rip), %rax      # 0xc2b0
addq $0x4, %r14
cmpq %rax, %r15
jl 0x56b5
movl %ebx, %eax
andl $0x3ffff, %eax          # imm = 0x3FFFF
movl %ebx, %edi
sarl $0x12, %edi
addl %eax, %edi
cmpl $0x40000, %ebx          # imm = 0x40000
cmovbl %ebx, %edi
btl $0x12, %edi
adcl $0x0, %edi
callq 0x5578
movl $0x5, %edi
callq 0x2da1
movl $0x0, 0x6ba7(%rip)      # 0xc2b0
addq $0x8, %rsp
popq %rbx
popq %r14
popq %r15
popq %rbp
retq
// File: /workspace/github_c_makefile_star2_O3/simh[P]simtools/crossassemblers/macro1/macro1.c
// Function: isLexSymbol
BOOL isLexSymbol()
{
    int ix;

    /* XXX alpha within first 4? 3?? */
    for( ix = lexstart; ix < lexterm; ix++ )
	if(isalpha(line[ix]))
	    return TRUE;			/* any position will do! */
    return FALSE;
}

// Assembly:
pushq %r14
pushq %rbx
pushq %rax
movslq 0x6984(%rip), %rbx      # 0xc0b0
movl 0x6a09(%rip), %r14d     # 0xc13c
cmpl %ebx, %r14d
jle 0x5764
callq 0x21b0
movq (%rax), %rax
subl %ebx, %r14d
xorl %ecx, %ecx
leaq 0x6904(%rip), %rdx      # 0xc050
leaq (%rbx,%rcx), %rsi
movsbq (%rdx,%rsi), %rsi
testb $0x4, 0x1(%rax,%rsi,2)
jne 0x5768
incq %rcx
cmpl %ecx, %r14d
jne 0x574c
xorl %eax, %eax
jmp 0x576a
movb $0x1, %al
addq $0x8, %rsp
popq %rbx
popq %r14
retq
// File: /workspace/github_c_makefile_star2_O3/simh[P]simtools/crossassemblers/macro1/macro1.c
// Function: variables
void
variables() {
    /* XXX error if "variables" already seen (in this pass) */
    /* XXX error if different address on pass 2 */
    if (pass == 2)
	printLine( line, clc, 0, LINE_LOC );
    vars_addr = clc;
    vars_end = clc = (clc + nvars) & ADDRESS_FIELD;
    if (pass == 2)
	printLine( line, clc, 0, LINE_LOC);
}

// Assembly:
cmpl $0x2, 0x4286(%rip)      # 0x9d80
jne 0x5b26
pushq %rax
movl 0x65b1(%rip), %esi      # 0xc0b4
leaq 0x6546(%rip), %rdi      # 0xc050
xorl %edx, %edx
movl $0x4, %ecx
callq 0x3f62
cmpl $0x2, 0x4263(%rip)      # 0x9d80
sete %al
addq $0x8, %rsp
jmp 0x5b28
xorl %eax, %eax
movl 0x6586(%rip), %esi      # 0xc0b4
movl %esi, 0x7888(%rip)      # 0xd3bc
addl 0x6616(%rip), %esi      # 0xc150
andl $0xfff, %esi            # imm = 0xFFF
movl %esi, 0x656e(%rip)      # 0xc0b4
movl %esi, 0x787c(%rip)      # 0xd3c8
testb %al, %al
je 0x5b63
leaq 0x64f9(%rip), %rdi      # 0xc050
xorl %edx, %edx
movl $0x4, %ecx
jmp 0x3f62
retq
// File: /workspace/github_c_makefile_star2_O3/simh[P]simtools/crossassemblers/macro1/macro1.c
// Function: text
void
text(void)
{
    char delim;
    WORD32 w;
    int count;
    int ccase;
    /* XXX error in repeat!! */
    do {
	if (cc == maxcc) {
	    /* XXX EOL before delim found!!! */
	    fprintf(stderr, "FIX ME!\n");
	    return;
	}
	delim = line[cc++];
    } while (delim == ' ');		/* others? NL */

    w = count = 0;
    ccase = LC;
    for (;;) {
	int c = nextfiodec(&ccase, delim);
	if (c == -1)
	    break;
	w |= c << ((2-count)*6);
	if (++count == 3) {
	    punchOutObject(clc, w);	/* punch it! */
	    incrementClc();
	    count = w = 0;
	}
    }
    if (count > 0) {
	punchOutObject(clc, w);		/* punch remainder */
	incrementClc();
    }
}

// Assembly:
pushq %rbp
pushq %r15
pushq %r14
pushq %r13
pushq %r12
pushq %rbx
pushq %rax
movslq 0x65be(%rip), %rax      # 0xc134
movslq 0x653b(%rip), %rcx      # 0xc0b8
leal 0x1(%rcx), %edx
leaq 0x64c9(%rip), %rsi      # 0xc050
cmpq %rcx, %rax
je 0x5ca5
movl %edx, 0x6522(%rip)      # 0xc0b8
movsbl (%rcx,%rsi), %ebx
incq %rcx
incl %edx
cmpl $0x20, %ebx
je 0x5b87
leaq 0x4(%rsp), %rdi
movl $0x80, (%rdi)
movl %ebx, %esi
callq 0x4c28
cmpl $-0x1, %eax
je 0x5c96
xorl %ebp, %ebp
leaq 0x6488(%rip), %r14      # 0xc050
leaq 0x4(%rsp), %r15
xorl %r13d, %r13d
movl %r13d, %r12d
movl %ebp, %edx
movb $0x2, %cl
subb %r12b, %cl
movzbl %cl, %ecx
addl %ecx, %ecx
leal (%rcx,%rcx,2), %ecx
shll %cl, %eax
movl %eax, %ebp
orl %edx, %ebp
leal 0x1(%r12), %r13d
cmpl $0x3, %r13d
je 0x5c04
movq %r15, %rdi
movl %ebx, %esi
callq 0x4c28
cmpl $-0x1, %eax
jne 0x5bd0
jmp 0x5c5a
movl 0x64a9(%rip), %r12d     # 0xc0b4
movq %r14, %rdi
movl %r12d, %esi
movl %ebp, %edx
movl $0x2, %ecx
callq 0x3f62
movl %r12d, %edi
movl %ebp, %esi
callq 0x55d6
movl 0x6487(%rip), %eax      # 0xc0b4
incl %eax
andl $0xfff, %eax            # imm = 0xFFF
movl %eax, 0x647a(%rip)      # 0xc0b4
movq %r15, %rdi
movl %ebx, %esi
callq 0x4c28
movl $0x0, %ebp
movl $0x0, %r13d
cmpl $-0x1, %eax
jne 0x5bd0
jmp 0x5c96
testl %r12d, %r12d
js 0x5c96
movl 0x644f(%rip), %ebx      # 0xc0b4
leaq 0x63e4(%rip), %rdi      # 0xc050
movl %ebx, %esi
movl %ebp, %edx
movl $0x2, %ecx
callq 0x3f62
movl %ebx, %edi
movl %ebp, %esi
callq 0x55d6
movl 0x642b(%rip), %eax      # 0xc0b4
incl %eax
andl $0xfff, %eax            # imm = 0xFFF
movl %eax, 0x641e(%rip)      # 0xc0b4
addq $0x8, %rsp
popq %rbx
popq %r12
popq %r13
popq %r14
popq %r15
popq %rbp
retq
callq 0x2496
jmp 0x5c96