1 //===-- llvm/Target/TargetMachine.h - Target Information --------*- C++ -*-===//
2 //
3 // Part of the LLVM Project, under the Apache License v2.0 with LLVM Exceptions.
4 // See https://llvm.org/LICENSE.txt for license information.
5 // SPDX-License-Identifier: Apache-2.0 WITH LLVM-exception
6 //
7 //===----------------------------------------------------------------------===//
8 //
9 // This file defines the TargetMachine and LLVMTargetMachine classes.
10 //
11 //===----------------------------------------------------------------------===//
12
13 #ifndef LLVM_TARGET_TARGETMACHINE_H
14 #define LLVM_TARGET_TARGETMACHINE_H
15
16 #include "llvm/ADT/StringRef.h"
17 #include "llvm/IR/DataLayout.h"
18 #include "llvm/IR/PassManager.h"
19 #include "llvm/Support/Allocator.h"
20 #include "llvm/Support/CodeGen.h"
21 #include "llvm/Support/Error.h"
22 #include "llvm/Support/PGOOptions.h"
23 #include "llvm/Target/CGPassBuilderOption.h"
24 #include "llvm/Target/TargetOptions.h"
25 #include "llvm/TargetParser/Triple.h"
26 #include <optional>
27 #include <string>
28 #include <utility>
29
30 namespace llvm {
31
32 class AAManager;
33 using ModulePassManager = PassManager<Module>;
34
35 class Function;
36 class GlobalValue;
37 class MachineFunctionPassManager;
38 class MachineFunctionAnalysisManager;
39 class MachineModuleInfoWrapperPass;
40 class Mangler;
41 class MCAsmInfo;
42 class MCContext;
43 class MCInstrInfo;
44 class MCRegisterInfo;
45 class MCStreamer;
46 class MCSubtargetInfo;
47 class MCSymbol;
48 class raw_pwrite_stream;
49 class PassBuilder;
50 struct PerFunctionMIParsingState;
51 class SMDiagnostic;
52 class SMRange;
53 class Target;
54 class TargetIntrinsicInfo;
55 class TargetIRAnalysis;
56 class TargetTransformInfo;
57 class TargetLoweringObjectFile;
58 class TargetPassConfig;
59 class TargetSubtargetInfo;
60
61 // The old pass manager infrastructure is hidden in a legacy namespace now.
62 namespace legacy {
63 class PassManagerBase;
64 }
65 using legacy::PassManagerBase;
66
67 struct MachineFunctionInfo;
68 namespace yaml {
69 struct MachineFunctionInfo;
70 }
71
72 //===----------------------------------------------------------------------===//
73 ///
74 /// Primary interface to the complete machine description for the target
75 /// machine. All target-specific information should be accessible through this
76 /// interface.
77 ///
78 class TargetMachine {
79 protected: // Can only create subclasses.
80 TargetMachine(const Target &T, StringRef DataLayoutString,
81 const Triple &TargetTriple, StringRef CPU, StringRef FS,
82 const TargetOptions &Options);
83
84 /// The Target that this machine was created for.
85 const Target &TheTarget;
86
87 /// DataLayout for the target: keep ABI type size and alignment.
88 ///
89 /// The DataLayout is created based on the string representation provided
90 /// during construction. It is kept here only to avoid reparsing the string
91 /// but should not really be used during compilation, because it has an
92 /// internal cache that is context specific.
93 const DataLayout DL;
94
95 /// Triple string, CPU name, and target feature strings the TargetMachine
96 /// instance is created with.
97 Triple TargetTriple;
98 std::string TargetCPU;
99 std::string TargetFS;
100
101 Reloc::Model RM = Reloc::Static;
102 CodeModel::Model CMModel = CodeModel::Small;
103 uint64_t LargeDataThreshold = 0;
104 CodeGenOptLevel OptLevel = CodeGenOptLevel::Default;
105
106 /// Contains target specific asm information.
107 std::unique_ptr<const MCAsmInfo> AsmInfo;
108 std::unique_ptr<const MCRegisterInfo> MRI;
109 std::unique_ptr<const MCInstrInfo> MII;
110 std::unique_ptr<const MCSubtargetInfo> STI;
111
112 unsigned RequireStructuredCFG : 1;
113 unsigned O0WantsFastISel : 1;
114
115 // PGO related tunables.
116 std::optional<PGOOptions> PGOOption;
117
118 public:
119 mutable TargetOptions Options;
120
121 TargetMachine(const TargetMachine &) = delete;
122 void operator=(const TargetMachine &) = delete;
123 virtual ~TargetMachine();
124
getTarget()125 const Target &getTarget() const { return TheTarget; }
126
getTargetTriple()127 const Triple &getTargetTriple() const { return TargetTriple; }
getTargetCPU()128 StringRef getTargetCPU() const { return TargetCPU; }
getTargetFeatureString()129 StringRef getTargetFeatureString() const { return TargetFS; }
setTargetFeatureString(StringRef FS)130 void setTargetFeatureString(StringRef FS) { TargetFS = std::string(FS); }
131
132 /// Virtual method implemented by subclasses that returns a reference to that
133 /// target's TargetSubtargetInfo-derived member variable.
getSubtargetImpl(const Function &)134 virtual const TargetSubtargetInfo *getSubtargetImpl(const Function &) const {
135 return nullptr;
136 }
getObjFileLowering()137 virtual TargetLoweringObjectFile *getObjFileLowering() const {
138 return nullptr;
139 }
140
141 /// Create the target's instance of MachineFunctionInfo
142 virtual MachineFunctionInfo *
createMachineFunctionInfo(BumpPtrAllocator & Allocator,const Function & F,const TargetSubtargetInfo * STI)143 createMachineFunctionInfo(BumpPtrAllocator &Allocator, const Function &F,
144 const TargetSubtargetInfo *STI) const {
145 return nullptr;
146 }
147
148 /// Allocate and return a default initialized instance of the YAML
149 /// representation for the MachineFunctionInfo.
createDefaultFuncInfoYAML()150 virtual yaml::MachineFunctionInfo *createDefaultFuncInfoYAML() const {
151 return nullptr;
152 }
153
154 /// Allocate and initialize an instance of the YAML representation of the
155 /// MachineFunctionInfo.
156 virtual yaml::MachineFunctionInfo *
convertFuncInfoToYAML(const MachineFunction & MF)157 convertFuncInfoToYAML(const MachineFunction &MF) const {
158 return nullptr;
159 }
160
161 /// Parse out the target's MachineFunctionInfo from the YAML reprsentation.
parseMachineFunctionInfo(const yaml::MachineFunctionInfo &,PerFunctionMIParsingState & PFS,SMDiagnostic & Error,SMRange & SourceRange)162 virtual bool parseMachineFunctionInfo(const yaml::MachineFunctionInfo &,
163 PerFunctionMIParsingState &PFS,
164 SMDiagnostic &Error,
165 SMRange &SourceRange) const {
166 return false;
167 }
168
169 /// This method returns a pointer to the specified type of
170 /// TargetSubtargetInfo. In debug builds, it verifies that the object being
171 /// returned is of the correct type.
getSubtarget(const Function & F)172 template <typename STC> const STC &getSubtarget(const Function &F) const {
173 return *static_cast<const STC*>(getSubtargetImpl(F));
174 }
175
176 /// Create a DataLayout.
createDataLayout()177 const DataLayout createDataLayout() const { return DL; }
178
179 /// Test if a DataLayout if compatible with the CodeGen for this target.
180 ///
181 /// The LLVM Module owns a DataLayout that is used for the target independent
182 /// optimizations and code generation. This hook provides a target specific
183 /// check on the validity of this DataLayout.
isCompatibleDataLayout(const DataLayout & Candidate)184 bool isCompatibleDataLayout(const DataLayout &Candidate) const {
185 return DL == Candidate;
186 }
187
188 /// Get the pointer size for this target.
189 ///
190 /// This is the only time the DataLayout in the TargetMachine is used.
getPointerSize(unsigned AS)191 unsigned getPointerSize(unsigned AS) const {
192 return DL.getPointerSize(AS);
193 }
194
getPointerSizeInBits(unsigned AS)195 unsigned getPointerSizeInBits(unsigned AS) const {
196 return DL.getPointerSizeInBits(AS);
197 }
198
getProgramPointerSize()199 unsigned getProgramPointerSize() const {
200 return DL.getPointerSize(DL.getProgramAddressSpace());
201 }
202
getAllocaPointerSize()203 unsigned getAllocaPointerSize() const {
204 return DL.getPointerSize(DL.getAllocaAddrSpace());
205 }
206
207 /// Reset the target options based on the function's attributes.
208 // FIXME: Remove TargetOptions that affect per-function code generation
209 // from TargetMachine.
210 void resetTargetOptions(const Function &F) const;
211
212 /// Return target specific asm information.
getMCAsmInfo()213 const MCAsmInfo *getMCAsmInfo() const { return AsmInfo.get(); }
214
getMCRegisterInfo()215 const MCRegisterInfo *getMCRegisterInfo() const { return MRI.get(); }
getMCInstrInfo()216 const MCInstrInfo *getMCInstrInfo() const { return MII.get(); }
getMCSubtargetInfo()217 const MCSubtargetInfo *getMCSubtargetInfo() const { return STI.get(); }
218
219 /// If intrinsic information is available, return it. If not, return null.
getIntrinsicInfo()220 virtual const TargetIntrinsicInfo *getIntrinsicInfo() const {
221 return nullptr;
222 }
223
requiresStructuredCFG()224 bool requiresStructuredCFG() const { return RequireStructuredCFG; }
setRequiresStructuredCFG(bool Value)225 void setRequiresStructuredCFG(bool Value) { RequireStructuredCFG = Value; }
226
227 /// Returns the code generation relocation model. The choices are static, PIC,
228 /// and dynamic-no-pic, and target default.
229 Reloc::Model getRelocationModel() const;
230
231 /// Returns the code model. The choices are small, kernel, medium, large, and
232 /// target default.
getCodeModel()233 CodeModel::Model getCodeModel() const { return CMModel; }
234
235 /// Returns the maximum code size possible under the code model.
236 uint64_t getMaxCodeSize() const;
237
238 /// Set the code model.
setCodeModel(CodeModel::Model CM)239 void setCodeModel(CodeModel::Model CM) { CMModel = CM; }
240
setLargeDataThreshold(uint64_t LDT)241 void setLargeDataThreshold(uint64_t LDT) { LargeDataThreshold = LDT; }
242 bool isLargeGlobalValue(const GlobalValue *GV) const;
243
244 bool isPositionIndependent() const;
245
246 bool shouldAssumeDSOLocal(const Module &M, const GlobalValue *GV) const;
247
248 /// Returns true if this target uses emulated TLS.
249 bool useEmulatedTLS() const;
250
251 /// Returns true if this target uses TLS Descriptors.
252 bool useTLSDESC() const;
253
254 /// Returns the TLS model which should be used for the given global variable.
255 TLSModel::Model getTLSModel(const GlobalValue *GV) const;
256
257 /// Returns the optimization level: None, Less, Default, or Aggressive.
258 CodeGenOptLevel getOptLevel() const;
259
260 /// Overrides the optimization level.
261 void setOptLevel(CodeGenOptLevel Level);
262
setFastISel(bool Enable)263 void setFastISel(bool Enable) { Options.EnableFastISel = Enable; }
getO0WantsFastISel()264 bool getO0WantsFastISel() { return O0WantsFastISel; }
setO0WantsFastISel(bool Enable)265 void setO0WantsFastISel(bool Enable) { O0WantsFastISel = Enable; }
setGlobalISel(bool Enable)266 void setGlobalISel(bool Enable) { Options.EnableGlobalISel = Enable; }
setGlobalISelAbort(GlobalISelAbortMode Mode)267 void setGlobalISelAbort(GlobalISelAbortMode Mode) {
268 Options.GlobalISelAbort = Mode;
269 }
setMachineOutliner(bool Enable)270 void setMachineOutliner(bool Enable) {
271 Options.EnableMachineOutliner = Enable;
272 }
setSupportsDefaultOutlining(bool Enable)273 void setSupportsDefaultOutlining(bool Enable) {
274 Options.SupportsDefaultOutlining = Enable;
275 }
setSupportsDebugEntryValues(bool Enable)276 void setSupportsDebugEntryValues(bool Enable) {
277 Options.SupportsDebugEntryValues = Enable;
278 }
279
setCFIFixup(bool Enable)280 void setCFIFixup(bool Enable) { Options.EnableCFIFixup = Enable; }
281
getAIXExtendedAltivecABI()282 bool getAIXExtendedAltivecABI() const {
283 return Options.EnableAIXExtendedAltivecABI;
284 }
285
getUniqueSectionNames()286 bool getUniqueSectionNames() const { return Options.UniqueSectionNames; }
287
288 /// Return true if unique basic block section names must be generated.
getUniqueBasicBlockSectionNames()289 bool getUniqueBasicBlockSectionNames() const {
290 return Options.UniqueBasicBlockSectionNames;
291 }
292
293 /// Return true if data objects should be emitted into their own section,
294 /// corresponds to -fdata-sections.
getDataSections()295 bool getDataSections() const {
296 return Options.DataSections;
297 }
298
299 /// Return true if functions should be emitted into their own section,
300 /// corresponding to -ffunction-sections.
getFunctionSections()301 bool getFunctionSections() const {
302 return Options.FunctionSections;
303 }
304
305 /// Return true if visibility attribute should not be emitted in XCOFF,
306 /// corresponding to -mignore-xcoff-visibility.
getIgnoreXCOFFVisibility()307 bool getIgnoreXCOFFVisibility() const {
308 return Options.IgnoreXCOFFVisibility;
309 }
310
311 /// Return true if XCOFF traceback table should be emitted,
312 /// corresponding to -xcoff-traceback-table.
getXCOFFTracebackTable()313 bool getXCOFFTracebackTable() const { return Options.XCOFFTracebackTable; }
314
315 /// If basic blocks should be emitted into their own section,
316 /// corresponding to -fbasic-block-sections.
getBBSectionsType()317 llvm::BasicBlockSection getBBSectionsType() const {
318 return Options.BBSections;
319 }
320
321 /// Get the list of functions and basic block ids that need unique sections.
getBBSectionsFuncListBuf()322 const MemoryBuffer *getBBSectionsFuncListBuf() const {
323 return Options.BBSectionsFuncListBuf.get();
324 }
325
326 /// Returns true if a cast between SrcAS and DestAS is a noop.
isNoopAddrSpaceCast(unsigned SrcAS,unsigned DestAS)327 virtual bool isNoopAddrSpaceCast(unsigned SrcAS, unsigned DestAS) const {
328 return false;
329 }
330
setPGOOption(std::optional<PGOOptions> PGOOpt)331 void setPGOOption(std::optional<PGOOptions> PGOOpt) { PGOOption = PGOOpt; }
getPGOOption()332 const std::optional<PGOOptions> &getPGOOption() const { return PGOOption; }
333
334 /// If the specified generic pointer could be assumed as a pointer to a
335 /// specific address space, return that address space.
336 ///
337 /// Under offloading programming, the offloading target may be passed with
338 /// values only prepared on the host side and could assume certain
339 /// properties.
getAssumedAddrSpace(const Value * V)340 virtual unsigned getAssumedAddrSpace(const Value *V) const { return -1; }
341
342 /// If the specified predicate checks whether a generic pointer falls within
343 /// a specified address space, return that generic pointer and the address
344 /// space being queried.
345 ///
346 /// Such predicates could be specified in @llvm.assume intrinsics for the
347 /// optimizer to assume that the given generic pointer always falls within
348 /// the address space based on that predicate.
349 virtual std::pair<const Value *, unsigned>
getPredicatedAddrSpace(const Value * V)350 getPredicatedAddrSpace(const Value *V) const {
351 return std::make_pair(nullptr, -1);
352 }
353
354 /// Get a \c TargetIRAnalysis appropriate for the target.
355 ///
356 /// This is used to construct the new pass manager's target IR analysis pass,
357 /// set up appropriately for this target machine. Even the old pass manager
358 /// uses this to answer queries about the IR.
359 TargetIRAnalysis getTargetIRAnalysis() const;
360
361 /// Return a TargetTransformInfo for a given function.
362 ///
363 /// The returned TargetTransformInfo is specialized to the subtarget
364 /// corresponding to \p F.
365 virtual TargetTransformInfo getTargetTransformInfo(const Function &F) const;
366
367 /// Allow the target to modify the pass pipeline.
registerPassBuilderCallbacks(PassBuilder &)368 virtual void registerPassBuilderCallbacks(PassBuilder &) {}
369
370 /// Allow the target to register alias analyses with the AAManager for use
371 /// with the new pass manager. Only affects the "default" AAManager.
registerDefaultAliasAnalyses(AAManager &)372 virtual void registerDefaultAliasAnalyses(AAManager &) {}
373
374 /// Add passes to the specified pass manager to get the specified file
375 /// emitted. Typically this will involve several steps of code generation.
376 /// This method should return true if emission of this file type is not
377 /// supported, or false on success.
378 /// \p MMIWP is an optional parameter that, if set to non-nullptr,
379 /// will be used to set the MachineModuloInfo for this PM.
380 virtual bool
381 addPassesToEmitFile(PassManagerBase &, raw_pwrite_stream &,
382 raw_pwrite_stream *, CodeGenFileType,
383 bool /*DisableVerify*/ = true,
384 MachineModuleInfoWrapperPass *MMIWP = nullptr) {
385 return true;
386 }
387
388 /// Add passes to the specified pass manager to get machine code emitted with
389 /// the MCJIT. This method returns true if machine code is not supported. It
390 /// fills the MCContext Ctx pointer which can be used to build custom
391 /// MCStreamer.
392 ///
393 virtual bool addPassesToEmitMC(PassManagerBase &, MCContext *&,
394 raw_pwrite_stream &,
395 bool /*DisableVerify*/ = true) {
396 return true;
397 }
398
399 /// True if subtarget inserts the final scheduling pass on its own.
400 ///
401 /// Branch relaxation, which must happen after block placement, can
402 /// on some targets (e.g. SystemZ) expose additional post-RA
403 /// scheduling opportunities.
targetSchedulesPostRAScheduling()404 virtual bool targetSchedulesPostRAScheduling() const { return false; };
405
406 void getNameWithPrefix(SmallVectorImpl<char> &Name, const GlobalValue *GV,
407 Mangler &Mang, bool MayAlwaysUsePrivate = false) const;
408 MCSymbol *getSymbol(const GlobalValue *GV) const;
409
410 /// The integer bit size to use for SjLj based exception handling.
411 static constexpr unsigned DefaultSjLjDataSize = 32;
getSjLjDataSize()412 virtual unsigned getSjLjDataSize() const { return DefaultSjLjDataSize; }
413
414 static std::pair<int, int> parseBinutilsVersion(StringRef Version);
415
416 /// getAddressSpaceForPseudoSourceKind - Given the kind of memory
417 /// (e.g. stack) the target returns the corresponding address space.
getAddressSpaceForPseudoSourceKind(unsigned Kind)418 virtual unsigned getAddressSpaceForPseudoSourceKind(unsigned Kind) const {
419 return 0;
420 }
421 };
422
423 /// This class describes a target machine that is implemented with the LLVM
424 /// target-independent code generator.
425 ///
426 class LLVMTargetMachine : public TargetMachine {
427 protected: // Can only create subclasses.
428 LLVMTargetMachine(const Target &T, StringRef DataLayoutString,
429 const Triple &TT, StringRef CPU, StringRef FS,
430 const TargetOptions &Options, Reloc::Model RM,
431 CodeModel::Model CM, CodeGenOptLevel OL);
432
433 void initAsmInfo();
434
435 public:
436 /// Get a TargetTransformInfo implementation for the target.
437 ///
438 /// The TTI returned uses the common code generator to answer queries about
439 /// the IR.
440 TargetTransformInfo getTargetTransformInfo(const Function &F) const override;
441
442 /// Create a pass configuration object to be used by addPassToEmitX methods
443 /// for generating a pipeline of CodeGen passes.
444 virtual TargetPassConfig *createPassConfig(PassManagerBase &PM);
445
446 /// Add passes to the specified pass manager to get the specified file
447 /// emitted. Typically this will involve several steps of code generation.
448 /// \p MMIWP is an optional parameter that, if set to non-nullptr,
449 /// will be used to set the MachineModuloInfo for this PM.
450 bool
451 addPassesToEmitFile(PassManagerBase &PM, raw_pwrite_stream &Out,
452 raw_pwrite_stream *DwoOut, CodeGenFileType FileType,
453 bool DisableVerify = true,
454 MachineModuleInfoWrapperPass *MMIWP = nullptr) override;
455
buildCodeGenPipeline(ModulePassManager &,MachineFunctionPassManager &,MachineFunctionAnalysisManager &,raw_pwrite_stream &,raw_pwrite_stream *,CodeGenFileType,CGPassBuilderOption,PassInstrumentationCallbacks *)456 virtual Error buildCodeGenPipeline(ModulePassManager &,
457 MachineFunctionPassManager &,
458 MachineFunctionAnalysisManager &,
459 raw_pwrite_stream &, raw_pwrite_stream *,
460 CodeGenFileType, CGPassBuilderOption,
461 PassInstrumentationCallbacks *) {
462 return make_error<StringError>("buildCodeGenPipeline is not overridden",
463 inconvertibleErrorCode());
464 }
465
getPassNameFromLegacyName(StringRef)466 virtual std::pair<StringRef, bool> getPassNameFromLegacyName(StringRef) {
467 llvm_unreachable(
468 "getPassNameFromLegacyName parseMIRPipeline is not overridden");
469 }
470
471 /// Add passes to the specified pass manager to get machine code emitted with
472 /// the MCJIT. This method returns true if machine code is not supported. It
473 /// fills the MCContext Ctx pointer which can be used to build custom
474 /// MCStreamer.
475 bool addPassesToEmitMC(PassManagerBase &PM, MCContext *&Ctx,
476 raw_pwrite_stream &Out,
477 bool DisableVerify = true) override;
478
479 /// Returns true if the target is expected to pass all machine verifier
480 /// checks. This is a stopgap measure to fix targets one by one. We will
481 /// remove this at some point and always enable the verifier when
482 /// EXPENSIVE_CHECKS is enabled.
isMachineVerifierClean()483 virtual bool isMachineVerifierClean() const { return true; }
484
485 /// Adds an AsmPrinter pass to the pipeline that prints assembly or
486 /// machine code from the MI representation.
487 bool addAsmPrinter(PassManagerBase &PM, raw_pwrite_stream &Out,
488 raw_pwrite_stream *DwoOut, CodeGenFileType FileType,
489 MCContext &Context);
490
491 Expected<std::unique_ptr<MCStreamer>>
492 createMCStreamer(raw_pwrite_stream &Out, raw_pwrite_stream *DwoOut,
493 CodeGenFileType FileType, MCContext &Ctx);
494
495 /// True if the target uses physical regs (as nearly all targets do). False
496 /// for stack machines such as WebAssembly and other virtual-register
497 /// machines. If true, all vregs must be allocated before PEI. If false, then
498 /// callee-save register spilling and scavenging are not needed or used. If
499 /// false, implicitly defined registers will still be assumed to be physical
500 /// registers, except that variadic defs will be allocated vregs.
usesPhysRegsForValues()501 virtual bool usesPhysRegsForValues() const { return true; }
502
503 /// True if the target wants to use interprocedural register allocation by
504 /// default. The -enable-ipra flag can be used to override this.
useIPRA()505 virtual bool useIPRA() const {
506 return false;
507 }
508
509 /// The default variant to use in unqualified `asm` instructions.
510 /// If this returns 0, `asm "$(foo$|bar$)"` will evaluate to `asm "foo"`.
unqualifiedInlineAsmVariant()511 virtual int unqualifiedInlineAsmVariant() const { return 0; }
512
513 // MachineRegisterInfo callback function
registerMachineRegisterInfoCallback(MachineFunction & MF)514 virtual void registerMachineRegisterInfoCallback(MachineFunction &MF) const {}
515 };
516
517 /// Helper method for getting the code model, returning Default if
518 /// CM does not have a value. The tiny and kernel models will produce
519 /// an error, so targets that support them or require more complex codemodel
520 /// selection logic should implement and call their own getEffectiveCodeModel.
521 inline CodeModel::Model
getEffectiveCodeModel(std::optional<CodeModel::Model> CM,CodeModel::Model Default)522 getEffectiveCodeModel(std::optional<CodeModel::Model> CM,
523 CodeModel::Model Default) {
524 if (CM) {
525 // By default, targets do not support the tiny and kernel models.
526 if (*CM == CodeModel::Tiny)
527 report_fatal_error("Target does not support the tiny CodeModel", false);
528 if (*CM == CodeModel::Kernel)
529 report_fatal_error("Target does not support the kernel CodeModel", false);
530 return *CM;
531 }
532 return Default;
533 }
534
535 } // end namespace llvm
536
537 #endif // LLVM_TARGET_TARGETMACHINE_H
538