I was digging inside the Iconize
implementation a little bit and saw that there's a function BoxForm`BoxFormAutoLoad
which loads the FormatValues
for objects.
For the most part it's boring, but one interesting function that I saw in it was Internal`WithTimeStamps
. A sample usage of BoxForm`BoxFormAutoLoad
is:
BoxForm`BoxFormAutoLoad[MakeBoxes,
IconizedObject["asd"],
StandardForm,
"NotebookTools`Iconize`",
{{IconizedObject, _}},
Hold[IconizedObject]
]
And tracking the WithTimeStamps
call inside we see it's running:
Internal`WithTimestampsPreserved[
{IconizedObject},
Apply[
(BoxForm`wasProtected = Unprotect[#1];
(* Uninteresting Which block removed *);
Protect[Evaluate[BoxForm`wasProtected]]) &,
{{IconizedObject, _}},
{1}
];
DumpGet[System`Private`$SystemFileDir <>
System`Dump`fixfile["NotebookTools`Iconize`"] <> "x"];
]
Running this seems to do nothing interesting so I'm wondering why it exists and in what way there are "Timestamps" in the call.