@@ -25,7 +25,8 @@ void fir::runtime::genMain(fir::FirOpBuilder &builder, mlir::Location loc,
25
25
auto argcTy = builder.getDefaultIntegerType ();
26
26
auto ptrTy = mlir::LLVM::LLVMPointerType::get (context);
27
27
28
- // void ProgramStart(int argc, char** argv, char** envp, _QQEnvironmentDefaults* env)
28
+ // void ProgramStart(int argc, char** argv, char** envp,
29
+ // _QQEnvironmentDefaults* env)
29
30
auto startFn = builder.createFunction (
30
31
loc, RTNAME_STRING (ProgramStart),
31
32
mlir::FunctionType::get (context, {argcTy, ptrTy, ptrTy, ptrTy}, {}));
@@ -39,16 +40,16 @@ void fir::runtime::genMain(fir::FirOpBuilder &builder, mlir::Location loc,
39
40
loc, " main" ,
40
41
mlir::FunctionType::get (context, {argcTy, ptrTy, ptrTy}, argcTy));
41
42
// void _QQmain()
42
- auto qqMainFn = builder.createFunction (loc, " _QQmain " ,
43
- mlir::FunctionType::get (context, {}, {}));
43
+ auto qqMainFn = builder.createFunction (
44
+ loc, " _QQmain " , mlir::FunctionType::get (context, {}, {}));
44
45
45
46
mainFn.setPublic ();
46
47
47
48
auto *block = mainFn.addEntryBlock ();
48
49
mlir::OpBuilder::InsertionGuard insertGuard (builder);
49
50
builder.setInsertionPointToStart (block);
50
51
51
- llvm::SmallVector<mlir::Value, 4 > args (block->getArguments ());
52
+ llvm::SmallVector<mlir::Value, 4 > args (block->getArguments ());
52
53
auto envAddr =
53
54
builder.create <fir::AddrOfOp>(loc, env.getType (), env.getSymbol ());
54
55
args.push_back (envAddr);
0 commit comments