	.section	__TEXT,__text,regular,pure_instructions
	.build_version macos, 13, 0	sdk_version 13, 3
	.p2align	4, 0x90                         ## -- Begin function forth_request_unload_prog
_forth_request_unload_prog:             ## @forth_request_unload_prog
	.cfi_startproc
## %bb.0:
	pushq	%rbp
	.cfi_def_cfa_offset 16
	.cfi_offset %rbp, -16
	movq	%rsp, %rbp
	.cfi_def_cfa_register %rbp
	pushq	%rbx
	pushq	%rax
	.cfi_offset %rbx, -24
	movq	%rdi, %rbx
	movq	_with_output_free_list@GOTPCREL(%rip), %rdi
	movq	%rbx, %rsi
	callq	_tlist_remove
	xorl	%edi, %edi
	cmpq	$0, (%rbx)
	setne	%dil
	callq	_assert
	movq	%rbx, %rdi
	callq	_forth_request_free_prog
	xorl	%edi, %edi
	cmpq	$0, (%rbx)
	sete	%dil
	callq	_assert
	movq	_without_output_free_list@GOTPCREL(%rip), %rdi
	movq	%rbx, %rsi
	callq	_tlist_insert
	movq	%rbx, %rdi
	addq	$8, %rsp
	popq	%rbx
	popq	%rbp
	jmp	_hash_req_remove                ## TAILCALL
	.cfi_endproc
                                        ## -- End function
	.comm	_with_output_free_list,4,2      ## @with_output_free_list
	.comm	_without_output_free_list,4,2   ## @without_output_free_list
	.no_dead_strip	_forth_request_unload_prog
.subsections_via_symbols

	.section	__TEXT,__text,regular,pure_instructions
	.build_version macos, 13, 0	sdk_version 13, 3
	.p2align	2                               ; -- Begin function forth_request_unload_prog
_forth_request_unload_prog:             ; @forth_request_unload_prog
	.cfi_startproc
; %bb.0:
	stp	x20, x19, [sp, #-32]!           ; 16-byte Folded Spill
	.cfi_def_cfa_offset 32
	stp	x29, x30, [sp, #16]             ; 16-byte Folded Spill
	add	x29, sp, #16
	.cfi_def_cfa w29, 16
	.cfi_offset w30, -8
	.cfi_offset w29, -16
	.cfi_offset w19, -24
	.cfi_offset w20, -32
	mov	x19, x0
Lloh0:
	adrp	x0, _with_output_free_list@GOTPAGE
Lloh1:
	ldr	x0, [x0, _with_output_free_list@GOTPAGEOFF]
	mov	x1, x19
	bl	_tlist_remove
	ldr	x8, [x19]
	cmp	x8, #0
	cset	w0, ne
	bl	_assert
	mov	x0, x19
	bl	_forth_request_free_prog
	ldr	x8, [x19]
	cmp	x8, #0
	cset	w0, eq
	bl	_assert
Lloh2:
	adrp	x0, _without_output_free_list@GOTPAGE
Lloh3:
	ldr	x0, [x0, _without_output_free_list@GOTPAGEOFF]
	mov	x1, x19
	bl	_tlist_insert
	mov	x0, x19
	ldp	x29, x30, [sp, #16]             ; 16-byte Folded Reload
	ldp	x20, x19, [sp], #32             ; 16-byte Folded Reload
	b	_hash_req_remove
	.loh AdrpLdrGot	Lloh2, Lloh3
	.loh AdrpLdrGot	Lloh0, Lloh1
	.cfi_endproc
                                        ; -- End function
	.comm	_with_output_free_list,4,2      ; @with_output_free_list
	.comm	_without_output_free_list,4,2   ; @without_output_free_list
	.no_dead_strip	_forth_request_unload_prog
.subsections_via_symbols
