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

; 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"

%struct.anon = type { ptr, ptr, i16 }

@PRIM = external dso_local global i64, align 8
@ATOM = external dso_local global i64, align 8
@CONS = external dso_local global i64, align 8
@CLOS = external dso_local global i64, align 8
@MACR = external dso_local global i64, align 8
@NIL = external dso_local global i64, align 8
@env = external dso_local global double, align 8
@nil = external dso_local global double, align 8
@prim = external dso_local global [43 x %struct.anon], align 16

; Function Attrs: nounwind uwtable
declare dso_local i64 @ord(double noundef) #0

; Function Attrs: nounwind uwtable
declare dso_local double @err(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 double @car(double noundef) #0

; Function Attrs: nounwind uwtable
declare dso_local double @cdr(double noundef) #0

; Function Attrs: nounwind uwtable
declare dso_local double @pair(double noundef, double noundef, ptr noundef) #0

; Function Attrs: nounwind uwtable
declare dso_local double @assoc(double noundef, double noundef) #0

; Function Attrs: nounwind uwtable
declare dso_local void @var(i32 noundef, ...) #0

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

; Function Attrs: nounwind uwtable
declare dso_local double @evlis(ptr noundef, ptr noundef) #0

; Function Attrs: nounwind uwtable
declare dso_local double @eval(double noundef, ptr noundef) #0

; Function Attrs: nounwind uwtable
define dso_local double @step(double noundef %0, ptr noundef %1) #0 {
  %3 = alloca double, align 8
  %4 = alloca double, align 8
  %5 = alloca ptr, align 8
  %6 = alloca double, align 8
  %7 = alloca double, align 8
  %8 = alloca double, align 8
  %9 = alloca double, align 8
  %10 = alloca i32, align 4
  %11 = alloca double, align 8
  store double %0, ptr %4, align 8, !tbaa !5
  store ptr %1, ptr %5, align 8, !tbaa !9
  call void @llvm.lifetime.start.p0(i64 8, ptr %6) #2
  %12 = load double, ptr @nil, align 8, !tbaa !5
  store double %12, ptr %6, align 8, !tbaa !5
  call void @llvm.lifetime.start.p0(i64 8, ptr %7) #2
  %13 = load double, ptr @nil, align 8, !tbaa !5
  store double %13, ptr %7, align 8, !tbaa !5
  call void @llvm.lifetime.start.p0(i64 8, ptr %8) #2
  %14 = load double, ptr @nil, align 8, !tbaa !5
  store double %14, ptr %8, align 8, !tbaa !5
  call void @llvm.lifetime.start.p0(i64 8, ptr %9) #2
  %15 = load double, ptr @nil, align 8, !tbaa !5
  store double %15, ptr %9, align 8, !tbaa !5
  call void (i32, ...) @var(i32 noundef 5, ptr noundef %4, ptr noundef %6, ptr noundef %7, ptr noundef %8, ptr noundef %9)
  br label %16

16:                                               ; preds = %241, %63, %2
  br label %17

17:                                               ; preds = %16
  %18 = load i64, ptr %4, align 8, !tbaa !11
  %19 = lshr i64 %18, 48
  %20 = load i64, ptr @ATOM, align 8, !tbaa !11
  %21 = icmp eq i64 %19, %20
  br i1 %21, label %22, label %28

22:                                               ; preds = %17
  %23 = load double, ptr %4, align 8, !tbaa !5
  %24 = load ptr, ptr %5, align 8, !tbaa !9
  %25 = load double, ptr %24, align 8, !tbaa !5
  %26 = call double @assoc(double noundef %23, double noundef %25)
  %27 = call double @ret(i32 noundef 5, double noundef %26)
  store double %27, ptr %3, align 8
  store i32 1, ptr %10, align 4
  br label %242

28:                                               ; preds = %17
  %29 = load i64, ptr %4, align 8, !tbaa !11
  %30 = lshr i64 %29, 48
  %31 = load i64, ptr @CONS, align 8, !tbaa !11
  %32 = icmp ne i64 %30, %31
  br i1 %32, label %33, label %36

33:                                               ; preds = %28
  %34 = load double, ptr %4, align 8, !tbaa !5
  %35 = call double @ret(i32 noundef 5, double noundef %34)
  store double %35, ptr %3, align 8
  store i32 1, ptr %10, align 4
  br label %242

36:                                               ; preds = %28
  %37 = load double, ptr %4, align 8, !tbaa !5
  %38 = call double @car(double noundef %37)
  %39 = load ptr, ptr %5, align 8, !tbaa !9
  %40 = call double @eval(double noundef %38, ptr noundef %39)
  store double %40, ptr %6, align 8, !tbaa !5
  %41 = load double, ptr %4, align 8, !tbaa !5
  %42 = call double @cdr(double noundef %41)
  store double %42, ptr %4, align 8, !tbaa !5
  %43 = load ptr, ptr %5, align 8, !tbaa !9
  %44 = load double, ptr %43, align 8, !tbaa !5
  store double %44, ptr %9, align 8, !tbaa !5
  store ptr %9, ptr %5, align 8, !tbaa !9
  %45 = load i64, ptr %6, align 8, !tbaa !11
  %46 = lshr i64 %45, 48
  %47 = load i64, ptr @PRIM, align 8, !tbaa !11
  %48 = icmp eq i64 %46, %47
  br i1 %48, label %49, label %67

49:                                               ; preds = %36
  %50 = load double, ptr %6, align 8, !tbaa !5
  %51 = call i64 @ord(double noundef %50)
  %52 = getelementptr inbounds [43 x %struct.anon], ptr @prim, i64 0, i64 %51
  %53 = getelementptr inbounds %struct.anon, ptr %52, i32 0, i32 1
  %54 = load ptr, ptr %53, align 8, !tbaa !13
  %55 = load ptr, ptr %5, align 8, !tbaa !9
  %56 = call double %54(ptr noundef %4, ptr noundef %55)
  store double %56, ptr %4, align 8, !tbaa !5
  %57 = load double, ptr %6, align 8, !tbaa !5
  %58 = call i64 @ord(double noundef %57)
  %59 = getelementptr inbounds [43 x %struct.anon], ptr @prim, i64 0, i64 %58
  %60 = getelementptr inbounds %struct.anon, ptr %59, i32 0, i32 2
  %61 = load i16, ptr %60, align 8, !tbaa !16
  %62 = icmp ne i16 %61, 0
  br i1 %62, label %63, label %64

63:                                               ; preds = %49
  br label %16

64:                                               ; preds = %49
  %65 = load double, ptr %4, align 8, !tbaa !5
  %66 = call double @ret(i32 noundef 5, double noundef %65)
  store double %66, ptr %3, align 8
  store i32 1, ptr %10, align 4
  br label %242

67:                                               ; preds = %36
  %68 = load i64, ptr %6, align 8, !tbaa !11
  %69 = lshr i64 %68, 48
  %70 = load i64, ptr @CLOS, align 8, !tbaa !11
  %71 = icmp eq i64 %69, %70
  br i1 %71, label %72, label %184

72:                                               ; preds = %67
  %73 = load double, ptr %6, align 8, !tbaa !5
  %74 = call double @car(double noundef %73)
  %75 = call double @car(double noundef %74)
  store double %75, ptr %7, align 8, !tbaa !5
  %76 = load double, ptr %6, align 8, !tbaa !5
  %77 = call double @cdr(double noundef %76)
  store double %77, ptr %8, align 8, !tbaa !5
  %78 = load i64, ptr %8, align 8, !tbaa !11
  %79 = lshr i64 %78, 48
  %80 = load i64, ptr @NIL, align 8, !tbaa !11
  %81 = icmp eq i64 %79, %80
  br i1 %81, label %82, label %84

82:                                               ; preds = %72
  %83 = load double, ptr @env, align 8, !tbaa !5
  store double %83, ptr %8, align 8, !tbaa !5
  br label %84

84:                                               ; preds = %82, %72
  br label %85

85:                                               ; preds = %106, %84
  %86 = load i64, ptr %7, align 8, !tbaa !11
  %87 = lshr i64 %86, 48
  %88 = load i64, ptr @CONS, align 8, !tbaa !11
  %89 = icmp eq i64 %87, %88
  br i1 %89, label %90, label %95

90:                                               ; preds = %85
  %91 = load i64, ptr %4, align 8, !tbaa !11
  %92 = lshr i64 %91, 48
  %93 = load i64, ptr @CONS, align 8, !tbaa !11
  %94 = icmp eq i64 %92, %93
  br label %95

95:                                               ; preds = %90, %85
  %96 = phi i1 [ false, %85 ], [ %94, %90 ]
  br i1 %96, label %97, label %111

97:                                               ; preds = %95
  call void @llvm.lifetime.start.p0(i64 8, ptr %11) #2
  %98 = load double, ptr %4, align 8, !tbaa !5
  %99 = call double @car(double noundef %98)
  %100 = load ptr, ptr %5, align 8, !tbaa !9
  %101 = call double @eval(double noundef %99, ptr noundef %100)
  store double %101, ptr %11, align 8, !tbaa !5
  %102 = load double, ptr %7, align 8, !tbaa !5
  %103 = call double @car(double noundef %102)
  %104 = load double, ptr %11, align 8, !tbaa !5
  %105 = call double @pair(double noundef %103, double noundef %104, ptr noundef %8)
  store double %105, ptr %8, align 8, !tbaa !5
  call void @llvm.lifetime.end.p0(i64 8, ptr %11) #2
  br label %106

106:                                              ; preds = %97
  %107 = load double, ptr %7, align 8, !tbaa !5
  %108 = call double @cdr(double noundef %107)
  store double %108, ptr %7, align 8, !tbaa !5
  %109 = load double, ptr %4, align 8, !tbaa !5
  %110 = call double @cdr(double noundef %109)
  store double %110, ptr %4, align 8, !tbaa !5
  br label %85, !llvm.loop !17

111:                                              ; preds = %95
  %112 = load i64, ptr %7, align 8, !tbaa !11
  %113 = lshr i64 %112, 48
  %114 = load i64, ptr @CONS, align 8, !tbaa !11
  %115 = icmp eq i64 %113, %114
  br i1 %115, label %116, label %152

116:                                              ; preds = %111
  %117 = load double, ptr %4, align 8, !tbaa !5
  %118 = load ptr, ptr %5, align 8, !tbaa !9
  %119 = call double @eval(double noundef %117, ptr noundef %118)
  store double %119, ptr %4, align 8, !tbaa !5
  br label %120

120:                                              ; preds = %138, %116
  %121 = load i64, ptr %7, align 8, !tbaa !11
  %122 = lshr i64 %121, 48
  %123 = load i64, ptr @CONS, align 8, !tbaa !11
  %124 = icmp eq i64 %122, %123
  br i1 %124, label %125, label %130

125:                                              ; preds = %120
  %126 = load i64, ptr %4, align 8, !tbaa !11
  %127 = lshr i64 %126, 48
  %128 = load i64, ptr @CONS, align 8, !tbaa !11
  %129 = icmp eq i64 %127, %128
  br label %130

130:                                              ; preds = %125, %120
  %131 = phi i1 [ false, %120 ], [ %129, %125 ]
  br i1 %131, label %132, label %143

132:                                              ; preds = %130
  %133 = load double, ptr %7, align 8, !tbaa !5
  %134 = call double @car(double noundef %133)
  %135 = load double, ptr %4, align 8, !tbaa !5
  %136 = call double @car(double noundef %135)
  %137 = call double @pair(double noundef %134, double noundef %136, ptr noundef %8)
  store double %137, ptr %8, align 8, !tbaa !5
  br label %138

138:                                              ; preds = %132
  %139 = load double, ptr %7, align 8, !tbaa !5
  %140 = call double @cdr(double noundef %139)
  store double %140, ptr %7, align 8, !tbaa !5
  %141 = load double, ptr %4, align 8, !tbaa !5
  %142 = call double @cdr(double noundef %141)
  store double %142, ptr %4, align 8, !tbaa !5
  br label %120, !llvm.loop !19

143:                                              ; preds = %130
  %144 = load i64, ptr %7, align 8, !tbaa !11
  %145 = lshr i64 %144, 48
  %146 = load i64, ptr @CONS, align 8, !tbaa !11
  %147 = icmp eq i64 %145, %146
  br i1 %147, label %148, label %151

148:                                              ; preds = %143
  %149 = call double @err(i32 noundef 5)
  %150 = call double @ret(i32 noundef 5, double noundef %149)
  store double %150, ptr %3, align 8
  store i32 1, ptr %10, align 4
  br label %242

151:                                              ; preds = %143
  br label %171

152:                                              ; preds = %111
  %153 = load i64, ptr %4, align 8, !tbaa !11
  %154 = lshr i64 %153, 48
  %155 = load i64, ptr @CONS, align 8, !tbaa !11
  %156 = icmp eq i64 %154, %155
  br i1 %156, label %157, label %160

157:                                              ; preds = %152
  %158 = load ptr, ptr %5, align 8, !tbaa !9
  %159 = call double @evlis(ptr noundef %4, ptr noundef %158)
  store double %159, ptr %4, align 8, !tbaa !5
  br label %170

160:                                              ; preds = %152
  %161 = load i64, ptr %4, align 8, !tbaa !11
  %162 = lshr i64 %161, 48
  %163 = load i64, ptr @NIL, align 8, !tbaa !11
  %164 = icmp ne i64 %162, %163
  br i1 %164, label %165, label %169

165:                                              ; preds = %160
  %166 = load double, ptr %4, align 8, !tbaa !5
  %167 = load ptr, ptr %5, align 8, !tbaa !9
  %168 = call double @eval(double noundef %166, ptr noundef %167)
  store double %168, ptr %4, align 8, !tbaa !5
  br label %169

169:                                              ; preds = %165, %160
  br label %170

170:                                              ; preds = %169, %157
  br label %171

171:                                              ; preds = %170, %151
  %172 = load i64, ptr %7, align 8, !tbaa !11
  %173 = lshr i64 %172, 48
  %174 = load i64, ptr @NIL, align 8, !tbaa !11
  %175 = icmp ne i64 %173, %174
  br i1 %175, label %176, label %180

176:                                              ; preds = %171
  %177 = load double, ptr %7, align 8, !tbaa !5
  %178 = load double, ptr %4, align 8, !tbaa !5
  %179 = call double @pair(double noundef %177, double noundef %178, ptr noundef %8)
  store double %179, ptr %8, align 8, !tbaa !5
  br label %180

180:                                              ; preds = %176, %171
  %181 = load double, ptr %6, align 8, !tbaa !5
  %182 = call double @car(double noundef %181)
  %183 = call double @cdr(double noundef %182)
  store double %183, ptr %4, align 8, !tbaa !5
  store ptr %8, ptr %5, align 8, !tbaa !9
  br label %241

184:                                              ; preds = %67
  %185 = load i64, ptr %6, align 8, !tbaa !11
  %186 = lshr i64 %185, 48
  %187 = load i64, ptr @MACR, align 8, !tbaa !11
  %188 = icmp eq i64 %186, %187
  br i1 %188, label %189, label %237

189:                                              ; preds = %184
  %190 = load double, ptr @env, align 8, !tbaa !5
  store double %190, ptr %8, align 8, !tbaa !5
  %191 = load double, ptr %6, align 8, !tbaa !5
  %192 = call double @car(double noundef %191)
  store double %192, ptr %7, align 8, !tbaa !5
  br label %193

193:                                              ; preds = %211, %189
  %194 = load i64, ptr %7, align 8, !tbaa !11
  %195 = lshr i64 %194, 48
  %196 = load i64, ptr @CONS, align 8, !tbaa !11
  %197 = icmp eq i64 %195, %196
  br i1 %197, label %198, label %203

198:                                              ; preds = %193
  %199 = load i64, ptr %4, align 8, !tbaa !11
  %200 = lshr i64 %199, 48
  %201 = load i64, ptr @CONS, align 8, !tbaa !11
  %202 = icmp eq i64 %200, %201
  br label %203

203:                                              ; preds = %198, %193
  %204 = phi i1 [ false, %193 ], [ %202, %198 ]
  br i1 %204, label %205, label %216

205:                                              ; preds = %203
  %206 = load double, ptr %7, align 8, !tbaa !5
  %207 = call double @car(double noundef %206)
  %208 = load double, ptr %4, align 8, !tbaa !5
  %209 = call double @car(double noundef %208)
  %210 = call double @pair(double noundef %207, double noundef %209, ptr noundef %8)
  store double %210, ptr %8, align 8, !tbaa !5
  br label %211

211:                                              ; preds = %205
  %212 = load double, ptr %7, align 8, !tbaa !5
  %213 = call double @cdr(double noundef %212)
  store double %213, ptr %7, align 8, !tbaa !5
  %214 = load double, ptr %4, align 8, !tbaa !5
  %215 = call double @cdr(double noundef %214)
  store double %215, ptr %4, align 8, !tbaa !5
  br label %193, !llvm.loop !20

216:                                              ; preds = %203
  %217 = load i64, ptr %7, align 8, !tbaa !11
  %218 = lshr i64 %217, 48
  %219 = load i64, ptr @CONS, align 8, !tbaa !11
  %220 = icmp eq i64 %218, %219
  br i1 %220, label %221, label %224

221:                                              ; preds = %216
  %222 = call double @err(i32 noundef 5)
  %223 = call double @ret(i32 noundef 5, double noundef %222)
  store double %223, ptr %3, align 8
  store i32 1, ptr %10, align 4
  br label %242

224:                                              ; preds = %216
  %225 = load i64, ptr %7, align 8, !tbaa !11
  %226 = lshr i64 %225, 48
  %227 = load i64, ptr @NIL, align 8, !tbaa !11
  %228 = icmp ne i64 %226, %227
  br i1 %228, label %229, label %233

229:                                              ; preds = %224
  %230 = load double, ptr %7, align 8, !tbaa !5
  %231 = load double, ptr %4, align 8, !tbaa !5
  %232 = call double @pair(double noundef %230, double noundef %231, ptr noundef %8)
  store double %232, ptr %8, align 8, !tbaa !5
  br label %233

233:                                              ; preds = %229, %224
  %234 = load double, ptr %6, align 8, !tbaa !5
  %235 = call double @cdr(double noundef %234)
  %236 = call double @eval(double noundef %235, ptr noundef %8)
  store double %236, ptr %4, align 8, !tbaa !5
  br label %240

237:                                              ; preds = %184
  %238 = call double @err(i32 noundef 4)
  %239 = call double @ret(i32 noundef 5, double noundef %238)
  store double %239, ptr %3, align 8
  store i32 1, ptr %10, align 4
  br label %242

240:                                              ; preds = %233
  br label %241

241:                                              ; preds = %240, %180
  br label %16

242:                                              ; preds = %237, %221, %148, %64, %33, %22
  call void @llvm.lifetime.end.p0(i64 8, ptr %9) #2
  call void @llvm.lifetime.end.p0(i64 8, ptr %8) #2
  call void @llvm.lifetime.end.p0(i64 8, ptr %7) #2
  call void @llvm.lifetime.end.p0(i64 8, ptr %6) #2
  %243 = load double, ptr %3, align 8
  ret double %243
}

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 = !{!"double", !7, i64 0}
!7 = !{!"omnipotent char", !8, i64 0}
!8 = !{!"Simple C/C++ TBAA"}
!9 = !{!10, !10, i64 0}
!10 = !{!"any pointer", !7, i64 0}
!11 = !{!12, !12, i64 0}
!12 = !{!"long", !7, i64 0}
!13 = !{!14, !10, i64 8}
!14 = !{!"", !10, i64 0, !10, i64 8, !15, i64 16}
!15 = !{!"short", !7, i64 0}
!16 = !{!14, !15, i64 16}
!17 = distinct !{!17, !18}
!18 = !{!"llvm.loop.mustprogress"}
!19 = distinct !{!19, !18}
!20 = distinct !{!20, !18}


; 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"

%struct.anon = type { ptr, ptr, i16 }

@PRIM = external dso_local local_unnamed_addr global i64, align 8
@ATOM = external dso_local local_unnamed_addr global i64, align 8
@CONS = external dso_local local_unnamed_addr global i64, align 8
@CLOS = external dso_local local_unnamed_addr global i64, align 8
@MACR = external dso_local local_unnamed_addr global i64, align 8
@NIL = external dso_local local_unnamed_addr global i64, align 8
@env = external dso_local local_unnamed_addr global double, align 8
@nil = external dso_local local_unnamed_addr global double, align 8
@prim = external dso_local local_unnamed_addr global [43 x %struct.anon], align 16

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

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

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

; Function Attrs: mustprogress 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 double @car(double noundef) local_unnamed_addr #0

; Function Attrs: nounwind uwtable
declare dso_local double @cdr(double noundef) local_unnamed_addr #0

; Function Attrs: nounwind uwtable
declare dso_local double @pair(double noundef, double noundef, ptr noundef) local_unnamed_addr #0

; Function Attrs: nounwind uwtable
declare dso_local double @assoc(double noundef, double noundef) local_unnamed_addr #0

; Function Attrs: nounwind uwtable
declare dso_local void @var(i32 noundef, ...) local_unnamed_addr #0

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

; Function Attrs: nounwind uwtable
declare dso_local double @evlis(ptr noundef, ptr noundef) local_unnamed_addr #0

; Function Attrs: nounwind uwtable
declare dso_local double @eval(double noundef, ptr noundef) local_unnamed_addr #0

; Function Attrs: nounwind uwtable
define dso_local double @step(double noundef %0, ptr noundef %1) local_unnamed_addr #0 {
  %3 = alloca double, align 8
  %4 = alloca double, align 8
  %5 = alloca double, align 8
  %6 = alloca double, align 8
  %7 = alloca double, align 8
  store double %0, ptr %3, align 8, !tbaa !5
  call void @llvm.lifetime.start.p0(i64 8, ptr nonnull %4) #2
  %8 = load double, ptr @nil, align 8, !tbaa !5
  store double %8, ptr %4, align 8, !tbaa !5
  call void @llvm.lifetime.start.p0(i64 8, ptr nonnull %5) #2
  store double %8, ptr %5, align 8, !tbaa !5
  call void @llvm.lifetime.start.p0(i64 8, ptr nonnull %6) #2
  store double %8, ptr %6, align 8, !tbaa !5
  call void @llvm.lifetime.start.p0(i64 8, ptr nonnull %7) #2
  store double %8, ptr %7, align 8, !tbaa !5
  call void (i32, ...) @var(i32 noundef 5, ptr noundef nonnull %3, ptr noundef nonnull %4, ptr noundef nonnull %5, ptr noundef nonnull %6, ptr noundef nonnull %7)
  %9 = load i64, ptr %3, align 8
  %10 = lshr i64 %9, 48
  %11 = load i64, ptr @ATOM, align 8, !tbaa !9
  %12 = icmp eq i64 %10, %11
  %13 = bitcast i64 %9 to double
  br i1 %12, label %._crit_edge46, label %.lr.ph45

._crit_edge46:                                    ; preds = %.backedge, %2
  %14 = phi double [ %13, %2 ], [ %178, %.backedge ]
  %.010.lcssa = phi ptr [ %1, %2 ], [ %.010.be, %.backedge ]
  %15 = load double, ptr %.010.lcssa, align 8, !tbaa !5
  %16 = call double @assoc(double noundef %14, double noundef %15)
  br label %.loopexit

.lr.ph45:                                         ; preds = %2, %.backedge
  %17 = phi double [ %178, %.backedge ], [ %13, %2 ]
  %18 = phi i64 [ %180, %.backedge ], [ %10, %2 ]
  %.01043 = phi ptr [ %.010.be, %.backedge ], [ %1, %2 ]
  %19 = load i64, ptr @CONS, align 8, !tbaa !9
  %.not = icmp eq i64 %18, %19
  br i1 %.not, label %20, label %.loopexit

20:                                               ; preds = %.lr.ph45
  %21 = call double @car(double noundef %17)
  %22 = call double @eval(double noundef %21, ptr noundef %.01043)
  store double %22, ptr %4, align 8, !tbaa !5
  %23 = load double, ptr %3, align 8, !tbaa !5
  %24 = call double @cdr(double noundef %23)
  store double %24, ptr %3, align 8, !tbaa !5
  %25 = load double, ptr %.01043, align 8, !tbaa !5
  store double %25, ptr %7, align 8, !tbaa !5
  %26 = load i64, ptr %4, align 8
  %27 = lshr i64 %26, 48
  %28 = load i64, ptr @PRIM, align 8, !tbaa !9
  %29 = icmp eq i64 %27, %28
  %30 = bitcast i64 %26 to double
  br i1 %29, label %31, label %43

31:                                               ; preds = %20
  %32 = call i64 @ord(double noundef %30)
  %33 = getelementptr inbounds [43 x %struct.anon], ptr @prim, i64 0, i64 %32, i32 1
  %34 = load ptr, ptr %33, align 8, !tbaa !11
  %35 = call double %34(ptr noundef nonnull %3, ptr noundef nonnull %7) #2
  store double %35, ptr %3, align 8, !tbaa !5
  %36 = load double, ptr %4, align 8, !tbaa !5
  %37 = call i64 @ord(double noundef %36)
  %38 = getelementptr inbounds [43 x %struct.anon], ptr @prim, i64 0, i64 %37, i32 2
  %39 = load i16, ptr %38, align 8, !tbaa !15
  %.not20 = icmp eq i16 %39, 0
  br i1 %.not20, label %41, label %..backedge_crit_edge

..backedge_crit_edge:                             ; preds = %31
  %.pre = load i64, ptr %3, align 8
  %40 = bitcast i64 %.pre to double
  br label %.backedge

41:                                               ; preds = %31
  %42 = load double, ptr %3, align 8, !tbaa !5
  br label %.loopexit

43:                                               ; preds = %20
  %44 = load i64, ptr @CLOS, align 8, !tbaa !9
  %45 = icmp eq i64 %27, %44
  br i1 %45, label %46, label %131

46:                                               ; preds = %43
  %47 = call double @car(double noundef %30)
  %48 = call double @car(double noundef %47)
  store double %48, ptr %5, align 8, !tbaa !5
  %49 = load double, ptr %4, align 8, !tbaa !5
  %50 = call double @cdr(double noundef %49)
  store double %50, ptr %6, align 8, !tbaa !5
  %.cast = bitcast double %50 to i64
  %51 = lshr i64 %.cast, 48
  %52 = load i64, ptr @NIL, align 8, !tbaa !9
  %53 = icmp eq i64 %51, %52
  br i1 %53, label %54, label %56

54:                                               ; preds = %46
  %55 = load double, ptr @env, align 8, !tbaa !5
  store double %55, ptr %6, align 8, !tbaa !5
  br label %56

56:                                               ; preds = %54, %46
  %57 = load i64, ptr %5, align 8, !tbaa !9
  %58 = lshr i64 %57, 48
  %59 = load i64, ptr @CONS, align 8
  %60 = icmp eq i64 %58, %59
  %61 = load i64, ptr %3, align 8
  %62 = lshr i64 %61, 48
  %63 = icmp eq i64 %62, %59
  %64 = select i1 %60, i1 %63, i1 false
  %65 = bitcast i64 %61 to double
  br i1 %64, label %.lr.ph33, label %._crit_edge34

.lr.ph33:                                         ; preds = %56, %.lr.ph33
  %66 = phi double [ %75, %.lr.ph33 ], [ %65, %56 ]
  %67 = call double @car(double noundef %66)
  %68 = call double @eval(double noundef %67, ptr noundef nonnull %7)
  %69 = load double, ptr %5, align 8, !tbaa !5
  %70 = call double @car(double noundef %69)
  %71 = call double @pair(double noundef %70, double noundef %68, ptr noundef nonnull %6)
  store double %71, ptr %6, align 8, !tbaa !5
  %72 = load double, ptr %5, align 8, !tbaa !5
  %73 = call double @cdr(double noundef %72)
  store double %73, ptr %5, align 8, !tbaa !5
  %74 = load double, ptr %3, align 8, !tbaa !5
  %75 = call double @cdr(double noundef %74)
  store double %75, ptr %3, align 8, !tbaa !5
  %76 = load i64, ptr %5, align 8, !tbaa !9
  %77 = lshr i64 %76, 48
  %78 = load i64, ptr @CONS, align 8
  %79 = icmp eq i64 %77, %78
  %.cast50 = bitcast double %75 to i64
  %80 = lshr i64 %.cast50, 48
  %81 = icmp eq i64 %80, %78
  %82 = select i1 %79, i1 %81, i1 false
  br i1 %82, label %.lr.ph33, label %._crit_edge34, !llvm.loop !16

._crit_edge34:                                    ; preds = %.lr.ph33, %56
  %83 = phi double [ %65, %56 ], [ %75, %.lr.ph33 ]
  %.lcssa24 = phi i1 [ %60, %56 ], [ %79, %.lr.ph33 ]
  %.lcssa23 = phi i64 [ %62, %56 ], [ %80, %.lr.ph33 ]
  %.lcssa22 = phi i1 [ %63, %56 ], [ %81, %.lr.ph33 ]
  br i1 %.lcssa24, label %84, label %112

84:                                               ; preds = %._crit_edge34
  %85 = call double @eval(double noundef %83, ptr noundef nonnull %7)
  store double %85, ptr %3, align 8, !tbaa !5
  %86 = load i64, ptr %5, align 8
  %87 = lshr i64 %86, 48
  %88 = load i64, ptr @CONS, align 8
  %89 = icmp eq i64 %87, %88
  %.cast1838 = bitcast double %85 to i64
  %90 = lshr i64 %.cast1838, 48
  %91 = icmp eq i64 %90, %88
  %92 = select i1 %89, i1 %91, i1 false
  br i1 %92, label %.lr.ph40, label %._crit_edge41

.lr.ph40:                                         ; preds = %84, %.lr.ph40
  %.in = phi i64 [ %102, %.lr.ph40 ], [ %86, %84 ]
  %93 = bitcast i64 %.in to double
  %94 = call double @car(double noundef %93)
  %95 = load double, ptr %3, align 8, !tbaa !5
  %96 = call double @car(double noundef %95)
  %97 = call double @pair(double noundef %94, double noundef %96, ptr noundef nonnull %6)
  store double %97, ptr %6, align 8, !tbaa !5
  %98 = load double, ptr %5, align 8, !tbaa !5
  %99 = call double @cdr(double noundef %98)
  store double %99, ptr %5, align 8, !tbaa !5
  %100 = load double, ptr %3, align 8, !tbaa !5
  %101 = call double @cdr(double noundef %100)
  store double %101, ptr %3, align 8, !tbaa !5
  %102 = load i64, ptr %5, align 8
  %103 = lshr i64 %102, 48
  %104 = load i64, ptr @CONS, align 8
  %105 = icmp eq i64 %103, %104
  %.cast18 = bitcast double %101 to i64
  %106 = lshr i64 %.cast18, 48
  %107 = icmp eq i64 %106, %104
  %108 = select i1 %105, i1 %107, i1 false
  br i1 %108, label %.lr.ph40, label %._crit_edge41, !llvm.loop !18

._crit_edge41:                                    ; preds = %.lr.ph40, %84
  %109 = phi double [ %85, %84 ], [ %101, %.lr.ph40 ]
  %.lcssa25 = phi i1 [ %89, %84 ], [ %105, %.lr.ph40 ]
  br i1 %.lcssa25, label %110, label %119

110:                                              ; preds = %._crit_edge41
  %111 = call double @err(i32 noundef 5)
  br label %.loopexit

112:                                              ; preds = %._crit_edge34
  br i1 %.lcssa22, label %113, label %115

113:                                              ; preds = %112
  %114 = call double @evlis(ptr noundef nonnull %3, ptr noundef nonnull %7)
  store double %114, ptr %3, align 8, !tbaa !5
  br label %119

115:                                              ; preds = %112
  %116 = load i64, ptr @NIL, align 8, !tbaa !9
  %.not16 = icmp eq i64 %.lcssa23, %116
  br i1 %.not16, label %119, label %117

117:                                              ; preds = %115
  %118 = call double @eval(double noundef %83, ptr noundef nonnull %7)
  store double %118, ptr %3, align 8, !tbaa !5
  br label %119

119:                                              ; preds = %113, %117, %115, %._crit_edge41
  %120 = phi double [ %114, %113 ], [ %118, %117 ], [ %83, %115 ], [ %109, %._crit_edge41 ]
  %121 = load i64, ptr %5, align 8
  %122 = lshr i64 %121, 48
  %123 = load i64, ptr @NIL, align 8, !tbaa !9
  %.not19 = icmp eq i64 %122, %123
  br i1 %.not19, label %127, label %124

124:                                              ; preds = %119
  %125 = bitcast i64 %121 to double
  %126 = call double @pair(double noundef %125, double noundef %120, ptr noundef nonnull %6)
  store double %126, ptr %6, align 8, !tbaa !5
  br label %127

127:                                              ; preds = %124, %119
  %128 = load double, ptr %4, align 8, !tbaa !5
  %129 = call double @car(double noundef %128)
  %130 = call double @cdr(double noundef %129)
  br label %176

131:                                              ; preds = %43
  %132 = load i64, ptr @MACR, align 8, !tbaa !9
  %133 = icmp eq i64 %27, %132
  br i1 %133, label %134, label %174

134:                                              ; preds = %131
  %135 = load double, ptr @env, align 8, !tbaa !5
  store double %135, ptr %6, align 8, !tbaa !5
  %136 = call double @car(double noundef %30)
  store double %136, ptr %5, align 8, !tbaa !5
  %.cast48 = bitcast double %136 to i64
  %137 = lshr i64 %.cast48, 48
  %138 = load i64, ptr @CONS, align 8
  %139 = icmp eq i64 %137, %138
  %140 = load i64, ptr %3, align 8
  %141 = lshr i64 %140, 48
  %142 = icmp eq i64 %141, %138
  %143 = select i1 %139, i1 %142, i1 false
  %144 = bitcast i64 %140 to double
  br i1 %143, label %.lr.ph, label %._crit_edge

.lr.ph:                                           ; preds = %134, %.lr.ph
  %145 = phi double [ %161, %.lr.ph ], [ %136, %134 ]
  %146 = call double @car(double noundef %145)
  %147 = load double, ptr %3, align 8, !tbaa !5
  %148 = call double @car(double noundef %147)
  %149 = call double @pair(double noundef %146, double noundef %148, ptr noundef nonnull %6)
  store double %149, ptr %6, align 8, !tbaa !5
  %150 = load double, ptr %5, align 8, !tbaa !5
  %151 = call double @cdr(double noundef %150)
  store double %151, ptr %5, align 8, !tbaa !5
  %152 = load double, ptr %3, align 8, !tbaa !5
  %153 = call double @cdr(double noundef %152)
  store double %153, ptr %3, align 8, !tbaa !5
  %154 = load i64, ptr %5, align 8
  %155 = lshr i64 %154, 48
  %156 = load i64, ptr @CONS, align 8
  %157 = icmp eq i64 %155, %156
  %.cast49 = bitcast double %153 to i64
  %158 = lshr i64 %.cast49, 48
  %159 = icmp eq i64 %158, %156
  %160 = select i1 %157, i1 %159, i1 false
  %161 = bitcast i64 %154 to double
  br i1 %160, label %.lr.ph, label %._crit_edge, !llvm.loop !19

._crit_edge:                                      ; preds = %.lr.ph, %134
  %162 = phi double [ %144, %134 ], [ %153, %.lr.ph ]
  %163 = phi double [ %136, %134 ], [ %161, %.lr.ph ]
  %.lcssa21 = phi i64 [ %137, %134 ], [ %155, %.lr.ph ]
  %.lcssa = phi i1 [ %139, %134 ], [ %157, %.lr.ph ]
  br i1 %.lcssa, label %164, label %166

164:                                              ; preds = %._crit_edge
  %165 = call double @err(i32 noundef 5)
  br label %.loopexit

166:                                              ; preds = %._crit_edge
  %167 = load i64, ptr @NIL, align 8, !tbaa !9
  %.not15 = icmp eq i64 %.lcssa21, %167
  br i1 %.not15, label %170, label %168

168:                                              ; preds = %166
  %169 = call double @pair(double noundef %163, double noundef %162, ptr noundef nonnull %6)
  store double %169, ptr %6, align 8, !tbaa !5
  br label %170

170:                                              ; preds = %168, %166
  %171 = load double, ptr %4, align 8, !tbaa !5
  %172 = call double @cdr(double noundef %171)
  %173 = call double @eval(double noundef %172, ptr noundef nonnull %6)
  br label %176

174:                                              ; preds = %131
  %175 = call double @err(i32 noundef 4)
  br label %.loopexit

176:                                              ; preds = %170, %127
  %storemerge = phi double [ %173, %170 ], [ %130, %127 ]
  %.1 = phi ptr [ %7, %170 ], [ %6, %127 ]
  store double %storemerge, ptr %3, align 8, !tbaa !5
  %177 = bitcast double %storemerge to i64
  br label %.backedge

.backedge:                                        ; preds = %..backedge_crit_edge, %176
  %178 = phi double [ %40, %..backedge_crit_edge ], [ %storemerge, %176 ]
  %179 = phi i64 [ %.pre, %..backedge_crit_edge ], [ %177, %176 ]
  %.010.be = phi ptr [ %7, %..backedge_crit_edge ], [ %.1, %176 ]
  %180 = lshr i64 %179, 48
  %181 = load i64, ptr @ATOM, align 8, !tbaa !9
  %182 = icmp eq i64 %180, %181
  br i1 %182, label %._crit_edge46, label %.lr.ph45

.loopexit:                                        ; preds = %.lr.ph45, %174, %164, %110, %41, %._crit_edge46
  %.sink = phi double [ %175, %174 ], [ %165, %164 ], [ %111, %110 ], [ %42, %41 ], [ %16, %._crit_edge46 ], [ %17, %.lr.ph45 ]
  %183 = call double @ret(i32 noundef 5, double noundef %.sink)
  call void @llvm.lifetime.end.p0(i64 8, ptr nonnull %7) #2
  call void @llvm.lifetime.end.p0(i64 8, ptr nonnull %6) #2
  call void @llvm.lifetime.end.p0(i64 8, ptr nonnull %5) #2
  call void @llvm.lifetime.end.p0(i64 8, ptr nonnull %4) #2
  ret double %183
}

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 = { mustprogress 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 = !{!"double", !7, i64 0}
!7 = !{!"omnipotent char", !8, i64 0}
!8 = !{!"Simple C/C++ TBAA"}
!9 = !{!10, !10, i64 0}
!10 = !{!"long", !7, i64 0}
!11 = !{!12, !13, i64 8}
!12 = !{!"", !13, i64 0, !13, i64 8, !14, i64 16}
!13 = !{!"any pointer", !7, i64 0}
!14 = !{!"short", !7, i64 0}
!15 = !{!12, !14, i64 16}
!16 = distinct !{!16, !17}
!17 = !{!"llvm.loop.mustprogress"}
!18 = distinct !{!18, !17}
!19 = distinct !{!19, !17}


; Effective O3 passes: EarlyCSEPass,GVNPass,GlobalOptPass,InferFunctionAttrsPass,InstCombinePass,InstSimplifyPass,JumpThreadingPass,LCSSAPass,LoopRotatePass,LoopSimplifyPass,LoopUnrollPass,SROAPass,SimplifyCFGPass