; LLVM IR from Robert-van-Engelen/lisp :: src (lisp-pr-single)

; Unoptimized IR (clang -disable-llvm-passes):
target datalayout = "e-m:e-p270:32:32-p271:32:32-p272:64:64-i64:64-i128:128-f80:128-n8:16:32:64-S128"
target triple = "x86_64-unknown-linux-gnu"

@CONS = external dso_local global i32, align 4
@MACR = external dso_local global i32, align 4
@used = external dso_local global [128 x i32], align 16
@cell = external dso_local global [10240 x float], align 16

; Function Attrs: nounwind uwtable
declare dso_local float @box(i32 noundef, i32 noundef) #0

; Function Attrs: nocallback nofree nosync nounwind willreturn memory(argmem: readwrite)
declare void @llvm.lifetime.start.p0(i64 immarg, ptr nocapture) #1

; Function Attrs: nocallback nofree nosync nounwind willreturn memory(argmem: readwrite)
declare void @llvm.lifetime.end.p0(i64 immarg, ptr nocapture) #1

; Function Attrs: nounwind uwtable
declare dso_local i32 @ord(float noundef) #0

; Function Attrs: nounwind uwtable
define dso_local void @mark(i32 noundef %0) #0 {
  %2 = alloca i32, align 4
  %3 = alloca i32, align 4
  %4 = alloca i32, align 4
  %5 = alloca i32, align 4
  store i32 %0, ptr %2, align 4, !tbaa !5
  call void @llvm.lifetime.start.p0(i64 4, ptr %3) #2
  store i32 10240, ptr %3, align 4, !tbaa !5
  call void @llvm.lifetime.start.p0(i64 4, ptr %4) #2
  %6 = load i32, ptr %2, align 4, !tbaa !5
  %7 = udiv i32 %6, 64
  %8 = zext i32 %7 to i64
  %9 = getelementptr inbounds [128 x i32], ptr @used, i64 0, i64 %8
  %10 = load i32, ptr %9, align 4, !tbaa !5
  %11 = load i32, ptr %2, align 4, !tbaa !5
  %12 = udiv i32 %11, 2
  %13 = urem i32 %12, 32
  %14 = shl i32 1, %13
  %15 = and i32 %10, %14
  %16 = icmp ne i32 %15, 0
  br i1 %16, label %17, label %18

17:                                               ; preds = %1
  store i32 1, ptr %5, align 4
  br label %147

18:                                               ; preds = %1
  br label %19

19:                                               ; preds = %145, %18
  %20 = load i32, ptr %3, align 4, !tbaa !5
  %21 = icmp ult i32 %20, 10240
  br i1 %21, label %27, label %22

22:                                               ; preds = %19
  %23 = load i32, ptr %2, align 4, !tbaa !5
  %24 = and i32 %23, 1
  %25 = icmp ne i32 %24, 0
  %26 = xor i1 %25, true
  br label %27

27:                                               ; preds = %22, %19
  %28 = phi i1 [ true, %19 ], [ %26, %22 ]
  br i1 %28, label %29, label %146

29:                                               ; preds = %27
  br label %30

30:                                               ; preds = %104, %29
  br label %31

31:                                               ; preds = %30
  %32 = load i32, ptr %2, align 4, !tbaa !5
  %33 = udiv i32 %32, 2
  %34 = urem i32 %33, 32
  %35 = shl i32 1, %34
  %36 = load i32, ptr %2, align 4, !tbaa !5
  %37 = udiv i32 %36, 64
  %38 = zext i32 %37 to i64
  %39 = getelementptr inbounds [128 x i32], ptr @used, i64 0, i64 %38
  %40 = load i32, ptr %39, align 4, !tbaa !5
  %41 = or i32 %40, %35
  store i32 %41, ptr %39, align 4, !tbaa !5
  %42 = load i32, ptr %2, align 4, !tbaa !5
  %43 = zext i32 %42 to i64
  %44 = getelementptr inbounds [10240 x float], ptr @cell, i64 0, i64 %43
  %45 = load i32, ptr %44, align 4, !tbaa !5
  %46 = lshr i32 %45, 20
  %47 = load i32, ptr @CONS, align 4, !tbaa !5
  %48 = load i32, ptr @MACR, align 4, !tbaa !5
  %49 = xor i32 %47, %48
  %50 = xor i32 %49, -1
  %51 = and i32 %46, %50
  %52 = load i32, ptr @CONS, align 4, !tbaa !5
  %53 = icmp ne i32 %51, %52
  br i1 %53, label %71, label %54

54:                                               ; preds = %31
  %55 = load i32, ptr %2, align 4, !tbaa !5
  %56 = zext i32 %55 to i64
  %57 = getelementptr inbounds [10240 x float], ptr @cell, i64 0, i64 %56
  %58 = load float, ptr %57, align 4, !tbaa !9
  %59 = call i32 @ord(float noundef %58)
  store i32 %59, ptr %4, align 4, !tbaa !5
  %60 = load i32, ptr %4, align 4, !tbaa !5
  %61 = udiv i32 %60, 64
  %62 = zext i32 %61 to i64
  %63 = getelementptr inbounds [128 x i32], ptr @used, i64 0, i64 %62
  %64 = load i32, ptr %63, align 4, !tbaa !5
  %65 = load i32, ptr %4, align 4, !tbaa !5
  %66 = udiv i32 %65, 2
  %67 = urem i32 %66, 32
  %68 = shl i32 1, %67
  %69 = and i32 %64, %68
  %70 = icmp ne i32 %69, 0
  br i1 %70, label %71, label %104

71:                                               ; preds = %54, %31
  %72 = load i32, ptr %2, align 4, !tbaa !5
  %73 = add i32 %72, 1
  store i32 %73, ptr %2, align 4, !tbaa !5
  %74 = zext i32 %73 to i64
  %75 = getelementptr inbounds [10240 x float], ptr @cell, i64 0, i64 %74
  %76 = load i32, ptr %75, align 4, !tbaa !5
  %77 = lshr i32 %76, 20
  %78 = load i32, ptr @CONS, align 4, !tbaa !5
  %79 = load i32, ptr @MACR, align 4, !tbaa !5
  %80 = xor i32 %78, %79
  %81 = xor i32 %80, -1
  %82 = and i32 %77, %81
  %83 = load i32, ptr @CONS, align 4, !tbaa !5
  %84 = icmp ne i32 %82, %83
  br i1 %84, label %102, label %85

85:                                               ; preds = %71
  %86 = load i32, ptr %2, align 4, !tbaa !5
  %87 = zext i32 %86 to i64
  %88 = getelementptr inbounds [10240 x float], ptr @cell, i64 0, i64 %87
  %89 = load float, ptr %88, align 4, !tbaa !9
  %90 = call i32 @ord(float noundef %89)
  store i32 %90, ptr %4, align 4, !tbaa !5
  %91 = load i32, ptr %4, align 4, !tbaa !5
  %92 = udiv i32 %91, 64
  %93 = zext i32 %92 to i64
  %94 = getelementptr inbounds [128 x i32], ptr @used, i64 0, i64 %93
  %95 = load i32, ptr %94, align 4, !tbaa !5
  %96 = load i32, ptr %4, align 4, !tbaa !5
  %97 = udiv i32 %96, 2
  %98 = urem i32 %97, 32
  %99 = shl i32 1, %98
  %100 = and i32 %95, %99
  %101 = icmp ne i32 %100, 0
  br i1 %101, label %102, label %103

102:                                              ; preds = %85, %71
  br label %117

103:                                              ; preds = %85
  br label %104

104:                                              ; preds = %103, %54
  %105 = load i32, ptr %2, align 4, !tbaa !5
  %106 = zext i32 %105 to i64
  %107 = getelementptr inbounds [10240 x float], ptr @cell, i64 0, i64 %106
  %108 = load i32, ptr %107, align 4, !tbaa !5
  %109 = lshr i32 %108, 20
  %110 = load i32, ptr %3, align 4, !tbaa !5
  %111 = call float @box(i32 noundef %109, i32 noundef %110)
  %112 = load i32, ptr %2, align 4, !tbaa !5
  %113 = zext i32 %112 to i64
  %114 = getelementptr inbounds [10240 x float], ptr @cell, i64 0, i64 %113
  store float %111, ptr %114, align 4, !tbaa !9
  %115 = load i32, ptr %2, align 4, !tbaa !5
  store i32 %115, ptr %3, align 4, !tbaa !5
  %116 = load i32, ptr %4, align 4, !tbaa !5
  store i32 %116, ptr %2, align 4, !tbaa !5
  br label %30

117:                                              ; preds = %102
  br label %118

118:                                              ; preds = %144, %117
  %119 = load i32, ptr %3, align 4, !tbaa !5
  %120 = icmp ult i32 %119, 10240
  br i1 %120, label %121, label %145

121:                                              ; preds = %118
  %122 = load i32, ptr %2, align 4, !tbaa !5
  store i32 %122, ptr %4, align 4, !tbaa !5
  %123 = load i32, ptr %3, align 4, !tbaa !5
  store i32 %123, ptr %2, align 4, !tbaa !5
  %124 = load i32, ptr %2, align 4, !tbaa !5
  %125 = zext i32 %124 to i64
  %126 = getelementptr inbounds [10240 x float], ptr @cell, i64 0, i64 %125
  %127 = load float, ptr %126, align 4, !tbaa !9
  %128 = call i32 @ord(float noundef %127)
  store i32 %128, ptr %3, align 4, !tbaa !5
  %129 = load i32, ptr %2, align 4, !tbaa !5
  %130 = zext i32 %129 to i64
  %131 = getelementptr inbounds [10240 x float], ptr @cell, i64 0, i64 %130
  %132 = load i32, ptr %131, align 4, !tbaa !5
  %133 = lshr i32 %132, 20
  %134 = load i32, ptr %4, align 4, !tbaa !5
  %135 = and i32 %134, -2
  %136 = call float @box(i32 noundef %133, i32 noundef %135)
  %137 = load i32, ptr %2, align 4, !tbaa !5
  %138 = zext i32 %137 to i64
  %139 = getelementptr inbounds [10240 x float], ptr @cell, i64 0, i64 %138
  store float %136, ptr %139, align 4, !tbaa !9
  %140 = load i32, ptr %2, align 4, !tbaa !5
  %141 = and i32 %140, 1
  %142 = icmp ne i32 %141, 0
  br i1 %142, label %144, label %143

143:                                              ; preds = %121
  br label %145

144:                                              ; preds = %121
  br label %118, !llvm.loop !11

145:                                              ; preds = %143, %118
  br label %19, !llvm.loop !13

146:                                              ; preds = %27
  store i32 0, ptr %5, align 4
  br label %147

147:                                              ; preds = %146, %17
  call void @llvm.lifetime.end.p0(i64 4, ptr %4) #2
  call void @llvm.lifetime.end.p0(i64 4, ptr %3) #2
  %148 = load i32, ptr %5, align 4
  switch i32 %148, label %150 [
    i32 0, label %149
    i32 1, label %149
  ]

149:                                              ; preds = %147, %147
  ret void

150:                                              ; preds = %147
  unreachable
}

attributes #0 = { nounwind uwtable "min-legal-vector-width"="0" "no-trapping-math"="true" "stack-protector-buffer-size"="8" "target-cpu"="x86-64" "target-features"="+cmov,+cx8,+fxsr,+mmx,+sse,+sse2,+x87" "tune-cpu"="generic" }
attributes #1 = { nocallback nofree nosync nounwind willreturn memory(argmem: readwrite) }
attributes #2 = { nounwind }

!llvm.module.flags = !{!0, !1, !2, !3}
!llvm.ident = !{!4}

!0 = !{i32 1, !"wchar_size", i32 4}
!1 = !{i32 8, !"PIC Level", i32 2}
!2 = !{i32 7, !"PIE Level", i32 2}
!3 = !{i32 7, !"uwtable", i32 2}
!4 = !{!"clang version 19.1.0 (git@github.com:llvm/llvm-project.git a4bf6cd7cfb1a1421ba92bca9d017b49936c55e4)"}
!5 = !{!6, !6, i64 0}
!6 = !{!"int", !7, i64 0}
!7 = !{!"omnipotent char", !8, i64 0}
!8 = !{!"Simple C/C++ TBAA"}
!9 = !{!10, !10, i64 0}
!10 = !{!"float", !7, i64 0}
!11 = distinct !{!11, !12}
!12 = !{!"llvm.loop.mustprogress"}
!13 = distinct !{!13, !12}


; Optimized IR (opt -passes='default<O3>'):
target datalayout = "e-m:e-p270:32:32-p271:32:32-p272:64:64-i64:64-i128:128-f80:128-n8:16:32:64-S128"
target triple = "x86_64-unknown-linux-gnu"

@CONS = external dso_local local_unnamed_addr global i32, align 4
@MACR = external dso_local local_unnamed_addr global i32, align 4
@used = external dso_local local_unnamed_addr global [128 x i32], align 16
@cell = external dso_local local_unnamed_addr global [10240 x float], align 16

; Function Attrs: nounwind uwtable
declare dso_local float @box(i32 noundef, i32 noundef) local_unnamed_addr #0

; Function Attrs: nounwind uwtable
declare dso_local i32 @ord(float noundef) local_unnamed_addr #0

; Function Attrs: nounwind uwtable
define dso_local void @mark(i32 noundef %0) local_unnamed_addr #0 {
  %2 = lshr i32 %0, 6
  %3 = zext nneg i32 %2 to i64
  %4 = getelementptr inbounds [128 x i32], ptr @used, i64 0, i64 %3
  %5 = load i32, ptr %4, align 4, !tbaa !5
  %6 = lshr i32 %0, 1
  %7 = and i32 %6, 31
  %8 = shl nuw i32 1, %7
  %9 = and i32 %5, %8
  %10 = and i32 %0, 1
  %11 = or i32 %9, %10
  %or.cond46 = icmp eq i32 %11, 0
  br i1 %or.cond46, label %.preheader39, label %.loopexit41

.preheader39:                                     ; preds = %1, %.preheader39.backedge
  %.131 = phi i32 [ %.131.be, %.preheader39.backedge ], [ %0, %1 ]
  %.1 = phi i32 [ %.1.be, %.preheader39.backedge ], [ 10240, %1 ]
  %12 = lshr i32 %.131, 1
  %13 = and i32 %12, 31
  %14 = shl nuw i32 1, %13
  %15 = lshr i32 %.131, 6
  %16 = zext nneg i32 %15 to i64
  %17 = getelementptr inbounds [128 x i32], ptr @used, i64 0, i64 %16
  %18 = load i32, ptr %17, align 4, !tbaa !5
  %19 = or i32 %14, %18
  store i32 %19, ptr %17, align 4, !tbaa !5
  %20 = zext i32 %.131 to i64
  %21 = getelementptr inbounds [10240 x float], ptr @cell, i64 0, i64 %20
  %22 = load i32, ptr %21, align 4
  %23 = lshr i32 %22, 20
  %24 = load i32, ptr @CONS, align 4, !tbaa !5
  %25 = load i32, ptr @MACR, align 4, !tbaa !5
  %26 = xor i32 %24, %25
  %27 = xor i32 %26, -1
  %28 = and i32 %23, %27
  %.not35 = icmp eq i32 %28, %24
  br i1 %.not35, label %29, label %40

29:                                               ; preds = %.preheader39
  %30 = bitcast i32 %22 to float
  %31 = tail call i32 @ord(float noundef %30)
  %32 = lshr i32 %31, 6
  %33 = zext nneg i32 %32 to i64
  %34 = getelementptr inbounds [128 x i32], ptr @used, i64 0, i64 %33
  %35 = load i32, ptr %34, align 4, !tbaa !5
  %36 = lshr i32 %31, 1
  %37 = and i32 %36, 31
  %38 = shl nuw i32 1, %37
  %39 = and i32 %38, %35
  %.not36 = icmp eq i32 %39, 0
  br i1 %.not36, label %59, label %._crit_edge

._crit_edge:                                      ; preds = %29
  %.pre = load i32, ptr @CONS, align 4, !tbaa !5
  %.pre48 = load i32, ptr @MACR, align 4, !tbaa !5
  %.pre49 = xor i32 %.pre, %.pre48
  %.pre51 = xor i32 %.pre49, -1
  br label %40

40:                                               ; preds = %._crit_edge, %.preheader39
  %.pre-phi52 = phi i32 [ %.pre51, %._crit_edge ], [ %27, %.preheader39 ]
  %41 = phi i32 [ %.pre, %._crit_edge ], [ %24, %.preheader39 ]
  %42 = add i32 %.131, 1
  %43 = zext i32 %42 to i64
  %44 = getelementptr inbounds [10240 x float], ptr @cell, i64 0, i64 %43
  %45 = load i32, ptr %44, align 4
  %46 = lshr i32 %45, 20
  %47 = and i32 %46, %.pre-phi52
  %.not37 = icmp eq i32 %47, %41
  br i1 %.not37, label %48, label %64

48:                                               ; preds = %40
  %49 = bitcast i32 %45 to float
  %50 = tail call i32 @ord(float noundef %49)
  %51 = lshr i32 %50, 6
  %52 = zext nneg i32 %51 to i64
  %53 = getelementptr inbounds [128 x i32], ptr @used, i64 0, i64 %52
  %54 = load i32, ptr %53, align 4, !tbaa !5
  %55 = lshr i32 %50, 1
  %56 = and i32 %55, 31
  %57 = shl nuw i32 1, %56
  %58 = and i32 %57, %54
  %.not38 = icmp eq i32 %58, 0
  br i1 %.not38, label %59, label %64

59:                                               ; preds = %48, %29
  %.pre-phi = phi i64 [ %43, %48 ], [ %20, %29 ]
  %.232 = phi i32 [ %42, %48 ], [ %.131, %29 ]
  %.0 = phi i32 [ %50, %48 ], [ %31, %29 ]
  %60 = getelementptr inbounds [10240 x float], ptr @cell, i64 0, i64 %.pre-phi
  %61 = load i32, ptr %60, align 4, !tbaa !5
  %62 = lshr i32 %61, 20
  %63 = tail call float @box(i32 noundef %62, i32 noundef %.1)
  store float %63, ptr %60, align 4, !tbaa !9
  br label %.preheader39.backedge

.preheader39.backedge:                            ; preds = %59, %.loopexit
  %.131.be = phi i32 [ %.0, %59 ], [ %.4, %.loopexit ]
  %.1.be = phi i32 [ %.232, %59 ], [ %.3, %.loopexit ]
  br label %.preheader39, !llvm.loop !11

64:                                               ; preds = %40, %48
  %.old1 = icmp ult i32 %.1, 10240
  br i1 %.old1, label %.preheader, label %..loopexit_crit_edge

..loopexit_crit_edge:                             ; preds = %64
  %.pre53 = and i32 %42, 1
  br label %.loopexit

.preheader:                                       ; preds = %64, %.preheader
  %.333 = phi i32 [ %.2, %.preheader ], [ %42, %64 ]
  %.2 = phi i32 [ %68, %.preheader ], [ %.1, %64 ]
  %65 = zext nneg i32 %.2 to i64
  %66 = getelementptr inbounds [10240 x float], ptr @cell, i64 0, i64 %65
  %67 = load float, ptr %66, align 4, !tbaa !9
  %68 = tail call i32 @ord(float noundef %67)
  %69 = load i32, ptr %66, align 4, !tbaa !5
  %70 = lshr i32 %69, 20
  %71 = and i32 %.333, -2
  %72 = tail call float @box(i32 noundef %70, i32 noundef %71)
  store float %72, ptr %66, align 4, !tbaa !9
  %73 = and i32 %.2, 1
  %74 = icmp ne i32 %73, 0
  %75 = icmp ult i32 %68, 10240
  %or.cond = select i1 %74, i1 %75, i1 false
  br i1 %or.cond, label %.preheader, label %.loopexit, !llvm.loop !13

.loopexit:                                        ; preds = %.preheader, %..loopexit_crit_edge
  %.pre-phi54 = phi i32 [ %.pre53, %..loopexit_crit_edge ], [ %73, %.preheader ]
  %.4 = phi i32 [ %42, %..loopexit_crit_edge ], [ %.2, %.preheader ]
  %.3 = phi i32 [ %.1, %..loopexit_crit_edge ], [ %68, %.preheader ]
  %76 = icmp ult i32 %.3, 10240
  %.not34 = icmp eq i32 %.pre-phi54, 0
  %77 = or i1 %76, %.not34
  br i1 %77, label %.preheader39.backedge, label %.loopexit41

.loopexit41:                                      ; preds = %.loopexit, %1
  ret void
}

attributes #0 = { nounwind uwtable "min-legal-vector-width"="0" "no-trapping-math"="true" "stack-protector-buffer-size"="8" "target-cpu"="x86-64" "target-features"="+cmov,+cx8,+fxsr,+mmx,+sse,+sse2,+x87" "tune-cpu"="generic" }

!llvm.module.flags = !{!0, !1, !2, !3}
!llvm.ident = !{!4}

!0 = !{i32 1, !"wchar_size", i32 4}
!1 = !{i32 8, !"PIC Level", i32 2}
!2 = !{i32 7, !"PIE Level", i32 2}
!3 = !{i32 7, !"uwtable", i32 2}
!4 = !{!"clang version 19.1.0 (git@github.com:llvm/llvm-project.git a4bf6cd7cfb1a1421ba92bca9d017b49936c55e4)"}
!5 = !{!6, !6, i64 0}
!6 = !{!"int", !7, i64 0}
!7 = !{!"omnipotent char", !8, i64 0}
!8 = !{!"Simple C/C++ TBAA"}
!9 = !{!10, !10, i64 0}
!10 = !{!"float", !7, i64 0}
!11 = distinct !{!11, !12}
!12 = !{!"llvm.loop.mustprogress"}
!13 = distinct !{!13, !12}


; Effective O3 passes: BDCEPass,CorrelatedValuePropagationPass,EarlyCSEPass,GVNPass,GlobalOptPass,IPSCCPPass,InferFunctionAttrsPass,InstCombinePass,InstSimplifyPass,JumpThreadingPass,LCSSAPass,LoopRotatePass,LoopSimplifyPass,LoopUnrollPass,ReassociatePass,SROAPass,SimplifyCFGPass,TailCallElimPass