結果

問題 No.502 階乗を計算するだけ
ユーザー Lisp_CoderLisp_Coder
提出日時 2024-04-23 16:28:08
言語 Common Lisp
(sbcl 2.3.8)
結果
RE  
実行時間 -
コード長 2,603 bytes
コンパイル時間 1,216 ms
コンパイル使用メモリ 24,576 KB
実行使用メモリ 24,576 KB
最終ジャッジ日時 2024-10-15 16:56:38
合計ジャッジ時間 2,837 ms
ジャッジサーバーID
(参考情報)
judge4 / judge3
このコードへのチャレンジ
(要ログイン)

テストケース

テストケース表示
入力 結果 実行時間
実行使用メモリ
testcase_00 RE -
testcase_01 RE -
testcase_02 RE -
testcase_03 RE -
testcase_04 RE -
testcase_05 RE -
testcase_06 RE -
testcase_07 RE -
testcase_08 RE -
testcase_09 RE -
testcase_10 RE -
testcase_11 RE -
testcase_12 RE -
testcase_13 RE -
testcase_14 RE -
testcase_15 RE -
testcase_16 RE -
testcase_17 RE -
testcase_18 RE -
testcase_19 RE -
testcase_20 RE -
testcase_21 RE -
testcase_22 RE -
testcase_23 RE -
testcase_24 RE -
testcase_25 RE -
testcase_26 RE -
testcase_27 RE -
testcase_28 RE -
testcase_29 RE -
testcase_30 RE -
testcase_31 RE -
testcase_32 RE -
testcase_33 RE -
testcase_34 RE -
testcase_35 RE -
testcase_36 RE -
testcase_37 RE -
testcase_38 RE -
testcase_39 RE -
testcase_40 RE -
testcase_41 RE -
testcase_42 RE -
testcase_43 RE -
testcase_44 RE -
testcase_45 RE -
testcase_46 RE -
testcase_47 RE -
testcase_48 RE -
testcase_49 RE -
testcase_50 RE -
testcase_51 RE -
権限があれば一括ダウンロードができます
コンパイルメッセージ
; compiling file "/home/judge/data/code/Main.lisp" (written 15 OCT 2024 04:56:34 PM):
; 
; caught ERROR:
;   READ error during COMPILE-FILE:
;   
;     Comma not inside a backquote.
;   
;       Line: 1, Column: 17, File-Position: 16
;   
;       Stream: #<SB-INT:FORM-TRACKING-STREAM for "file /home/judge/data/code/Main.lisp" {10011A09F3}>
; 
; compilation unit aborted
;   caught 1 fatal ERROR condition
;   caught 1 ERROR condition

; compilation aborted after 0:00:00.006

ソースコード

diff #

	.section	__TEXT,__text,regular,pure_instructions
	.build_version macos, 14, 0
	.globl	_factorial                      ; -- Begin function factorial
	.p2align	2
_factorial:                             ; @factorial
	.cfi_startproc
; %bb.0:
	cmp	w0, #2
	b.ge	LBB0_2
; %bb.1:
	mov	w0, #1                          ; =0x1
	ret
LBB0_2:
	add	w8, w0, #1
	mov	w0, #1                          ; =0x1
	mov	w9, #2                          ; =0x2
	mov	x10, #36837                     ; =0x8fe5
	movk	x10, #4770, lsl #16
	movk	x10, #24369, lsl #32
	movk	x10, #35184, lsl #48
	mov	w11, #51719                     ; =0xca07
	movk	w11, #15258, lsl #16
LBB0_3:                                 ; =>This Inner Loop Header: Depth=1
	mul	x12, x0, x9
	smulh	x13, x12, x10
	add	x13, x13, x12
	asr	x14, x13, #29
	add	x13, x14, x13, lsr #63
	msub	x0, x13, x11, x12
	add	x9, x9, #1
	cmp	x8, x9
	b.ne	LBB0_3
; %bb.4:
	ret
	.cfi_endproc
                                        ; -- End function
	.globl	_main                           ; -- Begin function main
	.p2align	2
_main:                                  ; @main
	.cfi_startproc
; %bb.0:
	sub	sp, sp, #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
	sub	x8, x29, #4
	str	x8, [sp]
Lloh0:
	adrp	x0, l_.str@PAGE
Lloh1:
	add	x0, x0, l_.str@PAGEOFF
	bl	_scanf
	ldur	w8, [x29, #-4]
	cmp	w8, #2
	b.ge	LBB1_2
; %bb.1:
	mov	w8, #1                          ; =0x1
	b	LBB1_4
LBB1_2:
	add	x9, x8, #1
	mov	w8, #1                          ; =0x1
	mov	w10, #2                         ; =0x2
	mov	x11, #36837                     ; =0x8fe5
	movk	x11, #4770, lsl #16
	movk	x11, #24369, lsl #32
	movk	x11, #35184, lsl #48
	mov	w12, #51719                     ; =0xca07
	movk	w12, #15258, lsl #16
LBB1_3:                                 ; =>This Inner Loop Header: Depth=1
	mul	x8, x8, x10
	smulh	x13, x8, x11
	add	x13, x13, x8
	asr	x14, x13, #29
	add	x13, x14, x13, lsr #63
	msub	x8, x13, x12, x8
	add	x10, x10, #1
	cmp	x9, x10
	b.ne	LBB1_3
LBB1_4:
	str	x8, [sp]
Lloh2:
	adrp	x0, l_.str.1@PAGE
Lloh3:
	add	x0, x0, l_.str.1@PAGEOFF
	bl	_printf
	mov	w0, #0                          ; =0x0
	ldp	x29, x30, [sp, #16]             ; 16-byte Folded Reload
	add	sp, sp, #32
	ret
	.loh AdrpAdd	Lloh0, Lloh1
	.loh AdrpAdd	Lloh2, Lloh3
	.cfi_endproc
                                        ; -- End function
	.section	__TEXT,__cstring,cstring_literals
l_.str:                                 ; @.str
	.asciz	"%d"

l_.str.1:                               ; @.str.1
	.asciz	"%lld\n"

.subsections_via_symbols
0