• Top
    • Documentation
    • Books
    • Boolean-reasoning
    • Projects
    • Debugging
    • Std
      • Std/lists
      • Std/alists
      • Obags
      • Std/util
      • Std/strings
        • Pretty-printing
          • Pretty-printing-implementation
            • Missing-functionality
            • Printconfig
            • Cons-ppr1
            • Print-escaped-charlist
            • Atom-size
            • Print-escaped-str
            • Obj-size
            • Maybe-merge-flat
            • Ppr
            • Printer-instructions
            • Keyword-param-valuep
            • Print-flat-objs
            • Radix-print-int
            • Print-escaped-atom
            • Print-atom
            • Print-escaped-symbol
            • Radix-print-complex
            • Basic-print-complex
            • Radix-print-rat
            • Spaces1
            • Basic-print-rat
            • Basic-print-nat
            • Basic-print-int
            • Spaces
            • My-needs-slashes
              • Pinstlist->max-width
              • Nat-size
              • Special-term-num
              • Print-column
              • Print-base-fix
              • Int-size
              • Keyword-fix
              • Print-instruction
              • Pinst->width
              • In-home-package-p
              • Eviscerated->guts
              • Evisceratedp
              • Pprdot
            • Eviscerate
            • Pretty
            • Revappend-pretty
            • Pretty-list
          • Printtree
          • Base64
          • Charset-p
          • Strtok!
          • Cases
          • Concatenation
          • Html-encoding
          • Character-kinds
          • Substrings
          • Strtok
          • Equivalences
          • Url-encoding
          • Lines
          • Explode-implode-equalities
          • Ordering
          • Numbers
          • Pad-trim
          • Coercion
          • Std/strings/digit-to-char
          • Substitution
          • Symbols
        • Std/osets
        • Std/io
        • Std/basic
        • Std/system
        • Std/typed-lists
        • Std/bitsets
        • Std/testing
        • Std/typed-alists
        • Std/stobjs
      • Proof-automation
      • Macro-libraries
      • ACL2
      • Interfacing-tools
      • Hardware-verification
      • Software-verification
      • Math
      • Testing-utilities
    • Pretty-printing-implementation

    My-needs-slashes

    Signature
    (my-needs-slashes x config) → *
    Arguments
    x — Guard (stringp x).
    config — Guard (printconfig-p config).

    ACL2's similar function only checks whether we need symbols when print-escape or print-readably are set. I'm not going to bother with that, and just assume that we always want to escape symbols that need escaping.

    Definitions and Theorems

    Function: my-needs-slashes$inline

    (defun my-needs-slashes$inline (x config)
      (declare (xargs :guard (and (stringp x)
                                  (printconfig-p config))))
      (let ((acl2::__function__ 'my-needs-slashes))
        (declare (ignorable acl2::__function__))
        (acl2::may-need-slashes-fn x (printconfig->print-base config))))