#lang racket/base
(require "json-grammar.rkt")
(require "json-lexer.rkt")
(syntax->datum
(parse
(tokenize (open-input-string #<<EOF
[
{"thread": "0000000000031e50", "timestamp": 1358008026, "date_relative": "35 mins. ago", "matched": 1, "total": 1, "authors": "Debian Bug Tracking System", "subject": "Processed: tagging as pending bugs that are closed by packages in NEW", "tags": ["inbox", "inbox::debian", "unread"]},
{"thread": "0000000000031e55", "timestamp": 1358006945, "date_relative": "53 mins. ago", "matched": 1, "total": 1, "authors": "Debian Bug Tracking System", "subject": "Processed: bug 697993 is forwarded to http://rt.cpan.org/Public/Bug/Display.html?id=82660", "tags": ["inbox", "inbox::debian", "unread"]}]
EOF
))))