Ticket #1042: numbers-syntax-add-self-evaluating-vectors.patch

File numbers-syntax-add-self-evaluating-vectors.patch, 455 bytes (added by evhan, 11 years ago)

  • numbers-syntax.scm

     
    3939            (string? x)
    4040            (boolean? x)
    4141            (eof-object? x)
     42            (vector? x)
     43            (##sys#srfi-4-vector? x)
    4244            (and (pair? x) (eq? 'quote (car x))) )))
    4345
    4446;; XXX TODO: Maybe override ##compiler#collapsable-literal? too?