anchor.diff:                         'test-pb:text-format-test
                          :stream (make-string-input-stream text))))
         (assert-equality #'proto:proto-equal msg msg-parse)
  -      (assert-equality #'string= text (second +double-nested-message+)))))
  +      (assert-equality #'string= text (second *double-nested-message*)))))
   
   
   
  
positive.code: symbol_field: ':t'
  symbol_field: ':nil'")
  
  (defconstant +double-nested-message+
    (list
     "int_field: 0
  one_level_nesting {
  
negative.code: (deftest test-parse-text-format (text-format-suite)
    (let ((msg (proto:parse-text-format
                'test-pb:text-format-test
                :stream (make-string-input-stream *text-format-msg*))))
      (assert-eql 100 (test-pb:int-field msg))
      (assert-eql -1 (test-pb:sint-field msg))
      (assert-eql 1 (test-pb:uint-field msg))
  