-- | We may fail due to symbol-lookup miss
formatAddr :: SymbolTable -> AddrInstruction -> Maybe Text
formatAddr table (AddrLiteral lit) =
  Just (toBinaryString lit)
formatAddr :: SymbolTable -> AddrInstruction -> Maybe Text
formatAddr table (AddrLiteral lit) =
  Just (toBinaryString lit)
formatAddr table (AddrLiteral lit) =
  Just (toBinaryString lit)