Tighten up the yamilizer so it stops eliding empty sequences if the embedded empty...
[opencl/llvm.git] / lib / Support / YAMLTraits.cpp
1 //===- lib/Support/YAMLTraits.cpp -----------------------------------------===//
2 //
3 //                             The LLVM Linker
4 //
5 // This file is distributed under the University of Illinois Open Source
6 // License. See LICENSE.TXT for details.
7 //
8 //===----------------------------------------------------------------------===//
10 #include "llvm/Support/YAMLTraits.h"
11 #include "llvm/ADT/Twine.h"
12 #include "llvm/Support/Casting.h"
13 #include "llvm/Support/ErrorHandling.h"
14 #include "llvm/Support/Format.h"
15 #include "llvm/Support/YAMLParser.h"
16 #include "llvm/Support/raw_ostream.h"
17 #include <cstring>
18 using namespace llvm;
19 using namespace yaml;
21 //===----------------------------------------------------------------------===//
22 //  IO
23 //===----------------------------------------------------------------------===//
25 IO::IO(void *Context) : Ctxt(Context) {
26 }
28 IO::~IO() {
29 }
31 void *IO::getContext() {
32   return Ctxt;
33 }
35 void IO::setContext(void *Context) {
36   Ctxt = Context;
37 }
39 //===----------------------------------------------------------------------===//
40 //  Input
41 //===----------------------------------------------------------------------===//
43 Input::Input(StringRef InputContent, void *Ctxt) 
44   : IO(Ctxt), 
45     Strm(new Stream(InputContent, SrcMgr)),
46     CurrentNode(NULL) {
47   DocIterator = Strm->begin();
48 }
50 Input::~Input() {
51   
52 }
54 error_code Input::error() {
55   return EC;
56 }
58 void Input::setDiagHandler(SourceMgr::DiagHandlerTy Handler, void *Ctxt) {
59   SrcMgr.setDiagHandler(Handler, Ctxt);
60 }
62 bool Input::outputting() {
63   return false;
64 }
66 bool Input::setCurrentDocument() {
67   if (DocIterator != Strm->end()) {
68     Node *N = DocIterator->getRoot();
69     if (isa<NullNode>(N)) {
70       // Empty files are allowed and ignored
71       ++DocIterator;
72       return setCurrentDocument();
73     }
74     TopNode.reset(this->createHNodes(N));
75     CurrentNode = TopNode.get();
76     return true;
77   }
78   return false;
79 }
81 void Input::nextDocument() {
82   ++DocIterator;
83 }
85 void Input::beginMapping() {
86   if (EC)
87     return;
88   MapHNode *MN = dyn_cast<MapHNode>(CurrentNode);
89   if (MN) {
90     MN->ValidKeys.clear();
91   }
92 }
94 bool Input::preflightKey(const char *Key, bool Required, bool, bool &UseDefault,
95                          void *&SaveInfo) {
96   UseDefault = false;
97   if (EC)
98     return false;
99   MapHNode *MN = dyn_cast<MapHNode>(CurrentNode);
100   if (!MN) {
101     setError(CurrentNode, "not a mapping");
102     return false;
103   }
104   MN->ValidKeys.push_back(Key);
105   HNode *Value = MN->Mapping[Key];
106   if (!Value) {
107     if (Required)
108       setError(CurrentNode, Twine("missing required key '") + Key + "'");
109     else
110       UseDefault = true;
111     return false;
112   }
113   SaveInfo = CurrentNode;
114   CurrentNode = Value;
115   return true;
118 void Input::postflightKey(void *saveInfo) {
119   CurrentNode = reinterpret_cast<HNode *>(saveInfo);
122 void Input::endMapping() {
123   if (EC)
124     return;
125   MapHNode *MN = dyn_cast<MapHNode>(CurrentNode);
126   if (!MN)
127     return;
128   for (MapHNode::NameToNode::iterator i = MN->Mapping.begin(),
129        End = MN->Mapping.end(); i != End; ++i) {
130     if (!MN->isValidKey(i->first())) {
131       setError(i->second, Twine("unknown key '") + i->first() + "'");
132       break;
133     }
134   }
137 unsigned Input::beginSequence() {
138   if (SequenceHNode *SQ = dyn_cast<SequenceHNode>(CurrentNode)) {
139     return SQ->Entries.size();
140   }
141   return 0;
144 void Input::endSequence() {
147 bool Input::preflightElement(unsigned Index, void *&SaveInfo) {
148   if (EC)
149     return false;
150   if (SequenceHNode *SQ = dyn_cast<SequenceHNode>(CurrentNode)) {
151     SaveInfo = CurrentNode;
152     CurrentNode = SQ->Entries[Index];
153     return true;
154   }
155   return false;
158 void Input::postflightElement(void *SaveInfo) {
159   CurrentNode = reinterpret_cast<HNode *>(SaveInfo);
162 unsigned Input::beginFlowSequence() {
163   if (SequenceHNode *SQ = dyn_cast<SequenceHNode>(CurrentNode)) {
164     return SQ->Entries.size();
165   }
166   return 0;
169 bool Input::preflightFlowElement(unsigned index, void *&SaveInfo) {
170   if (EC)
171     return false;
172   if (SequenceHNode *SQ = dyn_cast<SequenceHNode>(CurrentNode)) {
173     SaveInfo = CurrentNode;
174     CurrentNode = SQ->Entries[index];
175     return true;
176   }
177   return false;
180 void Input::postflightFlowElement(void *SaveInfo) {
181   CurrentNode = reinterpret_cast<HNode *>(SaveInfo);
184 void Input::endFlowSequence() {
187 void Input::beginEnumScalar() {
188   ScalarMatchFound = false;
191 bool Input::matchEnumScalar(const char *Str, bool) {
192   if (ScalarMatchFound)
193     return false;
194   if (ScalarHNode *SN = dyn_cast<ScalarHNode>(CurrentNode)) {
195     if (SN->value().equals(Str)) {
196       ScalarMatchFound = true;
197       return true;
198     }
199   }
200   return false;
203 void Input::endEnumScalar() {
204   if (!ScalarMatchFound) {
205     setError(CurrentNode, "unknown enumerated scalar");
206   }
209 bool Input::beginBitSetScalar(bool &DoClear) {
210   BitValuesUsed.clear();
211   if (SequenceHNode *SQ = dyn_cast<SequenceHNode>(CurrentNode)) {
212     BitValuesUsed.insert(BitValuesUsed.begin(), SQ->Entries.size(), false);
213   } else {
214     setError(CurrentNode, "expected sequence of bit values");
215   }
216   DoClear = true;
217   return true;
220 bool Input::bitSetMatch(const char *Str, bool) {
221   if (EC)
222     return false;
223   if (SequenceHNode *SQ = dyn_cast<SequenceHNode>(CurrentNode)) {
224     unsigned Index = 0;
225     for (std::vector<HNode *>::iterator i = SQ->Entries.begin(),
226          End = SQ->Entries.end(); i != End; ++i) {
227       if (ScalarHNode *SN = dyn_cast<ScalarHNode>(*i)) {
228         if (SN->value().equals(Str)) {
229           BitValuesUsed[Index] = true;
230           return true;
231         }
232       } else {
233         setError(CurrentNode, "unexpected scalar in sequence of bit values");
234       }
235       ++Index;
236     }
237   } else {
238     setError(CurrentNode, "expected sequence of bit values");
239   }
240   return false;
243 void Input::endBitSetScalar() {
244   if (EC)
245     return;
246   if (SequenceHNode *SQ = dyn_cast<SequenceHNode>(CurrentNode)) {
247     assert(BitValuesUsed.size() == SQ->Entries.size());
248     for (unsigned i = 0; i < SQ->Entries.size(); ++i) {
249       if (!BitValuesUsed[i]) {
250         setError(SQ->Entries[i], "unknown bit value");
251         return;
252       }
253     }
254   }
257 void Input::scalarString(StringRef &S) {
258   if (ScalarHNode *SN = dyn_cast<ScalarHNode>(CurrentNode)) {
259     S = SN->value();
260   } else {
261     setError(CurrentNode, "unexpected scalar");
262   }
265 void Input::setError(HNode *hnode, const Twine &message) {
266   this->setError(hnode->_node, message);
269 void Input::setError(Node *node, const Twine &message) {
270   Strm->printError(node, message);
271   EC = make_error_code(errc::invalid_argument);
274 Input::HNode *Input::createHNodes(Node *N) {
275   SmallString<128> StringStorage;
276   if (ScalarNode *SN = dyn_cast<ScalarNode>(N)) {
277     StringRef KeyStr = SN->getValue(StringStorage);
278     if (!StringStorage.empty()) {
279       // Copy string to permanent storage
280       unsigned Len = StringStorage.size();
281       char *Buf = StringAllocator.Allocate<char>(Len);
282       memcpy(Buf, &StringStorage[0], Len);
283       KeyStr = StringRef(Buf, Len);
284     }
285     return new ScalarHNode(N, KeyStr);
286   } else if (SequenceNode *SQ = dyn_cast<SequenceNode>(N)) {
287     SequenceHNode *SQHNode = new SequenceHNode(N);
288     for (SequenceNode::iterator i = SQ->begin(), End = SQ->end(); i != End;
289          ++i) {
290       HNode *Entry = this->createHNodes(i);
291       if (EC)
292         break;
293       SQHNode->Entries.push_back(Entry);
294     }
295     return SQHNode;
296   } else if (MappingNode *Map = dyn_cast<MappingNode>(N)) {
297     MapHNode *mapHNode = new MapHNode(N);
298     for (MappingNode::iterator i = Map->begin(), End = Map->end(); i != End;
299          ++i) {
300       ScalarNode *KeyScalar = dyn_cast<ScalarNode>(i->getKey());
301       StringStorage.clear();
302       StringRef KeyStr = KeyScalar->getValue(StringStorage);
303       if (!StringStorage.empty()) {
304         // Copy string to permanent storage
305         unsigned Len = StringStorage.size();
306         char *Buf = StringAllocator.Allocate<char>(Len);
307         memcpy(Buf, &StringStorage[0], Len);
308         KeyStr = StringRef(Buf, Len);
309       }
310       HNode *ValueHNode = this->createHNodes(i->getValue());
311       if (EC)
312         break;
313       mapHNode->Mapping[KeyStr] = ValueHNode;
314     }
315     return mapHNode;
316   } else if (isa<NullNode>(N)) {
317     return new EmptyHNode(N);
318   } else {
319     setError(N, "unknown node kind");
320     return NULL;
321   }
324 bool Input::MapHNode::isValidKey(StringRef Key) {
325   for (SmallVectorImpl<const char *>::iterator i = ValidKeys.begin(),
326        End = ValidKeys.end(); i != End; ++i) {
327     if (Key.equals(*i))
328       return true;
329   }
330   return false;
333 void Input::setError(const Twine &Message) {
334   this->setError(CurrentNode, Message);
337 bool Input::canElideEmptySequence() {
338   return false;
341 Input::MapHNode::~MapHNode() {
342   for (MapHNode::NameToNode::iterator i = Mapping.begin(), End = Mapping.end();
343                                                                 i != End; ++i) {
344     delete i->second;
345   }
348 Input::SequenceHNode::~SequenceHNode() {
349   for (std::vector<HNode*>::iterator i = Entries.begin(), End = Entries.end();
350                                                                 i != End; ++i) {
351     delete *i;
352   }
357 //===----------------------------------------------------------------------===//
358 //  Output
359 //===----------------------------------------------------------------------===//
361 Output::Output(raw_ostream &yout, void *context)
362     : IO(context),
363       Out(yout),
364       Column(0),
365       ColumnAtFlowStart(0),
366       NeedBitValueComma(false),
367       NeedFlowSequenceComma(false),
368       EnumerationMatchFound(false),
369       NeedsNewLine(false) {
372 Output::~Output() {
375 bool Output::outputting() {
376   return true;
379 void Output::beginMapping() {
380   StateStack.push_back(inMapFirstKey);
381   NeedsNewLine = true;
384 void Output::endMapping() {
385   StateStack.pop_back();
388 bool Output::preflightKey(const char *Key, bool Required, bool SameAsDefault,
389                           bool &UseDefault, void *&) {
390   UseDefault = false;
391   if (Required || !SameAsDefault) {
392     this->newLineCheck();
393     this->paddedKey(Key);
394     return true;
395   }
396   return false;
399 void Output::postflightKey(void *) {
400   if (StateStack.back() == inMapFirstKey) {
401     StateStack.pop_back();
402     StateStack.push_back(inMapOtherKey);
403   }
406 void Output::beginDocuments() {
407   this->outputUpToEndOfLine("---");
410 bool Output::preflightDocument(unsigned index) {
411   if (index > 0)
412     this->outputUpToEndOfLine("\n---");
413   return true;
416 void Output::postflightDocument() {
419 void Output::endDocuments() {
420   output("\n...\n");
423 unsigned Output::beginSequence() {
424   StateStack.push_back(inSeq);
425   NeedsNewLine = true;
426   return 0;
429 void Output::endSequence() {
430   StateStack.pop_back();
433 bool Output::preflightElement(unsigned, void *&) {
434   return true;
437 void Output::postflightElement(void *) {
440 unsigned Output::beginFlowSequence() {
441   StateStack.push_back(inFlowSeq);
442   this->newLineCheck();
443   ColumnAtFlowStart = Column;
444   output("[ ");
445   NeedFlowSequenceComma = false;
446   return 0;
449 void Output::endFlowSequence() {
450   StateStack.pop_back();
451   this->outputUpToEndOfLine(" ]");
454 bool Output::preflightFlowElement(unsigned, void *&) {
455   if (NeedFlowSequenceComma)
456     output(", ");
457   if (Column > 70) {
458     output("\n");
459     for (int i = 0; i < ColumnAtFlowStart; ++i)
460       output(" ");
461     Column = ColumnAtFlowStart;
462     output("  ");
463   }
464   return true;
467 void Output::postflightFlowElement(void *) {
468   NeedFlowSequenceComma = true;
471 void Output::beginEnumScalar() {
472   EnumerationMatchFound = false;
475 bool Output::matchEnumScalar(const char *Str, bool Match) {
476   if (Match && !EnumerationMatchFound) {
477     this->newLineCheck();
478     this->outputUpToEndOfLine(Str);
479     EnumerationMatchFound = true;
480   }
481   return false;
484 void Output::endEnumScalar() {
485   if (!EnumerationMatchFound)
486     llvm_unreachable("bad runtime enum value");
489 bool Output::beginBitSetScalar(bool &DoClear) {
490   this->newLineCheck();
491   output("[ ");
492   NeedBitValueComma = false;
493   DoClear = false;
494   return true;
497 bool Output::bitSetMatch(const char *Str, bool Matches) {
498   if (Matches) {
499     if (NeedBitValueComma)
500       output(", ");
501     this->output(Str);
502     NeedBitValueComma = true;
503   }
504   return false;
507 void Output::endBitSetScalar() {
508   this->outputUpToEndOfLine(" ]");
511 void Output::scalarString(StringRef &S) {
512   this->newLineCheck();
513   if (S.find('\n') == StringRef::npos) {
514     // No embedded new-line chars, just print string.
515     this->outputUpToEndOfLine(S);
516     return;
517   }
518   unsigned i = 0;
519   unsigned j = 0;
520   unsigned End = S.size();
521   output("'"); // Starting single quote.
522   const char *Base = S.data();
523   while (j < End) {
524     // Escape a single quote by doubling it.
525     if (S[j] == '\'') {
526       output(StringRef(&Base[i], j - i + 1));
527       output("'");
528       i = j + 1;
529     }
530     ++j;
531   }
532   output(StringRef(&Base[i], j - i));
533   this->outputUpToEndOfLine("'"); // Ending single quote.
536 void Output::setError(const Twine &message) {
539 bool Output::canElideEmptySequence() {
540   // Normally, with an optional key/value where the value is an empty sequence,
541   // the whole key/value can be not written.  But, that produces wrong yaml
542   // if the key/value is the only thing in the map and the map is used in
543   // a sequence.  This detects if the this sequence is the first key/value
544   // in map that itself is embedded in a sequnce.
545   if (StateStack.size() < 2) 
546     return true;
547   if (StateStack.back() != inMapFirstKey) 
548     return true;
549   return (StateStack[StateStack.size()-2] != inSeq);
552 void Output::output(StringRef s) {
553   Column += s.size();
554   Out << s;
557 void Output::outputUpToEndOfLine(StringRef s) {
558   this->output(s);
559   if (StateStack.empty() || StateStack.back() != inFlowSeq)
560     NeedsNewLine = true;
563 void Output::outputNewLine() {
564   Out << "\n";
565   Column = 0;
568 // if seq at top, indent as if map, then add "- "
569 // if seq in middle, use "- " if firstKey, else use "  "
570 //
572 void Output::newLineCheck() {
573   if (!NeedsNewLine)
574     return;
575   NeedsNewLine = false;
577   this->outputNewLine();
579   assert(StateStack.size() > 0);
580   unsigned Indent = StateStack.size() - 1;
581   bool OutputDash = false;
583   if (StateStack.back() == inSeq) {
584     OutputDash = true;
585   } else if ((StateStack.size() > 1) && (StateStack.back() == inMapFirstKey) &&
586              (StateStack[StateStack.size() - 2] == inSeq)) {
587     --Indent;
588     OutputDash = true;
589   }
591   for (unsigned i = 0; i < Indent; ++i) {
592     output("  ");
593   }
594   if (OutputDash) {
595     output("- ");
596   }
600 void Output::paddedKey(StringRef key) {
601   output(key);
602   output(":");
603   const char *spaces = "                ";
604   if (key.size() < strlen(spaces))
605     output(&spaces[key.size()]);
606   else
607     output(" ");
610 //===----------------------------------------------------------------------===//
611 //  traits for built-in types
612 //===----------------------------------------------------------------------===//
614 void ScalarTraits<bool>::output(const bool &Val, void *, raw_ostream &Out) {
615   Out << (Val ? "true" : "false");
618 StringRef ScalarTraits<bool>::input(StringRef Scalar, void *, bool &Val) {
619   if (Scalar.equals("true")) {
620     Val = true;
621     return StringRef();
622   } else if (Scalar.equals("false")) {
623     Val = false;
624     return StringRef();
625   }
626   return "invalid boolean";
629 void ScalarTraits<StringRef>::output(const StringRef &Val, void *,
630                                      raw_ostream &Out) {
631   Out << Val;
634 StringRef ScalarTraits<StringRef>::input(StringRef Scalar, void *,
635                                          StringRef &Val) {
636   Val = Scalar;
637   return StringRef();
640 void ScalarTraits<uint8_t>::output(const uint8_t &Val, void *,
641                                    raw_ostream &Out) {
642   // use temp uin32_t because ostream thinks uint8_t is a character
643   uint32_t Num = Val;
644   Out << Num;
647 StringRef ScalarTraits<uint8_t>::input(StringRef Scalar, void *, uint8_t &Val) {
648   unsigned long long n;
649   if (getAsUnsignedInteger(Scalar, 0, n))
650     return "invalid number";
651   if (n > 0xFF)
652     return "out of range number";
653   Val = n;
654   return StringRef();
657 void ScalarTraits<uint16_t>::output(const uint16_t &Val, void *,
658                                     raw_ostream &Out) {
659   Out << Val;
662 StringRef ScalarTraits<uint16_t>::input(StringRef Scalar, void *,
663                                         uint16_t &Val) {
664   unsigned long long n;
665   if (getAsUnsignedInteger(Scalar, 0, n))
666     return "invalid number";
667   if (n > 0xFFFF)
668     return "out of range number";
669   Val = n;
670   return StringRef();
673 void ScalarTraits<uint32_t>::output(const uint32_t &Val, void *,
674                                     raw_ostream &Out) {
675   Out << Val;
678 StringRef ScalarTraits<uint32_t>::input(StringRef Scalar, void *,
679                                         uint32_t &Val) {
680   unsigned long long n;
681   if (getAsUnsignedInteger(Scalar, 0, n))
682     return "invalid number";
683   if (n > 0xFFFFFFFFUL)
684     return "out of range number";
685   Val = n;
686   return StringRef();
689 void ScalarTraits<uint64_t>::output(const uint64_t &Val, void *,
690                                     raw_ostream &Out) {
691   Out << Val;
694 StringRef ScalarTraits<uint64_t>::input(StringRef Scalar, void *,
695                                         uint64_t &Val) {
696   unsigned long long N;
697   if (getAsUnsignedInteger(Scalar, 0, N))
698     return "invalid number";
699   Val = N;
700   return StringRef();
703 void ScalarTraits<int8_t>::output(const int8_t &Val, void *, raw_ostream &Out) {
704   // use temp in32_t because ostream thinks int8_t is a character
705   int32_t Num = Val;
706   Out << Num;
709 StringRef ScalarTraits<int8_t>::input(StringRef Scalar, void *, int8_t &Val) {
710   long long N;
711   if (getAsSignedInteger(Scalar, 0, N))
712     return "invalid number";
713   if ((N > 127) || (N < -128))
714     return "out of range number";
715   Val = N;
716   return StringRef();
719 void ScalarTraits<int16_t>::output(const int16_t &Val, void *,
720                                    raw_ostream &Out) {
721   Out << Val;
724 StringRef ScalarTraits<int16_t>::input(StringRef Scalar, void *, int16_t &Val) {
725   long long N;
726   if (getAsSignedInteger(Scalar, 0, N))
727     return "invalid number";
728   if ((N > INT16_MAX) || (N < INT16_MIN))
729     return "out of range number";
730   Val = N;
731   return StringRef();
734 void ScalarTraits<int32_t>::output(const int32_t &Val, void *,
735                                    raw_ostream &Out) {
736   Out << Val;
739 StringRef ScalarTraits<int32_t>::input(StringRef Scalar, void *, int32_t &Val) {
740   long long N;
741   if (getAsSignedInteger(Scalar, 0, N))
742     return "invalid number";
743   if ((N > INT32_MAX) || (N < INT32_MIN))
744     return "out of range number";
745   Val = N;
746   return StringRef();
749 void ScalarTraits<int64_t>::output(const int64_t &Val, void *,
750                                    raw_ostream &Out) {
751   Out << Val;
754 StringRef ScalarTraits<int64_t>::input(StringRef Scalar, void *, int64_t &Val) {
755   long long N;
756   if (getAsSignedInteger(Scalar, 0, N))
757     return "invalid number";
758   Val = N;
759   return StringRef();
762 void ScalarTraits<double>::output(const double &Val, void *, raw_ostream &Out) {
763   Out << format("%g", Val);
766 StringRef ScalarTraits<double>::input(StringRef Scalar, void *, double &Val) {
767   SmallString<32> buff(Scalar.begin(), Scalar.end());
768   char *end;
769   Val = strtod(buff.c_str(), &end);
770   if (*end != '\0')
771     return "invalid floating point number";
772   return StringRef();
775 void ScalarTraits<float>::output(const float &Val, void *, raw_ostream &Out) {
776   Out << format("%g", Val);
779 StringRef ScalarTraits<float>::input(StringRef Scalar, void *, float &Val) {
780   SmallString<32> buff(Scalar.begin(), Scalar.end());
781   char *end;
782   Val = strtod(buff.c_str(), &end);
783   if (*end != '\0')
784     return "invalid floating point number";
785   return StringRef();
788 void ScalarTraits<Hex8>::output(const Hex8 &Val, void *, raw_ostream &Out) {
789   uint8_t Num = Val;
790   Out << format("0x%02X", Num);
793 StringRef ScalarTraits<Hex8>::input(StringRef Scalar, void *, Hex8 &Val) {
794   unsigned long long n;
795   if (getAsUnsignedInteger(Scalar, 0, n))
796     return "invalid hex8 number";
797   if (n > 0xFF)
798     return "out of range hex8 number";
799   Val = n;
800   return StringRef();
803 void ScalarTraits<Hex16>::output(const Hex16 &Val, void *, raw_ostream &Out) {
804   uint16_t Num = Val;
805   Out << format("0x%04X", Num);
808 StringRef ScalarTraits<Hex16>::input(StringRef Scalar, void *, Hex16 &Val) {
809   unsigned long long n;
810   if (getAsUnsignedInteger(Scalar, 0, n))
811     return "invalid hex16 number";
812   if (n > 0xFFFF)
813     return "out of range hex16 number";
814   Val = n;
815   return StringRef();
818 void ScalarTraits<Hex32>::output(const Hex32 &Val, void *, raw_ostream &Out) {
819   uint32_t Num = Val;
820   Out << format("0x%08X", Num);
823 StringRef ScalarTraits<Hex32>::input(StringRef Scalar, void *, Hex32 &Val) {
824   unsigned long long n;
825   if (getAsUnsignedInteger(Scalar, 0, n))
826     return "invalid hex32 number";
827   if (n > 0xFFFFFFFFUL)
828     return "out of range hex32 number";
829   Val = n;
830   return StringRef();
833 void ScalarTraits<Hex64>::output(const Hex64 &Val, void *, raw_ostream &Out) {
834   uint64_t Num = Val;
835   Out << format("0x%016llX", Num);
838 StringRef ScalarTraits<Hex64>::input(StringRef Scalar, void *, Hex64 &Val) {
839   unsigned long long Num;
840   if (getAsUnsignedInteger(Scalar, 0, Num))
841     return "invalid hex64 number";
842   Val = Num;
843   return StringRef();