	.section	__TEXT,__text,regular,pure_instructions
	.build_version macos, 13, 0	sdk_version 13, 3
	.globl	_ada_fold_name                  ## -- Begin function ada_fold_name
	.p2align	4, 0x90
_ada_fold_name:                         ## @ada_fold_name
	.cfi_startproc
## %bb.0:
	pushq	%rbp
	.cfi_def_cfa_offset 16
	.cfi_offset %rbp, -16
	movq	%rsp, %rbp
	.cfi_def_cfa_register %rbp
	pushq	%r14
	pushq	%rbx
	.cfi_offset %rbx, -32
	.cfi_offset %r14, -24
	movq	%rdi, %rbx
	callq	_strlen
	movl	%eax, %r14d
	leal	1(%r14), %edx
	xorl	%edi, %edi
	xorl	%esi, %esi
	callq	_GROW_VECT
	movb	(%rbx), %al
	cmpb	$39, %al
	jne	LBB0_1
## %bb.3:
	incq	%rbx
	addl	$-2, %r14d
	xorl	%edi, %edi
	movq	%rbx, %rsi
	movl	%r14d, %edx
	callq	_strncpy
	jmp	LBB0_4
LBB0_1:
	testl	%r14d, %r14d
	jns	LBB0_2
LBB0_4:
	xorl	%eax, %eax
	popq	%rbx
	popq	%r14
	popq	%rbp
	retq
LBB0_2:
	movsbl	%al, %edi
	callq	_tolower
	ud2
	.cfi_endproc
                                        ## -- End function
.subsections_via_symbols

	.section	__TEXT,__text,regular,pure_instructions
	.build_version macos, 13, 0	sdk_version 13, 3
	.globl	_ada_fold_name                  ; -- Begin function ada_fold_name
	.p2align	2
_ada_fold_name:                         ; @ada_fold_name
	.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
	bl	_strlen
	mov	x20, x0
	add	w2, w0, #1
	mov	x0, #0
	mov	x1, #0
	bl	_GROW_VECT
	ldrb	w8, [x19]
	cmp	w8, #39
	b.ne	LBB0_2
; %bb.1:
	add	x1, x19, #1
	sub	w2, w20, #2
	mov	x0, #0
	bl	_strncpy
	b	LBB0_3
LBB0_2:
	tbz	w20, #31, LBB0_4
LBB0_3:
	mov	x0, #0
	ldp	x29, x30, [sp, #16]             ; 16-byte Folded Reload
	ldp	x20, x19, [sp], #32             ; 16-byte Folded Reload
	ret
LBB0_4:
	sxtb	w0, w8
	bl	_tolower
	brk	#0x1
	.cfi_endproc
                                        ; -- End function
.subsections_via_symbols
