(
(23
  (18 1)
  (13 ())
  (23
    (18 1)
    (23
      (18 2)
      (14 0 0 x)
      (7)
      (21 () 962)
      (14 0 1 y)
      (25)
      962
      (14 0 0 x)
      (1)
      (14 0 0 x)
      (0)
      (14 0 1 y)
      (2)
      (14 1 0 rev)
      (24 2)
      (name rev)
    )
    (15 0 0 rev)
    (26)
    (14 1 0 x)
    (13 ())
    (14 0 0 rev)
    (24 2)
    (name ())
  )
  (24 1)
  (name reverse)
)
(17 reverse)
(26)
(23
  (83 0)
  (13 ())
  (13 ())
  (13 ())
  (23
    (18 3)
    (23
      (18 2)
      (14 0 0 list1)
      (7)
      (21 () 965)
      (14 0 1 list2)
      (25)
      965
      (14 0 0 list1)
      (0)
      (22 () 964)
      (14 0 0 list1)
      (1)
      (14 0 1 list2)
      (14 1 0 append-two)
      (24 2)
      964
      (2)
      (25)
      (name append-two)
    )
    (15 0 0 append-two)
    (26)
    (23
      (18 1)
      (22 () 967)
      (14 0 0 l)
      (7)
      (23
        (18 1)
        (14 0 0 g:::46)
        (21 () 968)
        (14 0 0 g:::46)
        (25)
        968
        (14 1 0 l)
        (81)
        (25)
        (name ())
      )
      (24 1)
      967
      (8)
      (25)
      (name improper-list?)
    )
    (15 0 1 improper-list?)
    (26)
    (23
      (18 3)
      (14 0 2 seq)
      (7)
      (21 () 980)
      (14 0 1 init)
      (25)
      980
      (14 0 2 seq)
      (0)
      (7)
      (21 () 978)
      (14 0 2 seq)
      (11)
      (25)
      978
      (14 0 2 seq)
      (1)
      (7)
      (21 () 976)
      (14 0 2 seq)
      (0)
      (14 0 2 seq)
      (1)
      (14 1 0 append-two)
      (24 2)
      976
      (14 0 2 seq)
      (1)
      (81)
      (21 () 974)
      (22 () 970)
      (14 0 2 seq)
      (11)
      (1)
      (14 1 1 improper-list?)
      (24 1)
      970
      (21 () 972)
      (14 0 2 seq)
      (0)
      (14 0 2 seq)
      (11)
      (14 1 0 append-two)
      (24 2)
      972
      (14 0 2 seq)
      (0)
      (22 () 971)
      (14 0 0 f)
      (14 0 1 init)
      (14 0 2 seq)
      (1)
      (14 1 2 fold-right-append)
      (24 3)
      971
      (14 0 0 f)
      (24 2)
      974
      (14 0 2 seq)
      (0)
      (14 0 2 seq)
      (1)
      (14 1 0 append-two)
      (24 2)
      (name fold-right-append)
    )
    (15 0 2 fold-right-append)
    (26)
    (14 1 0 lsts)
    (7)
    (21 () 984)
    (13 ())
    (25)
    984
    (14 1 0 lsts)
    (1)
    (7)
    (21 () 982)
    (14 1 0 lsts)
    (0)
    (25)
    982
    (23
      (18 2)
      (14 0 0 sublist)
      (14 0 1 acc)
      (14 1 0 append-two)
      (24 2)
      (name ())
    )
    (13 ())
    (14 1 0 lsts)
    (14 0 2 fold-right-append)
    (24 3)
    (name ())
  )
  (24 3)
  (name append)
)
(17 append)
(26)
(23
  (18 2)
  (14 0 0 x)
  (78)
  (14 0 1 y)
  (78)
  (50)
  (25)
  (name char<=?)
)
(17 char<=?)
(26)
(23
  (18 2)
  (14 0 0 x)
  (78)
  (14 0 1 y)
  (78)
  (52)
  (25)
  (name char>=?)
)
(17 char>=?)
(26)
(23
  (18 1)
  (14 0 0 l)
  (31)
  (23
    (18 1)
    (14 0 0 size)
    (73)
    (23
      (18 1)
      (22 () 986)
      (13 ())
      (23
        (18 1)
        (23
          (18 1)
          (14 0 0 i)
          (14 3 0 size)
          (47)
          (21 () 987)
          (13 ())
          (25)
          987
          (14 2 0 v)
          (14 0 0 i)
          (14 4 0 l)
          (0)
          (37)
          (26)
          (14 4 0 l)
          (1)
          (15 4 0 l)
          (26)
          (14 0 0 i)
          (13 1)
          (42)
          (14 1 0 loop)
          (24 1)
          (name loop)
        )
        (15 0 0 loop)
        (26)
        (13 0)
        (14 0 0 loop)
        (24 1)
        (name ())
      )
      (24 1)
      986
      (26)
      (14 0 0 v)
      (25)
      (name ())
    )
    (24 1)
    (name ())
  )
  (24 1)
  (name list->vector)
)
(17 list->vector)
(26)
(23
  (18 2)
  (14 0 0 x)
  (68)
  (14 0 1 y)
  (68)
  (42)
  (66)
  (23
    (18 1)
    (22 () 989)
    (13 0)
    (14 1 0 x)
    (68)
    (22 () 990)
    (13 ())
    (23
      (18 1)
      (23
        (18 2)
        (14 0 0 index)
        (14 0 1 size)
        (49)
        (21 () 991)
        (14 2 0 z)
        (14 0 0 index)
        (14 3 0 x)
        (14 0 0 index)
        (57)
        (58)
        (26)
        (14 0 0 index)
        (13 1)
        (42)
        (14 0 1 size)
        (14 1 0 loop)
        (24 2)
        991
        (13 ())
        (25)
        (name loop)
      )
      (15 0 0 loop)
      (26)
      (14 0 0 loop)
      (25)
      (name ())
    )
    (24 1)
    990
    (24 2)
    989
    (26)
    (22 () 993)
    (13 0)
    (14 1 1 y)
    (68)
    (22 () 994)
    (13 ())
    (23
      (18 1)
      (23
        (18 2)
        (14 0 0 index)
        (14 0 1 size)
        (49)
        (21 () 995)
        (14 2 0 z)
        (14 0 0 index)
        (14 3 0 x)
        (68)
        (42)
        (14 3 1 y)
        (14 0 0 index)
        (57)
        (58)
        (26)
        (14 0 0 index)
        (13 1)
        (42)
        (14 0 1 size)
        (14 1 0 loop)
        (24 2)
        995
        (13 ())
        (25)
        (name loop)
      )
      (15 0 0 loop)
      (26)
      (14 0 0 loop)
      (25)
      (name ())
    )
    (24 1)
    994
    (24 2)
    993
    (26)
    (14 0 0 z)
    (25)
    (name ())
  )
  (24 1)
  (name string-append)
)
(17 string-append)
(26)
(23
  (18 1)
  (13 ())
  (13 ())
  (13 ())
  (23
    (18 3)
    (14 1 0 charlist)
    (31)
    (15 0 0 len)
    (26)
    (14 0 0 len)
    (66)
    (15 0 1 newstr)
    (26)
    (23
      (18 4)
      (14 0 1 i)
      (14 0 2 len)
      (47)
      (21 () 997)
      (14 0 0 str)
      (25)
      997
      (14 0 0 str)
      (14 0 1 i)
      (14 0 3 charlist)
      (0)
      (58)
      (26)
      (14 0 0 str)
      (14 0 1 i)
      (13 1)
      (42)
      (14 0 2 len)
      (14 0 3 charlist)
      (1)
      (14 1 2 fill-string!)
      (24 4)
      (name fill-string!)
    )
    (15 0 2 fill-string!)
    (26)
    (14 0 1 newstr)
    (13 0)
    (14 0 0 len)
    (14 1 0 charlist)
    (14 0 2 fill-string!)
    (24 4)
    (name ())
  )
  (24 3)
  (name list->string)
)
(17 list->string)
(26)
(23
  (18 1)
  (14 0 0 s)
  (68)
  (13 1)
  (43)
  (13 ())
  (22 () 999)
  (13 ())
  (23
    (18 1)
    (23
      (18 2)
      (14 0 0 n)
      (13 -1)
      (47)
      (21 () 1000)
      (14 0 1 l)
      (25)
      1000
      (14 0 0 n)
      (13 1)
      (43)
      (14 2 0 s)
      (14 0 0 n)
      (57)
      (14 0 1 l)
      (2)
      (14 1 0 loop)
      (24 2)
      (name loop)
    )
    (15 0 0 loop)
    (26)
    (14 0 0 loop)
    (25)
    (name ())
  )
  (24 1)
  999
  (24 2)
  (name string->list)
)
(17 string->list)
(26)
(23
  (18 0)
  (13 ())
  (13 ())
  (13 ())
  (13 ())
  (13 ())
  (13 ())
  (13 ())
  (13 ())
  (13 ())
  (13 ())
  (13 ())
  (13 ())
  (13 ())
  (13 ())
  (13 ())
  (13 ())
  (13 ())
  (13 ())
  (13 ())
  (13 ())
  (13 ())
  (13 ())
  (13 ())
  (13 ())
  (13 ())
  (13 ())
  (13 ())
  (13 ())
  (13 ())
  (13 ())
  (13 ())
  (13 ())
  (13 ())
  (13 ())
  (13 ())
  (13 ())
  (13 ())
  (13 ())
  (13 ())
  (13 ())
  (13 ())
  (13 ())
  (13 ())
  (13 ())
  (13 ())
  (13 ())
  (13 ())
  (13 ())
  (13 ())
  (13 ())
  (13 ())
  (13 ())
  (13 ())
  (13 ())
  (13 ())
  (13 ())
  (13 ())
  (13 ())
  (13 ())
  (13 ())
  (13 ())
  (13 ())
  (13 ())
  (13 ())
  (13 ())
  (13 ())
  (13 ())
  (13 ())
  (13 ())
  (13 ())
  (13 ())
  (13 ())
  (13 ())
  (13 ())
  (13 ())
  (13 ())
  (13 ())
  (13 ())
  (13 ())
  (13 ())
  (13 ())
  (13 ())
  (13 ())
  (13 ())
  (13 ())
  (13 ())
  (13 ())
  (13 ())
  (13 ())
  (13 ())
  (13 ())
  (13 ())
  (13 ())
  (13 ())
  (13 ())
  (13 ())
  (13 ())
  (13 ())
  (13 ())
  (13 ())
  (13 ())
  (13 ())
  (13 ())
  (13 ())
  (13 ())
  (13 ())
  (13 ())
  (13 ())
  (13 ())
  (13 ())
  (13 ())
  (13 ())
  (13 ())
  (13 ())
  (13 ())
  (13 ())
  (13 ())
  (13 ())
  (13 ())
  (13 ())
  (13 ())
  (13 ())
  (13 ())
  (13 ())
  (13 ())
  (13 ())
  (13 ())
  (13 ())
  (13 ())
  (13 ())
  (13 ())
  (13 ())
  (13 ())
  (13 ())
  (13 ())
  (23
    (18 135)
    (13 ())
    (15 0 0 eof-char)
    (26)
    (13 ())
    (15 0 1 tab-char)
    (26)
    (13 ())
    (15 0 2 carriage-return)
    (26)
    (13 ())
    (15 0 3 white-space)
    (26)
    (13 ())
    (15 0 4 comments)
    (26)
    (22 () 0)
    (56)
    (13 #\space)
    (13 1)
    (23
      (18 3)
      (13 ())
      (13 ())
      (13 ())
      (13 ())
      (13 ())
      (13 ())
      (13 ())
      (13 ())
      (13 ())
      (13 ())
      (13 ())
      (13 ())
      (13 ())
      (13 ())
      (13 ())
      (13 ())
      (13 ())
      (13 ())
      (13 ())
      (13 ())
      (13 ())
      (13 ())
      (13 ())
      (13 ())
      (13 ())
      (13 ())
      (23
        (18 26)
        (13 (#\( #\) #\[ #\] #\, #\< #\> #\; #\: #\= #\+ #\- #\* #\/ #\% #\& #\^ #\| #\~ #\{ #\} #\! #\# #\.))
        (15 0 0 separators)
        (26)
        (13 ((#\= #\=) (#\! #\=) (#\< #\=) (#\> #\=) (#\> #\>) (#\< #\<) (#\+ #\+) (#\- #\-) (#\& #\&) (#\| #\|)))
        (15 0 1 two-character-separators)
        (26)
        (13 ())
        (15 0 2 token)
        (26)
        (23
          (18 0)
          (14 2 0 lookahead-ch)
          (25)
          (name lookahead-c-ch)
        )
        (15 0 3 lookahead-c-ch)
        (26)
        (23
          (18 1)
          (14 0 0 ch)
          (63)
          (23
            (18 1)
            (14 0 0 g:::0)
            (21 () 1)
            (14 0 0 g:::0)
            (25)
            1
            (14 1 0 ch)
            (62)
            (25)
            (name ())
          )
          (24 1)
          (name char-alpha-numeric?)
        )
        (15 0 4 char-alpha-numeric?)
        (26)
        (23
          (18 1)
          (14 0 0 ch)
          (62)
          (23
            (18 1)
            (14 0 0 g:::1)
            (21 () 12)
            (14 0 0 g:::1)
            (25)
            12
            (22 () 3)
            (14 1 0 ch)
            (13 #\a)
            (16 char>=?)
            (24 2)
            3
            (21 () 5)
            (22 () 4)
            (14 1 0 ch)
            (13 #\f)
            (16 char<=?)
            (24 2)
            4
            (19 () 6)
            5
            (13 #f)
            6
            (23
              (18 1)
              (14 0 0 g:::2)
              (21 () 10)
              (14 0 0 g:::2)
              (25)
              10
              (22 () 7)
              (14 2 0 ch)
              (13 #\A)
              (16 char>=?)
              (24 2)
              7
              (21 () 8)
              (14 2 0 ch)
              (13 #\F)
              (16 char<=?)
              (24 2)
              8
              (13 #f)
              (25)
              (name ())
            )
            (24 1)
            (name ())
          )
          (24 1)
          (name char-hex?)
        )
        (15 0 5 char-hex?)
        (26)
        (23
          (18 0)
          (14 2 0 lookahead-ch)
          (15 2 1 ch)
          (26)
          (56)
          (15 2 0 lookahead-ch)
          (26)
          (22 () 14)
          (14 2 1 ch)
          (38)
          (23
            (18 1)
            (14 0 0 g:::3)
            (21 () 15)
            (14 0 0 g:::3)
            (25)
            15
            (14 3 1 ch)
            (13 #\$)
            (61)
            (25)
            (name ())
          )
          (24 1)
          14
          (21 () 17)
          (14 3 0 eof-char)
          (15 2 1 ch)
          (26)
          (19 () 18)
          17
          18
          (14 2 1 ch)
          (14 3 3 white-space)
          (28)
          (21 () 21)
          (14 2 1 ch)
          (13 #\newline)
          (61)
          (21 () 19)
          (14 2 2 line-count)
          (13 1)
          (42)
          (15 2 2 line-count)
          (26)
          (19 () 20)
          19
          20
          (13 #\space)
          (15 2 1 ch)
          (25)
          21
          (13 ())
          (25)
          (name read-c-ch-or-dollar-eof)
        )
        (15 0 6 read-c-ch-or-dollar-eof)
        (26)
        (23
          (18 0)
          (14 2 0 lookahead-ch)
          (15 2 1 ch)
          (26)
          (56)
          (15 2 0 lookahead-ch)
          (26)
          (14 2 1 ch)
          (38)
          (21 () 23)
          (14 3 0 eof-char)
          (15 2 1 ch)
          (26)
          (19 () 24)
          23
          24
          (14 2 1 ch)
          (14 3 3 white-space)
          (28)
          (21 () 27)
          (14 2 1 ch)
          (13 #\newline)
          (61)
          (21 () 25)
          (14 2 2 line-count)
          (13 1)
          (42)
          (15 2 2 line-count)
          (26)
          (19 () 26)
          25
          26
          (13 #\space)
          (15 2 1 ch)
          (25)
          27
          (13 ())
          (25)
          (name read-c-ch)
        )
        (15 0 7 read-c-ch)
        (26)
        (23
          (18 0)
          (14 2 1 ch)
          (14 3 0 eof-char)
          (61)
          (21 () 32)
          (13 ())
          (25)
          32
          (14 2 1 ch)
          (13 #\space)
          (61)
          (21 () 30)
          (22 () 29)
          (14 1 6 read-c-ch-or-dollar-eof)
          (24 0)
          29
          (26)
          (14 1 8 skip-blanks)
          (24 0)
          30
          (13 #f)
          (25)
          (name skip-blanks)
        )
        (15 0 8 skip-blanks)
        (26)
        (23
          (18 1)
          (14 0 0 ch)
          (14 3 4 comments)
          (2)
          (15 3 4 comments)
          (25)
          (name log-comment-char)
        )
        (15 0 9 log-comment-char)
        (26)
        (23
          (18 0)
          (22 () 34)
          (14 1 3 lookahead-c-ch)
          (24 0)
          34
          (14 3 0 eof-char)
          (61)
          (21 () 41)
          (13 ())
          (25)
          41
          (22 () 35)
          (14 1 3 lookahead-c-ch)
          (24 0)
          35
          (13 #\newline)
          (61)
          (21 () 39)
          (22 () 36)
          (14 1 7 read-c-ch)
          (24 0)
          36
          (26)
          (14 1 8 skip-blanks)
          (24 0)
          39
          (22 () 37)
          (14 1 7 read-c-ch)
          (24 0)
          37
          (26)
          (22 () 38)
          (14 2 1 ch)
          (14 1 9 log-comment-char)
          (24 1)
          38
          (26)
          (14 1 10 skip-comment)
          (24 0)
          (name skip-comment)
        )
        (15 0 10 skip-comment)
        (26)
        (23
          (18 0)
          (14 2 1 ch)
          (13 #\/)
          (61)
          (21 () 44)
          (22 () 43)
          (14 1 3 lookahead-c-ch)
          (24 0)
          43
          (13 #\/)
          (61)
          (19 () 45)
          44
          (13 #f)
          45
          (21 () 48)
          (22 () 46)
          (14 1 7 read-c-ch)
          (24 0)
          46
          (26)
          (22 () 47)
          (14 1 10 skip-comment)
          (24 0)
          47
          (26)
          (14 1 11 skip-comments)
          (24 0)
          48
          (13 ())
          (25)
          (name skip-comments)
        )
        (15 0 11 skip-comments)
        (26)
        (23
          (18 0)
          (14 2 1 ch)
          (14 1 2 token)
          (2)
          (15 1 2 token)
          (26)
          (14 1 7 read-c-ch)
          (24 0)
          (name add-ch-to-token)
        )
        (15 0 12 add-ch-to-token)
        (26)
        (23
          (18 0)
          (22 () 50)
          (22 () 51)
          (14 2 1 ch)
          (14 1 4 char-alpha-numeric?)
          (24 1)
          51
          (23
            (18 1)
            (14 0 0 g:::4)
            (21 () 52)
            (14 0 0 g:::4)
            (25)
            52
            (14 3 1 ch)
            (13 #\_)
            (61)
            (25)
            (name ())
          )
          (24 1)
          50
          (21 () 55)
          (22 () 54)
          (14 1 12 add-ch-to-token)
          (24 0)
          54
          (26)
          (14 1 13 build-symbol-token)
          (24 0)
          55
          (13 ())
          (25)
          (name build-symbol-token)
        )
        (15 0 13 build-symbol-token)
        (26)
        (23
          (18 0)
          (14 2 1 ch)
          (14 3 0 eof-char)
          (61)
          (21 () 73)
          (13 ())
          (25)
          73
          (14 2 1 ch)
          (13 #\\)
          (61)
          (21 () 71)
          (22 () 57)
          (14 1 7 read-c-ch)
          (24 0)
          57
          (26)
          (14 2 1 ch)
          (13 #\n)
          (61)
          (21 () 58)
          (13 10)
          (79)
          (15 2 1 ch)
          (26)
          (19 () 59)
          58
          59
          (22 () 60)
          (14 1 12 add-ch-to-token)
          (24 0)
          60
          (26)
          (14 1 14 build-string-token)
          (24 0)
          71
          (14 2 1 ch)
          (13 #\%)
          (61)
          (21 () 69)
          (22 () 61)
          (14 1 12 add-ch-to-token)
          (24 0)
          61
          (26)
          (14 2 1 ch)
          (13 #\%)
          (61)
          (21 () 63)
          (22 () 62)
          (14 1 7 read-c-ch)
          (24 0)
          62
          (26)
          (19 () 64)
          63
          64
          (22 () 65)
          (14 1 12 add-ch-to-token)
          (24 0)
          65
          (26)
          (14 1 14 build-string-token)
          (24 0)
          69
          (14 2 1 ch)
          (13 #\")
          (61)
          (21 () 67)
          (14 1 6 read-c-ch-or-dollar-eof)
          (24 0)
          67
          (22 () 66)
          (14 1 12 add-ch-to-token)
          (24 0)
          66
          (26)
          (14 1 14 build-string-token)
          (24 0)
          (name build-string-token)
        )
        (15 0 14 build-string-token)
        (26)
        (23
          (18 1)
          (22 () 75)
          (14 0 0 ch)
          (13 #\a)
          (16 char>=?)
          (24 2)
          75
          (21 () 77)
          (22 () 76)
          (14 0 0 ch)
          (13 #\f)
          (16 char<=?)
          (24 2)
          76
          (19 () 78)
          77
          (13 #f)
          78
          (21 () 85)
          (13 10)
          (14 0 0 ch)
          (78)
          (13 #\a)
          (78)
          (43)
          (42)
          (25)
          85
          (22 () 79)
          (14 0 0 ch)
          (13 #\A)
          (16 char>=?)
          (24 2)
          79
          (21 () 81)
          (22 () 80)
          (14 0 0 ch)
          (13 #\F)
          (16 char<=?)
          (24 2)
          80
          (19 () 82)
          81
          (13 #f)
          82
          (21 () 83)
          (13 10)
          (14 0 0 ch)
          (78)
          (13 #\A)
          (78)
          (43)
          (42)
          (25)
          83
          (14 0 0 ch)
          (78)
          (13 #\0)
          (78)
          (43)
          (25)
          (name hex-dig->value)
        )
        (15 0 15 hex-dig->value)
        (26)
        (23
          (18 1)
          (13 #(#\0 #\1 #\2 #\3 #\4 #\5 #\6 #\7 #\8 #\9 #\a #\b #\c #\d #\e #\f))
          (14 0 0 dig)
          (36)
          (25)
          (name value->hex-dig)
        )
        (15 0 16 value->hex-dig)
        (26)
        (23
          (18 2)
          (14 0 0 l)
          (7)
          (21 () 89)
          (13 0)
          (25)
          89
          (14 0 0 l)
          (0)
          (23
            (18 1)
            (22 () 87)
            (14 0 0 dig)
            (14 2 15 hex-dig->value)
            (24 1)
            87
            (14 1 1 pow)
            (44)
            (22 () 88)
            (14 1 0 l)
            (1)
            (14 1 1 pow)
            (13 16)
            (44)
            (14 2 17 hex->dec)
            (24 2)
            88
            (42)
            (25)
            (name ())
          )
          (24 1)
          (name hex->dec)
        )
        (15 0 17 hex->dec)
        (26)
        (23
          (18 1)
          (22 () 91)
          (14 0 0 token)
          (13 7)
          (27)
          (14 1 15 hex-dig->value)
          (24 1)
          91
          (13 8)
          (52)
          (25)
          (name hex-negative?)
        )
        (15 0 18 hex-negative?)
        (26)
        (23
          (18 1)
          (14 0 0 token)
          (7)
          (21 () 95)
          (13 ())
          (25)
          95
          (14 0 0 token)
          (0)
          (23
            (18 1)
            (22 () 92)
            (13 15)
            (22 () 93)
            (14 0 0 hex-dig)
            (14 2 15 hex-dig->value)
            (24 1)
            93
            (43)
            (14 2 16 value->hex-dig)
            (24 1)
            92
            (22 () 94)
            (14 1 0 token)
            (1)
            (14 2 19 hex-compliment)
            (24 1)
            94
            (2)
            (25)
            (name ())
          )
          (24 1)
          (name hex-compliment)
        )
        (15 0 19 hex-compliment)
        (26)
        (23
          (18 0)
          (14 1 2 token)
          (31)
          (13 8)
          (51)
          (21 () 99)
          (22 () 97)
          (22 () 98)
          (14 1 2 token)
          (16 reverse)
          (24 1)
          98
          (14 1 2 token)
          (31)
          (13 8)
          (43)
          (60)
          (16 reverse)
          (24 1)
          97
          (15 1 2 token)
          (26)
          (19 () 100)
          99
          100
          (13 #f)
          (23
            (18 1)
            (14 2 2 token)
            (31)
            (13 8)
            (47)
            (21 () 105)
            (22 () 101)
            (14 2 2 token)
            (14 2 18 hex-negative?)
            (24 1)
            101
            (21 () 103)
            (13 #t)
            (15 0 0 negative)
            (26)
            (22 () 102)
            (14 2 2 token)
            (14 2 19 hex-compliment)
            (24 1)
            102
            (15 2 2 token)
            (26)
            (19 () 104)
            103
            104
            (19 () 106)
            105
            106
            (22 () 107)
            (14 2 2 token)
            (13 1)
            (14 2 17 hex->dec)
            (24 2)
            107
            (15 2 2 token)
            (26)
            (14 0 0 negative)
            (21 () 108)
            (13 0)
            (14 2 2 token)
            (13 1)
            (42)
            (43)
            (15 2 2 token)
            (25)
            108
            (13 ())
            (25)
            (name ())
          )
          (24 1)
          (name do-hex)
        )
        (15 0 20 do-hex)
        (26)
        (23
          (18 0)
          (22 () 110)
          (14 2 1 ch)
          (14 1 5 char-hex?)
          (24 1)
          110
          (21 () 112)
          (22 () 111)
          (14 1 12 add-ch-to-token)
          (24 0)
          111
          (26)
          (14 1 21 build-hex-number-token)
          (24 0)
          112
          (13 ())
          (25)
          (name build-hex-number-token)
        )
        (15 0 21 build-hex-number-token)
        (26)
        (23
          (18 0)
          (14 2 1 ch)
          (62)
          (21 () 115)
          (22 () 114)
          (14 1 12 add-ch-to-token)
          (24 0)
          114
          (26)
          (14 1 22 build-decimal-number-token)
          (24 0)
          115
          (13 ())
          (25)
          (name build-decimal-number-token)
        )
        (15 0 22 build-decimal-number-token)
        (26)
        (23
          (18 0)
          (22 () 117)
          (14 1 3 lookahead-c-ch)
          (24 0)
          117
          (13 #\x)
          (61)
          (21 () 124)
          (22 () 118)
          (14 1 6 read-c-ch-or-dollar-eof)
          (24 0)
          118
          (26)
          (22 () 119)
          (14 1 6 read-c-ch-or-dollar-eof)
          (24 0)
          119
          (26)
          (22 () 120)
          (14 1 21 build-hex-number-token)
          (24 0)
          120
          (26)
          (14 1 20 do-hex)
          (24 0)
          124
          (22 () 121)
          (14 1 22 build-decimal-number-token)
          (24 0)
          121
          (26)
          (22 () 122)
          (22 () 123)
          (14 1 2 token)
          (16 reverse)
          (24 1)
          123
          (16 list->string)
          (24 1)
          122
          (70)
          (15 1 2 token)
          (25)
          (name build-number-token)
        )
        (15 0 23 build-number-token)
        (26)
        (23
          (18 0)
          (14 2 1 ch)
          (14 1 0 separators)
          (28)
          (25)
          (name separator?)
        )
        (15 0 24 separator?)
        (26)
        (23
          (18 0)
          (14 2 1 ch)
          (23
            (18 1)
            (22 () 126)
            (14 2 12 add-ch-to-token)
            (24 0)
            126
            (26)
            (14 0 0 old-ch)
            (14 3 1 ch)
            (13 ())
            (2)
            (2)
            (14 2 1 two-character-separators)
            (29)
            (21 () 127)
            (14 2 12 add-ch-to-token)
            (24 0)
            127
            (13 ())
            (25)
            (name ())
          )
          (24 1)
          (name build-separator-token)
        )
        (15 0 25 build-separator-token)
        (26)
        (23
          (18 0)
          (13 ())
          (15 1 2 token)
          (26)
          (22 () 129)
          (14 1 8 skip-blanks)
          (24 0)
          129
          (26)
          (14 2 1 ch)
          (13 #\/)
          (61)
          (21 () 131)
          (22 () 130)
          (14 1 3 lookahead-c-ch)
          (24 0)
          130
          (13 #\/)
          (61)
          (19 () 132)
          131
          (13 #f)
          132
          (21 () 134)
          (22 () 133)
          (14 1 11 skip-comments)
          (24 0)
          133
          (26)
          (19 () 135)
          134
          135
          (14 2 1 ch)
          (14 3 0 eof-char)
          (61)
          (21 () 184)
          (13 ())
          (15 1 2 token)
          (26)
          (19 () 185)
          184
          (22 () 136)
          (14 1 24 separator?)
          (24 0)
          136
          (21 () 182)
          (22 () 137)
          (14 1 25 build-separator-token)
          (24 0)
          137
          (26)
          (14 1 2 token)
          (31)
          (13 1)
          (47)
          (21 () 146)
          (14 1 2 token)
          (0)
          (13 #\|)
          (61)
          (21 () 138)
          (13 #\$)
          (13 ())
          (2)
          (15 1 2 token)
          (26)
          (19 () 139)
          138
          139
          (19 () 147)
          146
          (14 1 2 token)
          (31)
          (13 2)
          (47)
          (21 () 144)
          (14 1 2 token)
          (0)
          (13 #\|)
          (61)
          (21 () 140)
          (14 1 2 token)
          (11)
          (13 #\|)
          (61)
          (19 () 141)
          140
          (13 #f)
          141
          (21 () 142)
          (13 #\$)
          (13 #\$)
          (13 ())
          (2)
          (2)
          (15 1 2 token)
          (26)
          (19 () 143)
          142
          143
          (19 () 145)
          144
          145
          147
          (22 () 148)
          (22 () 149)
          (14 1 2 token)
          (16 reverse)
          (24 1)
          149
          (16 list->string)
          (24 1)
          148
          (69)
          (15 1 2 token)
          (26)
          (19 () 183)
          182
          (14 2 1 ch)
          (62)
          (21 () 180)
          (22 () 150)
          (14 1 23 build-number-token)
          (24 0)
          150
          (26)
          (19 () 181)
          180
          (22 () 151)
          (14 2 1 ch)
          (63)
          (23
            (18 1)
            (14 0 0 g:::5)
            (21 () 152)
            (14 0 0 g:::5)
            (25)
            152
            (14 3 1 ch)
            (13 #\_)
            (61)
            (25)
            (name ())
          )
          (24 1)
          151
          (21 () 178)
          (22 () 154)
          (14 1 12 add-ch-to-token)
          (24 0)
          154
          (26)
          (22 () 155)
          (14 1 13 build-symbol-token)
          (24 0)
          155
          (26)
          (22 () 156)
          (22 () 157)
          (14 1 2 token)
          (16 reverse)
          (24 1)
          157
          (16 list->string)
          (24 1)
          156
          (69)
          (15 1 2 token)
          (26)
          (19 () 179)
          178
          (14 2 1 ch)
          (13 #\")
          (61)
          (21 () 176)
          (22 () 158)
          (14 1 7 read-c-ch)
          (24 0)
          158
          (26)
          (22 () 159)
          (14 1 14 build-string-token)
          (24 0)
          159
          (26)
          (22 () 160)
          (22 () 161)
          (14 1 2 token)
          (16 reverse)
          (24 1)
          161
          (16 list->string)
          (24 1)
          160
          (15 1 2 token)
          (26)
          (19 () 177)
          176
          (14 2 1 ch)
          (13 #\')
          (61)
          (21 () 174)
          (22 () 162)
          (14 1 7 read-c-ch)
          (24 0)
          162
          (26)
          (14 2 1 ch)
          (13 #\\)
          (61)
          (21 () 166)
          (22 () 163)
          (14 1 7 read-c-ch)
          (24 0)
          163
          (26)
          (14 2 1 ch)
          (13 #\n)
          (61)
          (21 () 164)
          (13 10)
          (79)
          (15 2 1 ch)
          (26)
          (19 () 165)
          164
          165
          (19 () 167)
          166
          167
          (14 2 1 ch)
          (78)
          (15 1 2 token)
          (26)
          (22 () 168)
          (14 1 6 read-c-ch-or-dollar-eof)
          (24 0)
          168
          (26)
          (22 () 169)
          (14 1 6 read-c-ch-or-dollar-eof)
          (24 0)
          169
          (26)
          (19 () 175)
          174
          (22 () 170)
          (13 bad_chracter)
          (13 ())
          (14 3 80 log-error)
          (24 2)
          170
          (26)
          (22 () 171)
          (14 1 12 add-ch-to-token)
          (24 0)
          171
          (26)
          (22 () 172)
          (22 () 173)
          (14 1 2 token)
          (16 reverse)
          (24 1)
          173
          (16 list->string)
          (24 1)
          172
          (69)
          (15 1 2 token)
          (26)
          175
          177
          179
          181
          183
          185
          (14 1 2 token)
          (25)
          (name ())
        )
        (25)
        (name ())
      )
      (24 26)
      (name ())
    )
    (24 3)
    0
    (15 0 5 get-c-token)
    (26)
    (13 ())
    (15 0 6 token-ring)
    (26)
    (23
      (18 0)
      (13 0)
      (79)
      (15 1 0 eof-char)
      (26)
      (13 9)
      (79)
      (15 1 1 tab-char)
      (26)
      (13 13)
      (79)
      (15 1 2 carriage-return)
      (26)
      (13 #\space)
      (13 #\newline)
      (14 1 1 tab-char)
      (14 1 2 carriage-return)
      (13 ())
      (2)
      (2)
      (2)
      (2)
      (15 1 3 white-space)
      (26)
      (13 ())
      (13 ())
      (13 ())
      (13 ())
      (13 ())
      (2)
      (2)
      (2)
      (2)
      (15 1 6 token-ring)
      (26)
      (14 1 6 token-ring)
      (12)
      (1)
      (14 1 6 token-ring)
      (55)
      (25)
      (name init-clex)
    )
    (15 0 7 init-clex)
    (26)
    (23
      (18 0)
      (14 1 6 token-ring)
      (12)
      (11)
      (25)
      (name triple-lookahead)
    )
    (15 0 8 triple-lookahead)
    (26)
    (23
      (18 0)
      (14 1 6 token-ring)
      (1)
      (11)
      (25)
      (name double-lookahead)
    )
    (15 0 9 double-lookahead)
    (26)
    (23
      (18 0)
      (14 1 6 token-ring)
      (11)
      (25)
      (name lookahead)
    )
    (15 0 10 lookahead)
    (26)
    (23
      (18 0)
      (14 1 6 token-ring)
      (22 () 186)
      (14 1 5 get-c-token)
      (24 0)
      186
      (54)
      (26)
      (14 1 6 token-ring)
      (1)
      (15 1 6 token-ring)
      (26)
      (14 1 6 token-ring)
      (0)
      (25)
      (name get-token)
    )
    (15 0 11 get-token)
    (26)
    (13 "=")
    (69)
    (15 0 12 assignment-tok)
    (26)
    (13 "+")
    (69)
    (15 0 13 plus-tok)
    (26)
    (13 "-")
    (69)
    (15 0 14 minus-tok)
    (26)
    (13 "*")
    (69)
    (15 0 15 times-tok)
    (26)
    (13 "/")
    (69)
    (15 0 16 div-tok)
    (26)
    (13 "%")
    (69)
    (15 0 17 mod-tok)
    (26)
    (13 "&")
    (69)
    (15 0 18 bit-and-tok)
    (26)
    (13 "$")
    (69)
    (15 0 19 bit-or-tok)
    (26)
    (13 "^")
    (69)
    (15 0 20 bit-xor-tok)
    (26)
    (13 ">>")
    (69)
    (15 0 21 shr-tok)
    (26)
    (13 "<<")
    (69)
    (15 0 22 shl-tok)
    (26)
    (13 "&&")
    (69)
    (15 0 23 and-tok)
    (26)
    (13 "$$")
    (69)
    (15 0 24 or-tok)
    (26)
    (13 "==")
    (69)
    (15 0 25 equal-tok)
    (26)
    (13 "!=")
    (69)
    (15 0 26 not-equals-tok)
    (26)
    (13 "<")
    (69)
    (15 0 27 less-than-tok)
    (26)
    (13 ">")
    (69)
    (15 0 28 greater-than-tok)
    (26)
    (13 "<=")
    (69)
    (15 0 29 less-or-equal-tok)
    (26)
    (13 ">=")
    (69)
    (15 0 30 greater-or-equal-tok)
    (26)
    (13 "-")
    (69)
    (15 0 31 unary-minus-tok)
    (26)
    (13 "~")
    (69)
    (15 0 32 bit-not-tok)
    (26)
    (13 "!")
    (69)
    (15 0 33 not-tok)
    (26)
    (13 ";")
    (69)
    (15 0 34 semi-colon-tok)
    (26)
    (13 ":")
    (69)
    (15 0 35 colon-tok)
    (26)
    (13 "(")
    (69)
    (15 0 36 open-paren-tok)
    (26)
    (13 ")")
    (69)
    (15 0 37 close-paren-tok)
    (26)
    (13 "[")
    (69)
    (15 0 38 open-bracket-tok)
    (26)
    (13 "]")
    (69)
    (15 0 39 close-bracket-tok)
    (26)
    (13 ".")
    (69)
    (15 0 40 period-tok)
    (26)
    (13 ",")
    (69)
    (15 0 41 comma-tok)
    (26)
    (13 "include")
    (69)
    (15 0 42 include-tok)
    (26)
    (13 "define")
    (69)
    (15 0 43 define-tok)
    (26)
    (13 "#")
    (69)
    (15 0 44 pound-tok)
    (26)
    (13 ".")
    (69)
    (15 0 45 dot-tok)
    (26)
    (13 "int")
    (69)
    (15 0 46 integer-tok)
    (26)
    (13 "void")
    (69)
    (15 0 47 void-tok)
    (26)
    (13 "{")
    (69)
    (15 0 48 begin-tok)
    (26)
    (13 "}")
    (69)
    (15 0 49 end-tok)
    (26)
    (13 "if")
    (69)
    (15 0 50 if-tok)
    (26)
    (13 "else")
    (69)
    (15 0 51 else-tok)
    (26)
    (13 "switch")
    (69)
    (15 0 52 switch-tok)
    (26)
    (13 "while")
    (69)
    (15 0 53 while-tok)
    (26)
    (13 "do")
    (69)
    (15 0 54 do-tok)
    (26)
    (13 "for")
    (69)
    (15 0 55 for-tok)
    (26)
    (13 "case")
    (69)
    (15 0 56 case-tok)
    (26)
    (13 "break")
    (69)
    (15 0 57 break-tok)
    (26)
    (13 "return")
    (69)
    (15 0 58 return-tok)
    (26)
    (13 "printf")
    (69)
    (15 0 59 printf-tok)
    (26)
    (13 "++")
    (69)
    (15 0 60 succ-tok)
    (26)
    (13 "--")
    (69)
    (15 0 61 pred-tok)
    (26)
    (23
      (18 0)
      (22 () 187)
      (14 1 11 get-token)
      (24 0)
      187
      (26)
      (22 () 188)
      (14 1 11 get-token)
      (24 0)
      188
      (26)
      (14 1 11 get-token)
      (24 0)
      (name initialize-lex)
    )
    (15 0 62 initialize-lex)
    (26)
    (23
      (18 0)
      (22 () 189)
      (14 1 10 lookahead)
      (24 0)
      189
      (14 1 46 integer-tok)
      (5)
      (21 () 194)
      (22 () 190)
      (14 1 8 triple-lookahead)
      (24 0)
      190
      (14 1 34 semi-colon-tok)
      (5)
      (23
        (18 1)
        (14 0 0 g:::6)
        (21 () 192)
        (14 0 0 g:::6)
        (25)
        192
        (22 () 191)
        (14 2 8 triple-lookahead)
        (24 0)
        191
        (14 2 38 open-bracket-tok)
        (5)
        (25)
        (name ())
      )
      (24 1)
      194
      (13 #f)
      (25)
      (name lookahead-var)
    )
    (15 0 63 lookahead-var)
    (26)
    (23
      (18 0)
      (22 () 196)
      (14 1 10 lookahead)
      (24 0)
      196
      (14 1 47 void-tok)
      (5)
      (21 () 198)
      (22 () 197)
      (14 1 8 triple-lookahead)
      (24 0)
      197
      (14 1 36 open-paren-tok)
      (5)
      (25)
      198
      (13 #f)
      (25)
      (name lookahead-procedure)
    )
    (15 0 64 lookahead-procedure)
    (26)
    (23
      (18 0)
      (22 () 200)
      (14 1 10 lookahead)
      (24 0)
      200
      (14 1 46 integer-tok)
      (5)
      (21 () 202)
      (22 () 201)
      (14 1 8 triple-lookahead)
      (24 0)
      201
      (14 1 36 open-paren-tok)
      (5)
      (25)
      202
      (13 #f)
      (25)
      (name lookahead-function)
    )
    (15 0 65 lookahead-function)
    (26)
    (23
      (18 0)
      (22 () 204)
      (14 1 10 lookahead)
      (24 0)
      204
      (7)
      (25)
      (name no-more-tokens?)
    )
    (15 0 66 no-more-tokens?)
    (26)
    (23
      (18 1)
      (14 0 0 token)
      (13 (= + - * / % && $$ << >> & $ ^ == != < <= >= >))
      (28)
      (25)
      (name binary-operator?)
    )
    (15 0 67 binary-operator?)
    (26)
    (23
      (18 1)
      (22 () 205)
      (14 0 0 token)
      (14 1 67 binary-operator?)
      (24 1)
      205
      (23
        (18 1)
        (14 0 0 g:::7)
        (21 () 210)
        (14 0 0 g:::7)
        (25)
        210
        (14 1 0 token)
        (14 2 31 unary-minus-tok)
        (5)
        (23
          (18 1)
          (14 0 0 g:::8)
          (21 () 208)
          (14 0 0 g:::8)
          (25)
          208
          (14 2 0 token)
          (14 3 32 bit-not-tok)
          (5)
          (23
            (18 1)
            (14 0 0 g:::9)
            (21 () 206)
            (14 0 0 g:::9)
            (25)
            206
            (14 3 0 token)
            (14 4 33 not-tok)
            (5)
            (25)
            (name ())
          )
          (24 1)
          (name ())
        )
        (24 1)
        (name ())
      )
      (24 1)
      (name operator?)
    )
    (15 0 68 operator?)
    (26)
    (23
      (18 1)
      (22 () 212)
      (22 () 213)
      (14 0 0 token)
      (14 1 68 operator?)
      (24 1)
      213
      (23
        (18 1)
        (14 0 0 g:::10)
        (21 () 228)
        (14 0 0 g:::10)
        (25)
        228
        (14 1 0 token)
        (14 2 34 semi-colon-tok)
        (5)
        (23
          (18 1)
          (14 0 0 g:::11)
          (21 () 226)
          (14 0 0 g:::11)
          (25)
          226
          (14 2 0 token)
          (14 3 35 colon-tok)
          (5)
          (23
            (18 1)
            (14 0 0 g:::12)
            (21 () 224)
            (14 0 0 g:::12)
            (25)
            224
            (14 3 0 token)
            (14 4 36 open-paren-tok)
            (5)
            (23
              (18 1)
              (14 0 0 g:::13)
              (21 () 222)
              (14 0 0 g:::13)
              (25)
              222
              (14 4 0 token)
              (14 5 37 close-paren-tok)
              (5)
              (23
                (18 1)
                (14 0 0 g:::14)
                (21 () 220)
                (14 0 0 g:::14)
                (25)
                220
                (14 5 0 token)
                (14 6 38 open-bracket-tok)
                (5)
                (23
                  (18 1)
                  (14 0 0 g:::15)
                  (21 () 218)
                  (14 0 0 g:::15)
                  (25)
                  218
                  (14 6 0 token)
                  (14 7 39 close-bracket-tok)
                  (5)
                  (23
                    (18 1)
                    (14 0 0 g:::16)
                    (21 () 216)
                    (14 0 0 g:::16)
                    (25)
                    216
                    (14 7 0 token)
                    (14 8 40 period-tok)
                    (5)
                    (23
                      (18 1)
                      (14 0 0 g:::17)
                      (21 () 214)
                      (14 0 0 g:::17)
                      (25)
                      214
                      (14 8 0 token)
                      (14 9 41 comma-tok)
                      (5)
                      (25)
                      (name ())
                    )
                    (24 1)
                    (name ())
                  )
                  (24 1)
                  (name ())
                )
                (24 1)
                (name ())
              )
              (24 1)
              (name ())
            )
            (24 1)
            (name ())
          )
          (24 1)
          (name ())
        )
        (24 1)
        (name ())
      )
      (24 1)
      212
      (8)
      (25)
      (name identifier?)
    )
    (15 0 69 identifier?)
    (26)
    (13 509)
    (15 0 70 hash-size)
    (26)
    (23
      (18 0)
      (14 1 70 hash-size)
      (13 ())
      (94)
      (25)
      (name make-hash)
    )
    (15 0 71 make-hash)
    (26)
    (23
      (18 3)
      (14 0 1 key)
      (82)
      (14 1 70 hash-size)
      (46)
      (23
        (18 1)
        (14 1 0 vec)
        (14 0 0 hash-idx)
        (14 1 1 key)
        (14 1 2 value)
        (13 ())
        (2)
        (2)
        (14 1 0 vec)
        (14 0 0 hash-idx)
        (36)
        (2)
        (37)
        (25)
        (name ())
      )
      (24 1)
      (name hash-set!)
    )
    (15 0 72 hash-set!)
    (26)
    (23
      (18 2)
      (14 0 1 key)
      (82)
      (14 1 70 hash-size)
      (46)
      (23
        (18 1)
        (14 1 1 key)
        (14 1 0 vec)
        (14 0 0 hash-idx)
        (36)
        (30)
        (25)
        (name ())
      )
      (24 1)
      (name hash-ref)
    )
    (15 0 73 hash-ref)
    (26)
    (23
      (18 2)
      (14 0 1 n)
      (14 1 70 hash-size)
      (47)
      (21 () 232)
      (13 #t)
      (25)
      232
      (14 0 0 vec)
      (14 0 1 n)
      (36)
      (23
        (18 1)
        (14 0 0 element)
        (7)
        (21 () 230)
        (14 1 0 vec)
        (14 1 1 n)
        (13 1)
        (42)
        (14 2 74 empty-hash-table?)
        (24 2)
        230
        (13 #f)
        (25)
        (name ())
      )
      (24 1)
      (name empty-hash-table?)
    )
    (15 0 74 empty-hash-table?)
    (26)
    (13 ())
    (15 0 75 tokens)
    (26)
    (23
      (18 1)
      (13 ())
      (23
        (18 1)
        (23
          (18 1)
          (14 0 0 x)
          (14 1 0 stack)
          (2)
          (15 1 0 stack)
          (25)
          (name ())
        )
        (23
          (18 1)
          (23
            (18 0)
            (14 2 0 stack)
            (1)
            (15 2 0 stack)
            (25)
            (name ())
          )
          (23
            (18 1)
            (23
              (18 0)
              (14 3 0 stack)
              (7)
              (25)
              (name ())
            )
            (23
              (18 1)
              (23
                (18 0)
                (14 4 0 stack)
                (0)
                (25)
                (name ())
              )
              (23
                (18 1)
                (13 #t)
                (13 #t)
                (23
                  (18 2)
                  (22 () 234)
                  (13 ())
                  (23
                    (18 1)
                    (23
                      (18 1)
                      (22 () 235)
                      (14 2 1 processing)
                      (8)
                      (23
                        (18 1)
                        (14 0 0 g:::18)
                        (21 () 236)
                        (14 0 0 g:::18)
                        (25)
                        236
                        (14 1 0 i)
                        (14 9 0 tokens)
                        (35)
                        (47)
                        (25)
                        (name ())
                      )
                      (24 1)
                      235
                      (21 () 263)
                      (13 ())
                      (25)
                      263
                      (22 () 238)
                      (14 8 0 tokens)
                      (14 0 0 i)
                      (36)
                      (23
                        (18 1)
                        (22 () 239)
                        (14 0 0 token)
                        (14 10 36 open-paren-tok)
                        (5)
                        (23
                          (18 1)
                          (14 0 0 g:::19)
                          (21 () 240)
                          (14 0 0 g:::19)
                          (25)
                          240
                          (14 1 0 token)
                          (14 11 38 open-bracket-tok)
                          (5)
                          (25)
                          (name ())
                        )
                        (24 1)
                        239
                        (21 () 261)
                        (14 0 0 token)
                        (14 7 0 push)
                        (24 1)
                        261
                        (22 () 242)
                        (14 0 0 token)
                        (14 10 37 close-paren-tok)
                        (5)
                        (23
                          (18 1)
                          (14 0 0 g:::20)
                          (21 () 243)
                          (14 0 0 g:::20)
                          (25)
                          243
                          (14 1 0 token)
                          (14 11 39 close-bracket-tok)
                          (5)
                          (25)
                          (name ())
                        )
                        (24 1)
                        242
                        (21 () 259)
                        (22 () 245)
                        (14 5 0 empty?)
                        (24 0)
                        245
                        (21 () 257)
                        (13 #f)
                        (15 3 0 ret)
                        (26)
                        (13 #f)
                        (15 3 1 processing)
                        (25)
                        257
                        (22 () 246)
                        (14 4 0 tos)
                        (24 0)
                        246
                        (23
                          (18 1)
                          (22 () 247)
                          (14 7 0 pop)
                          (24 0)
                          247
                          (26)
                          (22 () 248)
                          (14 1 0 token)
                          (14 11 37 close-paren-tok)
                          (5)
                          (21 () 249)
                          (14 0 0 top)
                          (14 11 36 open-paren-tok)
                          (5)
                          (8)
                          (19 () 250)
                          249
                          (13 #f)
                          250
                          (23
                            (18 1)
                            (14 0 0 g:::21)
                            (21 () 253)
                            (14 0 0 g:::21)
                            (25)
                            253
                            (14 2 0 token)
                            (14 12 39 close-bracket-tok)
                            (5)
                            (21 () 251)
                            (14 1 0 top)
                            (14 12 38 open-bracket-tok)
                            (5)
                            (8)
                            (25)
                            251
                            (13 #f)
                            (25)
                            (name ())
                          )
                          (24 1)
                          248
                          (21 () 255)
                          (13 #f)
                          (15 4 0 ret)
                          (26)
                          (13 #f)
                          (15 4 1 processing)
                          (25)
                          255
                          (13 ())
                          (25)
                          (name ())
                        )
                        (24 1)
                        259
                        (13 ())
                        (25)
                        (name ())
                      )
                      (24 1)
                      238
                      (26)
                      (14 0 0 i)
                      (13 1)
                      (42)
                      (14 1 0 loop)
                      (24 1)
                      (name loop)
                    )
                    (15 0 0 loop)
                    (26)
                    (13 0)
                    (14 0 0 loop)
                    (24 1)
                    (name ())
                  )
                  (24 1)
                  234
                  (26)
                  (14 0 0 ret)
                  (21 () 265)
                  (14 2 0 empty?)
                  (24 0)
                  265
                  (14 0 0 ret)
                  (25)
                  (name ())
                )
                (24 2)
                (name ())
              )
              (24 1)
              (name ())
            )
            (24 1)
            (name ())
          )
          (24 1)
          (name ())
        )
        (24 1)
        (name ())
      )
      (24 1)
      (name balanced-parens-and-brackets?)
    )
    (15 0 76 balanced-parens-and-brackets?)
    (26)
    (22 () 267)
    (13 ())
    (13 ())
    (13 ())
    (13 ())
    (13 ())
    (13 ())
    (13 ())
    (13 ())
    (13 ())
    (13 ())
    (13 ())
    (13 ())
    (13 ())
    (13 ())
    (13 ())
    (13 ())
    (13 ())
    (13 ())
    (13 ())
    (13 ())
    (13 ())
    (13 ())
    (13 ())
    (13 ())
    (13 ())
    (13 ())
    (13 ())
    (13 ())
    (13 ())
    (13 ())
    (13 ())
    (13 ())
    (13 ())
    (13 ())
    (23
      (18 34)
      (23
        (18 1)
        (14 0 0 x)
        (14 2 36 open-paren-tok)
        (5)
        (23
          (18 1)
          (14 0 0 g:::22)
          (21 () 268)
          (14 0 0 g:::22)
          (25)
          268
          (14 1 0 x)
          (14 3 38 open-bracket-tok)
          (5)
          (25)
          (name ())
        )
        (24 1)
        (name open-paren?)
      )
      (15 0 0 open-paren?)
      (26)
      (23
        (18 1)
        (14 0 0 x)
        (14 2 37 close-paren-tok)
        (5)
        (23
          (18 1)
          (14 0 0 g:::23)
          (21 () 270)
          (14 0 0 g:::23)
          (25)
          270
          (14 1 0 x)
          (14 3 39 close-bracket-tok)
          (5)
          (25)
          (name ())
        )
        (24 1)
        (name close-paren?)
      )
      (15 0 1 close-paren?)
      (26)
      (23
        (18 1)
        (22 () 272)
        (14 0 0 x)
        (14 1 0 open-paren?)
        (24 1)
        272
        (23
          (18 1)
          (14 0 0 g:::24)
          (21 () 273)
          (14 0 0 g:::24)
          (25)
          273
          (14 1 0 x)
          (14 2 1 close-paren?)
          (24 1)
          (name ())
        )
        (24 1)
        (name parenthesis?)
      )
      (15 0 2 parenthesis?)
      (26)
      (23
        (18 2)
        (14 0 0 x)
        (14 2 37 close-paren-tok)
        (5)
        (21 () 275)
        (14 0 1 y)
        (14 2 36 open-paren-tok)
        (5)
        (19 () 276)
        275
        (13 #f)
        276
        (23
          (18 1)
          (14 0 0 g:::25)
          (21 () 279)
          (14 0 0 g:::25)
          (25)
          279
          (14 1 0 x)
          (14 3 39 close-bracket-tok)
          (5)
          (21 () 277)
          (14 1 1 y)
          (14 3 38 open-bracket-tok)
          (5)
          (25)
          277
          (13 #f)
          (25)
          (name ())
        )
        (24 1)
        (name matching-parens?)
      )
      (15 0 3 matching-parens?)
      (26)
      (13 ())
      (15 0 4 stack)
      (26)
      (23
        (18 0)
        (14 1 4 stack)
        (7)
        (21 () 281)
        (13 stack_underflow)
        (13 ())
        (14 2 80 log-error)
        (24 2)
        281
        (14 1 4 stack)
        (0)
        (23
          (18 1)
          (14 2 4 stack)
          (1)
          (15 2 4 stack)
          (26)
          (14 0 0 pop-value)
          (25)
          (name ())
        )
        (24 1)
        (name pop)
      )
      (15 0 5 pop)
      (26)
      (23
        (18 1)
        (14 0 0 x)
        (14 1 4 stack)
        (2)
        (15 1 4 stack)
        (25)
        (name push)
      )
      (15 0 6 push)
      (26)
      (23
        (18 0)
        (14 1 4 stack)
        (7)
        (21 () 283)
        (13 stack_underflow)
        (13 ())
        (14 2 80 log-error)
        (24 2)
        283
        (14 1 4 stack)
        (0)
        (25)
        (name tos)
      )
      (15 0 7 tos)
      (26)
      (23
        (18 0)
        (14 1 4 stack)
        (7)
        (25)
        (name empty-stack?)
      )
      (15 0 8 empty-stack?)
      (26)
      (23
        (18 0)
        (22 () 285)
        (14 1 8 empty-stack?)
        (24 0)
        285
        (8)
        (21 () 287)
        (22 () 286)
        (14 1 5 pop)
        (24 0)
        286
        (39)
        (26)
        (40)
        (26)
        (14 1 9 display-stack)
        (24 0)
        287
        (13 ())
        (25)
        (name display-stack)
      )
      (15 0 9 display-stack)
      (26)
      (13 ())
      (15 0 10 output-queue)
      (26)
      (23
        (18 1)
        (14 0 0 token)
        (14 1 10 output-queue)
        (2)
        (15 1 10 output-queue)
        (25)
        (name insert-to-output-queue)
      )
      (15 0 11 insert-to-output-queue)
      (26)
      (23
        (18 1)
        (14 0 0 x)
        (7)
        (8)
        (21 () 289)
        (14 0 0 x)
        (0)
        (23
          (18 1)
          (14 0 0 arg)
          (39)
          (26)
          (40)
          (26)
          (14 1 0 x)
          (1)
          (14 2 12 display-output-queue)
          (24 1)
          (name ())
        )
        (24 1)
        289
        (13 ())
        (25)
        (name display-output-queue)
      )
      (15 0 12 display-output-queue)
      (26)
      (23
        (18 1)
        (14 0 0 x)
        (13 (= + - * / % $neg ! && $$ ~ << >> & $ ^ == != < <= >= >))
        (28)
        (25)
        (name operator?)
      )
      (15 0 13 operator?)
      (26)
      (23
        (18 1)
        (14 0 0 x)
        (13 (= + - * / % && $$ << >> & $ ^ == != < <= >= >))
        (28)
        (25)
        (name binary-operator?)
      )
      (15 0 14 binary-operator?)
      (26)
      (23
        (18 1)
        (22 () 291)
        (14 0 0 x)
        (14 2 127 function?)
        (24 1)
        291
        (23
          (18 1)
          (14 0 0 n)
          (21 () 292)
          (14 0 0 n)
          (11)
          (31)
          (25)
          292
          (13 1)
          (25)
          (name ())
        )
        (24 1)
        (name get-n-args)
      )
      (15 0 15 get-n-args)
      (26)
      (23
        (18 1)
        (22 () 294)
        (14 0 0 x)
        (14 2 127 function?)
        (24 1)
        294
        (23
          (18 1)
          (14 0 0 g:::26)
          (21 () 295)
          (14 0 0 g:::26)
          (25)
          295
          (14 1 0 x)
          (14 3 97 array-var?)
          (24 1)
          (name ())
        )
        (24 1)
        (name function-or-array-var?)
      )
      (15 0 16 function-or-array-var?)
      (26)
      (23
        (18 1)
        (14 0 0 x)
        (14 2 41 comma-tok)
        (5)
        (25)
        (name function-argument-separator?)
      )
      (15 0 17 function-argument-separator?)
      (26)
      (23
        (18 1)
        (14 0 0 op)
        (13 ((= 0) ($$ 1) (&& 2) (! 3) (== 4) (!= 4) (< 4) (<= 4) (>= 4) (> 4) (+ 5) (- 5) ($ 5) (* 6) (- 6) (/ 6) (% 6) (& 6) (<< 6) (>> 6) (^ 6) (~ 7) ($neg 7)))
        (30)
        (11)
        (25)
        (name precedence)
      )
      (15 0 18 precedence)
      (26)
      (23
        (18 1)
        (14 0 0 op)
        (13 (! ~ $neg))
        (28)
        (25)
        (name right-associative?)
      )
      (15 0 19 right-associative?)
      (26)
      (23
        (18 1)
        (22 () 297)
        (14 0 0 op)
        (14 1 19 right-associative?)
        (24 1)
        297
        (8)
        (25)
        (name left-associative?)
      )
      (15 0 20 left-associative?)
      (26)
      (23
        (18 1)
        (14 0 0 x)
        (4)
        (21 () 304)
        (22 () 298)
        (14 0 0 x)
        (14 2 97 array-var?)
        (24 1)
        298
        (21 () 302)
        (13 #f)
        (25)
        302
        (22 () 299)
        (14 0 0 x)
        (14 2 103 local-var?)
        (24 1)
        299
        (23
          (18 1)
          (14 0 0 g:::27)
          (21 () 300)
          (14 0 0 g:::27)
          (25)
          300
          (14 1 0 x)
          (14 3 99 global-var?)
          (24 1)
          (name ())
        )
        (24 1)
        304
        (13 #f)
        (25)
        (name var?)
      )
      (15 0 21 var?)
      (26)
      (23
        (18 1)
        (14 0 0 x)
        (32)
        (23
          (18 1)
          (14 0 0 g:::28)
          (21 () 309)
          (14 0 0 g:::28)
          (25)
          309
          (22 () 306)
          (14 1 0 x)
          (14 2 21 var?)
          (24 1)
          306
          (23
            (18 1)
            (14 0 0 g:::29)
            (21 () 307)
            (14 0 0 g:::29)
            (25)
            307
            (14 2 0 x)
            (14 4 93 constant?)
            (24 1)
            (name ())
          )
          (24 1)
          (name ())
        )
        (24 1)
        (name my-number?)
      )
      (15 0 22 my-number?)
      (26)
      (23
        (18 1)
        (14 0 0 x)
        (32)
        (21 () 314)
        (14 0 0 x)
        (25)
        314
        (22 () 311)
        (14 0 0 x)
        (14 2 91 get-constant-value-no-error)
        (24 1)
        311
        (23
          (18 1)
          (14 0 0 value)
          (21 () 312)
          (14 0 0 value)
          (25)
          312
          (14 1 0 x)
          (25)
          (name ())
        )
        (24 1)
        (name filter-constant)
      )
      (15 0 23 filter-constant)
      (26)
      (23
        (18 1)
        (14 1 4 stack)
        (7)
        (8)
        (21 () 338)
        (22 () 316)
        (22 () 317)
        (14 1 7 tos)
        (24 0)
        317
        (14 1 13 operator?)
        (24 1)
        316
        (21 () 336)
        (22 () 318)
        (14 1 7 tos)
        (24 0)
        318
        (23
          (18 1)
          (22 () 319)
          (22 () 320)
          (14 1 0 op)
          (14 2 20 left-associative?)
          (24 1)
          320
          (21 () 323)
          (22 () 321)
          (14 1 0 op)
          (14 2 18 precedence)
          (24 1)
          321
          (22 () 322)
          (14 0 0 op2)
          (14 2 18 precedence)
          (24 1)
          322
          (50)
          (19 () 324)
          323
          (13 #f)
          324
          (23
            (18 1)
            (14 0 0 g:::30)
            (21 () 330)
            (14 0 0 g:::30)
            (25)
            330
            (22 () 325)
            (14 2 0 op)
            (14 3 19 right-associative?)
            (24 1)
            325
            (21 () 328)
            (22 () 326)
            (14 2 0 op)
            (14 3 18 precedence)
            (24 1)
            326
            (22 () 327)
            (14 1 0 op2)
            (14 3 18 precedence)
            (24 1)
            327
            (49)
            (25)
            328
            (13 #f)
            (25)
            (name ())
          )
          (24 1)
          319
          (21 () 334)
          (22 () 332)
          (22 () 333)
          (14 2 5 pop)
          (24 0)
          333
          (14 2 11 insert-to-output-queue)
          (24 1)
          332
          (26)
          (14 1 0 op)
          (14 2 24 pop-ops-with-less-than-or-equal-precedence)
          (24 1)
          334
          (13 ())
          (25)
          (name ())
        )
        (24 1)
        336
        (13 ())
        (25)
        338
        (13 ())
        (25)
        (name pop-ops-with-less-than-or-equal-precedence)
      )
      (15 0 24 pop-ops-with-less-than-or-equal-precedence)
      (26)
      (23
        (18 0)
        (14 1 4 stack)
        (7)
        (21 () 345)
        (13 mismatched_parens)
        (13 ())
        (14 2 80 log-error)
        (24 2)
        345
        (22 () 340)
        (14 1 5 pop)
        (24 0)
        340
        (23
          (18 1)
          (22 () 341)
          (14 0 0 op)
          (14 2 0 open-paren?)
          (24 1)
          341
          (8)
          (21 () 343)
          (22 () 342)
          (14 0 0 op)
          (14 2 11 insert-to-output-queue)
          (24 1)
          342
          (26)
          (14 2 25 pop-ops-until-left-paren)
          (24 0)
          343
          (13 ())
          (25)
          (name ())
        )
        (24 1)
        (name pop-ops-until-left-paren)
      )
      (15 0 25 pop-ops-until-left-paren)
      (26)
      (23
        (18 0)
        (14 1 4 stack)
        (7)
        (21 () 353)
        (13 mismatched_parens_or_missing_comma)
        (13 ())
        (14 2 80 log-error)
        (24 2)
        353
        (22 () 347)
        (14 1 7 tos)
        (24 0)
        347
        (23
          (18 1)
          (22 () 348)
          (14 0 0 op)
          (14 2 0 open-paren?)
          (24 1)
          348
          (8)
          (21 () 351)
          (22 () 349)
          (22 () 350)
          (14 2 5 pop)
          (24 0)
          350
          (14 2 11 insert-to-output-queue)
          (24 1)
          349
          (26)
          (14 2 26 process-function-arg)
          (24 0)
          351
          (13 ())
          (25)
          (name ())
        )
        (24 1)
        (name process-function-arg)
      )
      (15 0 26 process-function-arg)
      (26)
      (23
        (18 0)
        (14 1 4 stack)
        (7)
        (8)
        (21 () 360)
        (22 () 355)
        (14 1 5 pop)
        (24 0)
        355
        (23
          (18 1)
          (22 () 356)
          (14 0 0 element)
          (14 2 2 parenthesis?)
          (24 1)
          356
          (21 () 358)
          (13 mismatched_parens)
          (13 ())
          (14 3 80 log-error)
          (24 2)
          358
          (22 () 357)
          (14 0 0 element)
          (14 2 11 insert-to-output-queue)
          (24 1)
          357
          (26)
          (14 2 27 clear-operators-from-stack)
          (24 0)
          (name ())
        )
        (24 1)
        360
        (13 ())
        (25)
        (name clear-operators-from-stack)
      )
      (15 0 27 clear-operators-from-stack)
      (26)
      (23
        (18 3)
        (14 0 1 expression)
        (7)
        (21 () 382)
        (13 ())
        (25)
        382
        (14 0 0 previous)
        (0)
        (14 0 1 expression)
        (0)
        (14 0 2 next)
        (0)
        (23
          (18 3)
          (22 () 362)
          (14 0 0 prev)
          (7)
          (21 () 363)
          (14 0 1 expr)
          (13 -)
          (5)
          (19 () 364)
          363
          (13 #f)
          364
          (23
            (18 1)
            (14 0 0 g:::31)
            (21 () 376)
            (14 0 0 g:::31)
            (25)
            376
            (22 () 365)
            (14 1 0 prev)
            (14 3 13 operator?)
            (24 1)
            365
            (21 () 366)
            (14 1 1 expr)
            (13 -)
            (5)
            (19 () 367)
            366
            (13 #f)
            367
            (23
              (18 1)
              (14 0 0 g:::32)
              (21 () 374)
              (14 0 0 g:::32)
              (25)
              374
              (14 2 0 prev)
              (14 5 36 open-paren-tok)
              (5)
              (21 () 368)
              (14 2 1 expr)
              (13 -)
              (5)
              (19 () 369)
              368
              (13 #f)
              369
              (23
                (18 1)
                (14 0 0 g:::33)
                (21 () 372)
                (14 0 0 g:::33)
                (25)
                372
                (14 3 0 prev)
                (14 6 41 comma-tok)
                (5)
                (21 () 370)
                (14 3 1 expr)
                (13 -)
                (5)
                (25)
                370
                (13 #f)
                (25)
                (name ())
              )
              (24 1)
              (name ())
            )
            (24 1)
            (name ())
          )
          (24 1)
          362
          (21 () 380)
          (13 $neg)
          (22 () 378)
          (14 1 0 previous)
          (1)
          (14 1 1 expression)
          (1)
          (14 1 2 next)
          (14 2 28 filter-unary-minus)
          (24 3)
          378
          (2)
          (25)
          380
          (14 0 1 expr)
          (22 () 379)
          (14 1 0 previous)
          (1)
          (14 1 1 expression)
          (1)
          (14 1 2 next)
          (14 2 28 filter-unary-minus)
          (24 3)
          379
          (2)
          (25)
          (name ())
        )
        (24 3)
        (name filter-unary-minus)
      )
      (15 0 28 filter-unary-minus)
      (26)
      (23
        (18 1)
        (14 0 0 n)
        (13 0)
        (47)
        (21 () 386)
        (13 ())
        (25)
        386
        (22 () 384)
        (14 1 5 pop)
        (24 0)
        384
        (22 () 385)
        (14 0 0 n)
        (13 1)
        (43)
        (14 1 29 pop-n-args)
        (24 1)
        385
        (2)
        (25)
        (name pop-n-args)
      )
      (15 0 29 pop-n-args)
      (26)
      (23
        (18 1)
        (14 0 0 token)
        (13 ((= set!) (/ quotient) (% remainder) (& bitwise-and) ($ bitwise-ior) (^ bitwise-xor) (~ bitwise-not) (>> shr) (<< shl) ($neg -) (== =)))
        (30)
        (23
          (18 1)
          (14 0 0 scheme-token)
          (21 () 388)
          (14 0 0 scheme-token)
          (11)
          (25)
          388
          (14 1 0 token)
          (25)
          (name ())
        )
        (24 1)
        (name filter-scheme-function)
      )
      (15 0 30 filter-scheme-function)
      (26)
      (23
        (18 1)
        (14 0 0 output-queue)
        (7)
        (21 () 419)
        (14 1 5 pop)
        (24 0)
        419
        (14 0 0 output-queue)
        (0)
        (23
          (18 1)
          (14 0 0 token)
          (81)
          (21 () 417)
          (22 () 390)
          (14 0 0 token)
          (0)
          (14 2 6 push)
          (24 1)
          390
          (26)
          (19 () 418)
          417
          (22 () 391)
          (14 0 0 token)
          (14 2 13 operator?)
          (24 1)
          391
          (21 () 415)
          (22 () 392)
          (14 0 0 token)
          (14 2 14 binary-operator?)
          (24 1)
          392
          (21 () 400)
          (22 () 393)
          (22 () 394)
          (14 2 5 pop)
          (24 0)
          394
          (22 () 395)
          (14 2 5 pop)
          (24 0)
          395
          (23
            (18 2)
            (22 () 396)
            (14 1 0 token)
            (14 3 30 filter-scheme-function)
            (24 1)
            396
            (14 0 1 right-operand)
            (14 0 0 left-operand)
            (13 ())
            (2)
            (2)
            (2)
            (14 3 6 push)
            (24 1)
            (name ())
          )
          (24 2)
          393
          (26)
          (19 () 401)
          400
          (22 () 397)
          (22 () 398)
          (14 2 5 pop)
          (24 0)
          398
          (23
            (18 1)
            (22 () 399)
            (14 1 0 token)
            (14 3 30 filter-scheme-function)
            (24 1)
            399
            (14 0 0 operand)
            (13 ())
            (2)
            (2)
            (14 3 6 push)
            (24 1)
            (name ())
          )
          (24 1)
          397
          (26)
          401
          (19 () 416)
          415
          (22 () 402)
          (14 0 0 token)
          (14 3 97 array-var?)
          (24 1)
          402
          (21 () 413)
          (22 () 403)
          (14 0 0 token)
          (22 () 404)
          (13 1)
          (14 2 29 pop-n-args)
          (24 1)
          404
          (2)
          (14 2 6 push)
          (24 1)
          403
          (26)
          (19 () 414)
          413
          (22 () 405)
          (14 0 0 token)
          (14 3 127 function?)
          (24 1)
          405
          (21 () 411)
          (22 () 406)
          (14 0 0 token)
          (22 () 407)
          (22 () 408)
          (22 () 409)
          (14 0 0 token)
          (14 2 15 get-n-args)
          (24 1)
          409
          (14 2 29 pop-n-args)
          (24 1)
          408
          (16 reverse)
          (24 1)
          407
          (2)
          (14 2 6 push)
          (24 1)
          406
          (26)
          (19 () 412)
          411
          (22 () 410)
          (14 0 0 token)
          (14 2 6 push)
          (24 1)
          410
          (26)
          412
          414
          416
          418
          (14 1 0 output-queue)
          (1)
          (14 2 31 make-binary-tree)
          (24 1)
          (name ())
        )
        (24 1)
        (name make-binary-tree)
      )
      (15 0 31 make-binary-tree)
      (26)
      (23
        (18 2)
        (14 0 0 expression)
        (1)
        (7)
        (21 () 428)
        (22 () 421)
        (14 0 1 token)
        (14 2 97 array-var?)
        (24 1)
        421
        (21 () 422)
        (13 #t)
        (25)
        422
        (13 #f)
        (25)
        428
        (22 () 424)
        (14 0 1 token)
        (14 2 97 array-var?)
        (24 1)
        424
        (21 () 426)
        (22 () 425)
        (14 0 0 expression)
        (11)
        (14 1 0 open-paren?)
        (24 1)
        425
        (8)
        (25)
        426
        (13 #f)
        (25)
        (name array-var-no-args?)
      )
      (15 0 32 array-var-no-args?)
      (26)
      (23
        (18 1)
        (14 0 0 expression)
        (7)
        (21 () 477)
        (14 1 27 clear-operators-from-stack)
        (24 0)
        477
        (14 0 0 expression)
        (0)
        (23
          (18 1)
          (22 () 430)
          (14 0 0 token)
          (14 2 0 open-paren?)
          (24 1)
          430
          (21 () 475)
          (22 () 431)
          (14 0 0 token)
          (14 2 6 push)
          (24 1)
          431
          (26)
          (19 () 476)
          475
          (22 () 432)
          (14 0 0 token)
          (14 2 1 close-paren?)
          (24 1)
          432
          (21 () 473)
          (22 () 433)
          (14 2 25 pop-ops-until-left-paren)
          (24 0)
          433
          (26)
          (22 () 434)
          (14 2 8 empty-stack?)
          (24 0)
          434
          (21 () 437)
          (13 #f)
          (19 () 438)
          437
          (22 () 435)
          (22 () 436)
          (14 2 7 tos)
          (24 0)
          436
          (14 2 16 function-or-array-var?)
          (24 1)
          435
          438
          (21 () 441)
          (22 () 439)
          (22 () 440)
          (14 2 5 pop)
          (24 0)
          440
          (14 2 11 insert-to-output-queue)
          (24 1)
          439
          (26)
          (19 () 442)
          441
          442
          (19 () 474)
          473
          (22 () 443)
          (14 0 0 token)
          (14 2 17 function-argument-separator?)
          (24 1)
          443
          (21 () 471)
          (22 () 444)
          (14 2 26 process-function-arg)
          (24 0)
          444
          (26)
          (19 () 472)
          471
          (22 () 445)
          (14 0 0 token)
          (14 2 13 operator?)
          (24 1)
          445
          (21 () 469)
          (22 () 446)
          (14 0 0 token)
          (14 2 24 pop-ops-with-less-than-or-equal-precedence)
          (24 1)
          446
          (26)
          (22 () 447)
          (14 0 0 token)
          (14 2 6 push)
          (24 1)
          447
          (26)
          (19 () 470)
          469
          (22 () 448)
          (14 1 0 expression)
          (14 0 0 token)
          (14 2 32 array-var-no-args?)
          (24 2)
          448
          (21 () 467)
          (22 () 449)
          (14 0 0 token)
          (13 ())
          (2)
          (14 2 6 push)
          (24 1)
          449
          (26)
          (19 () 468)
          467
          (22 () 450)
          (22 () 451)
          (14 0 0 token)
          (14 2 22 my-number?)
          (24 1)
          451
          (23
            (18 1)
            (14 0 0 g:::34)
            (21 () 454)
            (14 0 0 g:::34)
            (25)
            454
            (14 1 0 token)
            (33)
            (23
              (18 1)
              (14 0 0 g:::35)
              (21 () 452)
              (14 0 0 g:::35)
              (25)
              452
              (14 3 0 expression)
              (14 2 0 token)
              (14 4 32 array-var-no-args?)
              (24 2)
              (name ())
            )
            (24 1)
            (name ())
          )
          (24 1)
          450
          (21 () 465)
          (22 () 456)
          (22 () 457)
          (14 0 0 token)
          (14 2 23 filter-constant)
          (24 1)
          457
          (14 2 11 insert-to-output-queue)
          (24 1)
          456
          (26)
          (19 () 466)
          465
          (22 () 458)
          (14 0 0 token)
          (14 2 16 function-or-array-var?)
          (24 1)
          458
          (21 () 463)
          (22 () 459)
          (14 0 0 token)
          (14 2 6 push)
          (24 1)
          459
          (26)
          (19 () 464)
          463
          (22 () 460)
          (13 undefined_identifier)
          (14 0 0 token)
          (14 3 80 log-error)
          (24 2)
          460
          (26)
          (22 () 461)
          (14 0 0 token)
          (14 2 11 insert-to-output-queue)
          (24 1)
          461
          (26)
          (22 () 462)
          (13 ())
          (14 2 33 shunt-proper)
          (24 1)
          462
          (26)
          464
          466
          468
          470
          472
          474
          476
          (14 1 0 expression)
          (1)
          (14 2 33 shunt-proper)
          (24 1)
          (name ())
        )
        (24 1)
        (name shunt-proper)
      )
      (15 0 33 shunt-proper)
      (26)
      (23
        (18 1)
        (13 ())
        (15 1 4 stack)
        (26)
        (22 () 479)
        (13 ())
        (14 0 0 expression)
        (2)
        (14 0 0 expression)
        (22 () 480)
        (14 0 0 expression)
        (13 (()))
        (16 append)
        (24 2)
        480
        (14 1 28 filter-unary-minus)
        (24 3)
        479
        (15 0 0 expression)
        (26)
        (13 ())
        (15 1 4 stack)
        (26)
        (13 ())
        (15 1 10 output-queue)
        (26)
        (22 () 481)
        (14 0 0 expression)
        (14 1 33 shunt-proper)
        (24 1)
        481
        (26)
        (22 () 482)
        (14 1 10 output-queue)
        (16 reverse)
        (24 1)
        482
        (15 1 10 output-queue)
        (26)
        (13 ())
        (15 1 4 stack)
        (26)
        (14 1 10 output-queue)
        (14 1 31 make-binary-tree)
        (24 1)
        (name ())
      )
      (25)
      (name ())
    )
    (24 34)
    267
    (15 0 77 shunt)
    (26)
    (13 ())
    (15 0 78 global-error)
    (26)
    (23
      (18 2)
      (14 1 78 global-error)
      (7)
      (21 () 486)
      (14 0 1 token)
      (4)
      (21 () 484)
      (22 () 483)
      (14 0 0 err)
      (14 0 1 token)
      (72)
      (16 string-append)
      (24 2)
      483
      (15 1 78 global-error)
      (25)
      484
      (14 0 0 err)
      (15 1 78 global-error)
      (25)
      486
      (13 ())
      (25)
      (name set-error)
    )
    (15 0 79 set-error)
    (26)
    (23
      (18 2)
      (14 0 0 err)
      (23
        (18 1)
        (14 0 0 g:::36)
        (13 bad_character)
        (76)
        (21 () 516)
        (13 "bad character")
        (14 1 1 token)
        (14 2 79 set-error)
        (24 2)
        516
        (14 0 0 g:::36)
        (13 rest_of_program_ignored)
        (76)
        (21 () 514)
        (13 "rest of program ignored ")
        (14 1 1 token)
        (14 2 79 set-error)
        (24 2)
        514
        (14 0 0 g:::36)
        (13 expect_token)
        (76)
        (21 () 512)
        (13 " expected ")
        (14 1 1 token)
        (14 2 79 set-error)
        (24 2)
        512
        (14 0 0 g:::36)
        (13 bad_statement)
        (76)
        (21 () 510)
        (13 "bad statement ")
        (14 1 1 token)
        (14 2 79 set-error)
        (24 2)
        510
        (14 0 0 g:::36)
        (13 control_var_mismatch)
        (76)
        (21 () 508)
        (13 "control and increment var not the same ")
        (14 1 1 token)
        (14 2 79 set-error)
        (24 2)
        508
        (14 0 0 g:::36)
        (13 expecting_incr_decr)
        (76)
        (21 () 506)
        (13 "expecting ++ or --")
        (14 1 1 token)
        (14 2 79 set-error)
        (24 2)
        506
        (14 0 0 g:::36)
        (13 number_expected)
        (76)
        (21 () 504)
        (13 "number expected instead of: ")
        (14 1 1 token)
        (14 2 79 set-error)
        (24 2)
        504
        (14 0 0 g:::36)
        (13 max_allowed_formal_parameters)
        (76)
        (21 () 502)
        (13 "maximum number of allowed formal parameters exceeded")
        (14 1 1 token)
        (14 2 79 set-error)
        (24 2)
        502
        (14 0 0 g:::36)
        (13 mismatched_parens)
        (76)
        (21 () 500)
        (13 "mismatched parentheses")
        (14 1 1 token)
        (14 2 79 set-error)
        (24 2)
        500
        (14 0 0 g:::36)
        (13 mismatched_parens_or_missing_comma)
        (76)
        (21 () 498)
        (13 "mismatched parentheses or misplaced comma")
        (14 1 1 token)
        (14 2 79 set-error)
        (24 2)
        498
        (14 0 0 g:::36)
        (13 stack_underflow)
        (76)
        (21 () 496)
        (13 "stack underflow")
        (14 1 1 token)
        (14 2 79 set-error)
        (24 2)
        496
        (14 0 0 g:::36)
        (13 undefined_constant)
        (76)
        (21 () 494)
        (13 "undefined constant: ")
        (14 1 1 token)
        (14 2 79 set-error)
        (24 2)
        494
        (14 0 0 g:::36)
        (13 undefined_identifier)
        (76)
        (21 () 492)
        (13 "undefined identifier: ")
        (14 1 1 token)
        (14 2 79 set-error)
        (24 2)
        492
        (14 0 0 g:::36)
        (13 string_expected)
        (76)
        (21 () 490)
        (13 "string expected: ")
        (14 1 1 token)
        (14 2 79 set-error)
        (24 2)
        490
        (14 0 0 g:::36)
        (13 bad_include)
        (76)
        (21 () 488)
        (13 "bad include")
        (14 1 1 token)
        (14 2 79 set-error)
        (24 2)
        488
        (13 #f)
        (25)
        (name ())
      )
      (24 1)
      (name log-error)
    )
    (15 0 80 log-error)
    (26)
    (23
      (18 1)
      (22 () 518)
      (14 1 11 get-token)
      (24 0)
      518
      (23
        (18 1)
        (14 0 0 token)
        (14 1 0 expected-token)
        (5)
        (8)
        (21 () 519)
        (13 expect_token)
        (14 1 0 expected-token)
        (14 2 80 log-error)
        (24 2)
        519
        (13 ())
        (25)
        (name ())
      )
      (24 1)
      (name expect)
    )
    (15 0 81 expect)
    (26)
    (23
      (18 1)
      (14 0 0 err)
      (7)
      (21 () 522)
      (13 ())
      (25)
      522
      (13 putchar)
      (14 0 0 err)
      (0)
      (78)
      (13 ())
      (2)
      (2)
      (22 () 521)
      (14 0 0 err)
      (1)
      (14 1 82 error->code)
      (24 1)
      521
      (2)
      (25)
      (name error->code)
    )
    (15 0 82 error->code)
    (26)
    (23
      (18 1)
      (22 () 524)
      (22 () 525)
      (13 letrec)
      (13 ())
      (2)
      (22 () 526)
      (13 main)
      (13 lambda)
      (13 ())
      (22 () 527)
      (13 begin)
      (13 ())
      (2)
      (22 () 528)
      (22 () 529)
      (14 0 0 err)
      (14 1 82 error->code)
      (24 1)
      529
      (13 ((putchar 10) (return 0)))
      (14 1 84 append2)
      (24 2)
      528
      (14 1 84 append2)
      (24 2)
      527
      (13 ())
      (2)
      (2)
      (2)
      (13 ())
      (2)
      (2)
      (13 ())
      (2)
      (13 ())
      (2)
      (13 ())
      (14 1 84 append2)
      (24 2)
      526
      (14 1 84 append2)
      (24 2)
      525
      (13 main)
      (13 ())
      (2)
      (13 ())
      (2)
      (14 1 84 append2)
      (24 2)
      524
      (23
        (18 1)
        (14 0 0 program)
        (25)
        (name ())
      )
      (24 1)
      (name make-error-program)
    )
    (15 0 83 make-error-program)
    (26)
    (23
      (18 2)
      (14 0 0 x)
      (7)
      (21 () 531)
      (14 0 1 y)
      (25)
      531
      (14 0 0 x)
      (0)
      (22 () 530)
      (14 0 0 x)
      (1)
      (14 0 1 y)
      (14 1 84 append2)
      (24 2)
      530
      (2)
      (25)
      (name append2)
    )
    (15 0 84 append2)
    (26)
    (23
      (18 1)
      (13 ())
      (23
        (18 1)
        (23
          (18 1)
          (14 0 0 binary-tree)
          (7)
          (21 () 535)
          (13 ())
          (25)
          535
          (22 () 533)
          (14 0 0 binary-tree)
          (0)
          (14 3 85 filter-vector-ref)
          (24 1)
          533
          (22 () 534)
          (14 0 0 binary-tree)
          (1)
          (14 3 85 filter-vector-ref)
          (24 1)
          534
          (2)
          (25)
          (name filter-vector-ref-fn-args)
        )
        (15 0 0 filter-vector-ref-fn-args)
        (26)
        (14 1 0 binary-tree)
        (7)
        (21 () 555)
        (13 ())
        (25)
        555
        (14 1 0 binary-tree)
        (13 $neg)
        (5)
        (21 () 553)
        (13 -)
        (25)
        553
        (14 1 0 binary-tree)
        (81)
        (21 () 551)
        (22 () 537)
        (14 1 0 binary-tree)
        (0)
        (14 2 127 function?)
        (24 1)
        537
        (21 () 549)
        (14 1 0 binary-tree)
        (0)
        (22 () 538)
        (14 1 0 binary-tree)
        (1)
        (14 0 0 filter-vector-ref-fn-args)
        (24 1)
        538
        (2)
        (25)
        549
        (14 1 0 binary-tree)
        (31)
        (13 2)
        (47)
        (21 () 547)
        (22 () 539)
        (14 1 0 binary-tree)
        (0)
        (14 2 97 array-var?)
        (24 1)
        539
        (21 () 543)
        (13 vector-ref)
        (14 1 0 binary-tree)
        (0)
        (22 () 540)
        (14 1 0 binary-tree)
        (11)
        (14 2 85 filter-vector-ref)
        (24 1)
        540
        (13 ())
        (2)
        (2)
        (2)
        (25)
        543
        (22 () 541)
        (14 1 0 binary-tree)
        (0)
        (14 2 85 filter-vector-ref)
        (24 1)
        541
        (22 () 542)
        (14 1 0 binary-tree)
        (1)
        (14 2 85 filter-vector-ref)
        (24 1)
        542
        (2)
        (25)
        547
        (22 () 545)
        (14 1 0 binary-tree)
        (0)
        (14 2 85 filter-vector-ref)
        (24 1)
        545
        (22 () 546)
        (14 1 0 binary-tree)
        (1)
        (14 2 85 filter-vector-ref)
        (24 1)
        546
        (2)
        (25)
        551
        (14 1 0 binary-tree)
        (25)
        (name ())
      )
      (24 1)
      (name filter-vector-ref)
    )
    (15 0 85 filter-vector-ref)
    (26)
    (23
      (18 1)
      (14 0 0 expression)
      (81)
      (21 () 566)
      (14 0 0 expression)
      (31)
      (13 3)
      (47)
      (21 () 564)
      (14 0 0 expression)
      (0)
      (13 set!)
      (5)
      (21 () 562)
      (14 0 0 expression)
      (11)
      (81)
      (21 () 560)
      (22 () 557)
      (14 0 0 expression)
      (11)
      (0)
      (14 1 97 array-var?)
      (24 1)
      557
      (21 () 558)
      (13 vector-set!)
      (14 0 0 expression)
      (11)
      (0)
      (14 0 0 expression)
      (11)
      (11)
      (14 0 0 expression)
      (1)
      (11)
      (13 ())
      (2)
      (2)
      (2)
      (2)
      (25)
      558
      (14 0 0 expression)
      (25)
      560
      (14 0 0 expression)
      (25)
      562
      (14 0 0 expression)
      (25)
      564
      (14 0 0 expression)
      (25)
      566
      (14 0 0 expression)
      (25)
      (name filter-vector-set)
    )
    (15 0 86 filter-vector-set)
    (26)
    (23
      (18 1)
      (13 ())
      (15 1 75 tokens)
      (26)
      (22 () 568)
      (22 () 569)
      (14 1 11 get-token)
      (24 0)
      569
      (22 () 570)
      (13 ())
      (23
        (18 1)
        (23
          (18 1)
          (22 () 571)
          (14 3 10 lookahead)
          (24 0)
          571
          (23
            (18 1)
            (22 () 572)
            (14 1 0 token)
            (14 4 37 close-paren-tok)
            (5)
            (21 () 574)
            (22 () 573)
            (14 0 0 next-token)
            (14 4 69 identifier?)
            (24 1)
            573
            (19 () 575)
            574
            (13 #f)
            575
            (23
              (18 1)
              (14 0 0 g:::37)
              (21 () 597)
              (14 0 0 g:::37)
              (25)
              597
              (14 2 0 token)
              (14 5 39 close-bracket-tok)
              (5)
              (21 () 577)
              (22 () 576)
              (14 1 0 next-token)
              (14 5 69 identifier?)
              (24 1)
              576
              (19 () 578)
              577
              (13 #f)
              578
              (23
                (18 1)
                (14 0 0 g:::38)
                (21 () 595)
                (14 0 0 g:::38)
                (25)
                595
                (14 3 0 token)
                (14 6 37 close-paren-tok)
                (5)
                (21 () 579)
                (14 2 0 next-token)
                (14 6 34 semi-colon-tok)
                (5)
                (19 () 580)
                579
                (13 #f)
                580
                (23
                  (18 1)
                  (14 0 0 g:::39)
                  (21 () 593)
                  (14 0 0 g:::39)
                  (25)
                  593
                  (14 4 0 token)
                  (14 7 39 close-bracket-tok)
                  (5)
                  (21 () 581)
                  (14 3 0 next-token)
                  (14 7 34 semi-colon-tok)
                  (5)
                  (19 () 582)
                  581
                  (13 #f)
                  582
                  (23
                    (18 1)
                    (14 0 0 g:::40)
                    (21 () 591)
                    (14 0 0 g:::40)
                    (25)
                    591
                    (22 () 583)
                    (14 5 0 token)
                    (14 8 69 identifier?)
                    (24 1)
                    583
                    (21 () 584)
                    (14 4 0 next-token)
                    (14 8 34 semi-colon-tok)
                    (5)
                    (19 () 585)
                    584
                    (13 #f)
                    585
                    (23
                      (18 1)
                      (14 0 0 g:::41)
                      (21 () 589)
                      (14 0 0 g:::41)
                      (25)
                      589
                      (22 () 586)
                      (14 6 0 token)
                      (14 9 69 identifier?)
                      (24 1)
                      586
                      (21 () 587)
                      (14 5 0 next-token)
                      (14 9 69 identifier?)
                      (24 1)
                      587
                      (13 #f)
                      (25)
                      (name ())
                    )
                    (24 1)
                    (name ())
                  )
                  (24 1)
                  (name ())
                )
                (24 1)
                (name ())
              )
              (24 1)
              (name ())
            )
            (24 1)
            572
            (21 () 602)
            (14 3 0 leave-off-final-close-paren?)
            (8)
            (21 () 599)
            (14 1 0 token)
            (14 4 75 tokens)
            (2)
            (15 4 75 tokens)
            (25)
            599
            (13 ())
            (25)
            602
            (14 1 0 token)
            (14 4 75 tokens)
            (2)
            (15 4 75 tokens)
            (26)
            (22 () 601)
            (14 4 11 get-token)
            (24 0)
            601
            (14 2 0 loop)
            (24 1)
            (name ())
          )
          (24 1)
          (name loop)
        )
        (15 0 0 loop)
        (26)
        (14 0 0 loop)
        (25)
        (name ())
      )
      (24 1)
      570
      (24 1)
      568
      (26)
      (22 () 604)
      (14 1 75 tokens)
      (16 reverse)
      (24 1)
      604
      (15 1 75 tokens)
      (26)
      (14 0 0 leave-off-final-close-paren?)
      (8)
      (21 () 609)
      (22 () 605)
      (14 1 10 lookahead)
      (24 0)
      605
      (14 1 34 semi-colon-tok)
      (5)
      (21 () 607)
      (22 () 606)
      (14 1 11 get-token)
      (24 0)
      606
      (26)
      (19 () 608)
      607
      608
      (19 () 610)
      609
      610
      (22 () 611)
      (22 () 612)
      (14 1 75 tokens)
      (16 list->vector)
      (24 1)
      612
      (14 1 76 balanced-parens-and-brackets?)
      (24 1)
      611
      (8)
      (21 () 614)
      (22 () 613)
      (13 mismatched_parens)
      (13 ())
      (14 1 80 log-error)
      (24 2)
      613
      (26)
      (19 () 615)
      614
      615
      (22 () 616)
      (22 () 617)
      (14 1 75 tokens)
      (14 1 77 shunt)
      (24 1)
      617
      (14 1 86 filter-vector-set)
      (24 1)
      616
      (14 1 85 filter-vector-ref)
      (24 1)
      (name parse-expression)
    )
    (15 0 87 parse-expression)
    (26)
    (23
      (18 0)
      (22 () 618)
      (14 1 42 include-tok)
      (14 1 81 expect)
      (24 1)
      618
      (26)
      (22 () 619)
      (14 1 27 less-than-tok)
      (14 1 81 expect)
      (24 1)
      619
      (26)
      (22 () 620)
      (14 1 11 get-token)
      (24 0)
      620
      (22 () 621)
      (13 ())
      (23
        (18 1)
        (23
          (18 1)
          (14 0 0 token)
          (7)
          (21 () 625)
          (13 bad_include)
          (14 0 0 token)
          (14 3 80 log-error)
          (24 2)
          625
          (14 0 0 token)
          (14 3 28 greater-than-tok)
          (5)
          (8)
          (21 () 623)
          (22 () 622)
          (14 3 11 get-token)
          (24 0)
          622
          (14 1 0 loop)
          (24 1)
          623
          (13 ())
          (25)
          (name loop)
        )
        (15 0 0 loop)
        (26)
        (14 0 0 loop)
        (25)
        (name ())
      )
      (24 1)
      621
      (24 1)
      (name parse-include)
    )
    (15 0 88 parse-include)
    (26)
    (13 ())
    (15 0 89 constants)
    (26)
    (23
      (18 2)
      (14 1 89 constants)
      (14 0 0 name)
      (14 0 1 value)
      (14 1 72 hash-set!)
      (24 3)
      (name define-constant-name-value)
    )
    (15 0 90 define-constant-name-value)
    (26)
    (23
      (18 1)
      (22 () 627)
      (14 1 89 constants)
      (14 0 0 name)
      (14 1 73 hash-ref)
      (24 2)
      627
      (23
        (18 1)
        (14 0 0 value)
        (21 () 628)
        (14 0 0 value)
        (11)
        (25)
        628
        (13 #f)
        (25)
        (name ())
      )
      (24 1)
      (name get-constant-value-no-error)
    )
    (15 0 91 get-constant-value-no-error)
    (26)
    (23
      (18 1)
      (22 () 630)
      (14 1 89 constants)
      (14 0 0 name)
      (14 1 73 hash-ref)
      (24 2)
      630
      (23
        (18 1)
        (14 0 0 value)
        (21 () 632)
        (14 0 0 value)
        (11)
        (25)
        632
        (22 () 631)
        (13 undefined_constant)
        (14 1 0 name)
        (14 2 80 log-error)
        (24 2)
        631
        (26)
        (13 0)
        (25)
        (name ())
      )
      (24 1)
      (name get-constant-value)
    )
    (15 0 92 get-constant-value)
    (26)
    (23
      (18 1)
      (14 1 89 constants)
      (14 0 0 x)
      (14 1 73 hash-ref)
      (24 2)
      (name constant?)
    )
    (15 0 93 constant?)
    (26)
    (13 ())
    (15 0 94 global-variables)
    (26)
    (13 ())
    (15 0 95 arrays)
    (26)
    (13 ())
    (15 0 96 fn-arg-arrays)
    (26)
    (23
      (18 1)
      (14 0 0 x)
      (14 1 95 arrays)
      (28)
      (23
        (18 1)
        (14 0 0 found)
        (21 () 634)
        (14 0 0 found)
        (25)
        634
        (14 1 0 x)
        (14 2 96 fn-arg-arrays)
        (28)
        (25)
        (name ())
      )
      (24 1)
      (name array-var?)
    )
    (15 0 97 array-var?)
    (26)
    (23
      (18 2)
      (14 1 94 global-variables)
      (14 0 0 name)
      (14 0 1 value)
      (14 1 72 hash-set!)
      (24 3)
      (name define-global-var-name-value)
    )
    (15 0 98 define-global-var-name-value)
    (26)
    (23
      (18 1)
      (14 1 94 global-variables)
      (14 0 0 x)
      (14 1 73 hash-ref)
      (24 2)
      (name global-var?)
    )
    (15 0 99 global-var?)
    (26)
    (13 ())
    (15 0 100 local-variables)
    (26)
    (13 ())
    (15 0 101 formal-parameters)
    (26)
    (23
      (18 2)
      (14 0 0 name)
      (14 0 1 value)
      (13 ())
      (2)
      (2)
      (14 1 100 local-variables)
      (2)
      (15 1 100 local-variables)
      (25)
      (name define-local-var-name-value)
    )
    (15 0 102 define-local-var-name-value)
    (26)
    (23
      (18 1)
      (14 0 0 x)
      (14 1 101 formal-parameters)
      (28)
      (23
        (18 1)
        (14 0 0 found)
        (21 () 636)
        (14 0 0 found)
        (25)
        636
        (14 1 0 x)
        (14 2 100 local-variables)
        (30)
        (25)
        (name ())
      )
      (24 1)
      (name local-var?)
    )
    (15 0 103 local-var?)
    (26)
    (23
      (18 0)
      (22 () 638)
      (14 1 43 define-tok)
      (14 1 81 expect)
      (24 1)
      638
      (26)
      (22 () 639)
      (14 1 11 get-token)
      (24 0)
      639
      (22 () 640)
      (14 1 11 get-token)
      (24 0)
      640
      (23
        (18 2)
        (14 0 1 value)
        (32)
        (8)
        (21 () 642)
        (22 () 641)
        (13 number_expected)
        (14 0 1 value)
        (14 2 80 log-error)
        (24 2)
        641
        (26)
        (13 0)
        (15 0 1 value)
        (26)
        (19 () 643)
        642
        643
        (14 0 0 name)
        (14 0 1 value)
        (14 2 90 define-constant-name-value)
        (24 2)
        (name ())
      )
      (24 2)
      (name parse-define)
    )
    (15 0 104 parse-define)
    (26)
    (23
      (18 0)
      (22 () 644)
      (13 ())
      (23
        (18 1)
        (23
          (18 0)
          (22 () 645)
          (14 3 10 lookahead)
          (24 0)
          645
          (14 3 44 pound-tok)
          (5)
          (21 () 652)
          (22 () 646)
          (14 3 11 get-token)
          (24 0)
          646
          (26)
          (22 () 647)
          (14 3 10 lookahead)
          (24 0)
          647
          (14 3 42 include-tok)
          (5)
          (21 () 650)
          (22 () 648)
          (14 3 88 parse-include)
          (24 0)
          648
          (26)
          (19 () 651)
          650
          (22 () 649)
          (14 3 104 parse-define)
          (24 0)
          649
          (26)
          651
          (14 1 0 loop)
          (24 0)
          652
          (13 ())
          (25)
          (name loop)
        )
        (15 0 0 loop)
        (26)
        (14 0 0 loop)
        (25)
        (name ())
      )
      (24 1)
      644
      (24 0)
      (name parse-includes-and-defines)
    )
    (15 0 105 parse-includes-and-defines)
    (26)
    (23
      (18 1)
      (22 () 654)
      (14 1 46 integer-tok)
      (14 1 81 expect)
      (24 1)
      654
      (26)
      (22 () 655)
      (14 1 11 get-token)
      (24 0)
      655
      (13 ())
      (13 ())
      (13 ())
      (23
        (18 4)
        (22 () 656)
        (14 2 10 lookahead)
        (24 0)
        656
        (14 2 38 open-bracket-tok)
        (5)
        (21 () 666)
        (22 () 657)
        (14 2 11 get-token)
        (24 0)
        657
        (26)
        (22 () 658)
        (14 2 11 get-token)
        (24 0)
        658
        (15 0 1 value)
        (26)
        (14 0 0 name)
        (14 2 95 arrays)
        (2)
        (15 2 95 arrays)
        (26)
        (14 0 1 value)
        (32)
        (8)
        (21 () 663)
        (22 () 659)
        (14 0 1 value)
        (14 2 92 get-constant-value)
        (24 1)
        659
        (15 0 1 value)
        (26)
        (14 0 1 value)
        (8)
        (21 () 661)
        (22 () 660)
        (13 undefined_constant)
        (14 0 0 name)
        (14 2 80 log-error)
        (24 2)
        660
        (26)
        (13 1)
        (15 0 1 value)
        (26)
        (19 () 662)
        661
        662
        (19 () 664)
        663
        664
        (22 () 665)
        (14 2 39 close-bracket-tok)
        (14 2 81 expect)
        (24 1)
        665
        (26)
        (19 () 667)
        666
        667
        (22 () 668)
        (14 2 34 semi-colon-tok)
        (14 2 81 expect)
        (24 1)
        668
        (26)
        (14 0 1 value)
        (7)
        (21 () 669)
        (14 0 0 name)
        (13 0)
        (13 ())
        (2)
        (2)
        (15 0 3 ret)
        (26)
        (19 () 670)
        669
        (14 0 0 name)
        (13 make-vector)
        (14 0 1 value)
        (13 0)
        (13 ())
        (2)
        (2)
        (2)
        (13 ())
        (2)
        (2)
        (15 0 3 ret)
        (26)
        670
        (14 1 0 top-level)
        (21 () 673)
        (22 () 671)
        (14 0 0 name)
        (14 0 1 value)
        (14 2 98 define-global-var-name-value)
        (24 2)
        671
        (26)
        (19 () 674)
        673
        (22 () 672)
        (14 0 0 name)
        (14 0 1 value)
        (14 2 102 define-local-var-name-value)
        (24 2)
        672
        (26)
        674
        (14 0 3 ret)
        (25)
        (name ())
      )
      (24 4)
      (name parse-variable-definition)
    )
    (15 0 106 parse-variable-definition)
    (26)
    (23
      (18 1)
      (22 () 675)
      (14 1 63 lookahead-var)
      (24 0)
      675
      (21 () 678)
      (22 () 676)
      (14 0 0 top-level)
      (14 1 106 parse-variable-definition)
      (24 1)
      676
      (22 () 677)
      (14 0 0 top-level)
      (14 1 107 parse-variable-definitions)
      (24 1)
      677
      (2)
      (25)
      678
      (13 ())
      (25)
      (name parse-variable-definitions)
    )
    (15 0 107 parse-variable-definitions)
    (26)
    (23
      (18 0)
      (13 ())
      (13 ())
      (23
        (18 2)
        (22 () 680)
        (14 2 10 lookahead)
        (24 0)
        680
        (14 2 36 open-paren-tok)
        (5)
        (8)
        (21 () 682)
        (22 () 681)
        (13 expect_token)
        (14 2 36 open-paren-tok)
        (14 2 80 log-error)
        (24 2)
        681
        (26)
        (19 () 683)
        682
        683
        (13 __test)
        (22 () 684)
        (13 #f)
        (14 2 87 parse-expression)
        (24 1)
        684
        (13 ())
        (2)
        (2)
        (15 0 0 predicate)
        (26)
        (22 () 685)
        (14 2 118 parse-statement)
        (24 0)
        685
        (15 0 1 if-statement)
        (26)
        (22 () 686)
        (14 2 10 lookahead)
        (24 0)
        686
        (14 2 51 else-tok)
        (5)
        (21 () 689)
        (22 () 687)
        (14 2 11 get-token)
        (24 0)
        687
        (26)
        (13 if)
        (14 0 0 predicate)
        (14 0 1 if-statement)
        (22 () 688)
        (14 2 118 parse-statement)
        (24 0)
        688
        (13 ())
        (2)
        (2)
        (2)
        (2)
        (25)
        689
        (13 if)
        (14 0 0 predicate)
        (14 0 1 if-statement)
        (13 ())
        (2)
        (2)
        (2)
        (25)
        (name ())
      )
      (24 2)
      (name parse-if-statement)
    )
    (15 0 108 parse-if-statement)
    (26)
    (23
      (18 0)
      (13 ())
      (13 ())
      (23
        (18 2)
        (22 () 691)
        (14 2 10 lookahead)
        (24 0)
        691
        (14 2 36 open-paren-tok)
        (5)
        (8)
        (21 () 693)
        (22 () 692)
        (13 expect_token)
        (14 2 36 open-paren-tok)
        (14 2 80 log-error)
        (24 2)
        692
        (26)
        (19 () 694)
        693
        694
        (13 __test)
        (22 () 695)
        (13 #f)
        (14 2 87 parse-expression)
        (24 1)
        695
        (13 ())
        (2)
        (2)
        (15 0 0 predicate)
        (26)
        (22 () 696)
        (14 2 118 parse-statement)
        (24 0)
        696
        (15 0 1 statement)
        (26)
        (13 let)
        (13 loop)
        (13 ())
        (13 if)
        (14 0 0 predicate)
        (13 begin)
        (14 0 1 statement)
        (13 loop)
        (13 ())
        (2)
        (13 ())
        (2)
        (2)
        (2)
        (13 ())
        (2)
        (2)
        (2)
        (13 ())
        (2)
        (2)
        (2)
        (2)
        (25)
        (name ())
      )
      (24 2)
      (name parse-while-statement)
    )
    (15 0 109 parse-while-statement)
    (26)
    (23
      (18 0)
      (13 ())
      (13 ())
      (23
        (18 2)
        (22 () 697)
        (14 2 48 begin-tok)
        (14 2 81 expect)
        (24 1)
        697
        (26)
        (22 () 698)
        (22 () 699)
        (13 ())
        (23
          (18 1)
          (23
            (18 0)
            (22 () 700)
            (14 4 10 lookahead)
            (24 0)
            700
            (14 4 49 end-tok)
            (5)
            (8)
            (21 () 702)
            (22 () 701)
            (14 4 118 parse-statement)
            (24 0)
            701
            (14 2 1 statements)
            (2)
            (15 2 1 statements)
            (26)
            (14 1 0 loop)
            (24 0)
            702
            (13 ())
            (25)
            (name loop)
          )
          (15 0 0 loop)
          (26)
          (14 0 0 loop)
          (25)
          (name ())
        )
        (24 1)
        699
        (24 0)
        698
        (26)
        (22 () 704)
        (14 2 49 end-tok)
        (14 2 81 expect)
        (24 1)
        704
        (26)
        (22 () 705)
        (14 2 53 while-tok)
        (14 2 81 expect)
        (24 1)
        705
        (26)
        (22 () 706)
        (14 2 10 lookahead)
        (24 0)
        706
        (14 2 36 open-paren-tok)
        (5)
        (8)
        (21 () 708)
        (22 () 707)
        (13 expect_token)
        (14 2 36 open-paren-tok)
        (14 2 80 log-error)
        (24 2)
        707
        (26)
        (19 () 709)
        708
        709
        (13 __test)
        (22 () 710)
        (13 #f)
        (14 2 87 parse-expression)
        (24 1)
        710
        (13 ())
        (2)
        (2)
        (15 0 0 predicate)
        (26)
        (13 let)
        (13 loop)
        (13 ())
        (22 () 711)
        (13 begin)
        (13 ())
        (2)
        (22 () 712)
        (14 0 1 statements)
        (16 reverse)
        (24 1)
        712
        (14 2 84 append2)
        (24 2)
        711
        (13 if)
        (14 0 0 predicate)
        (13 loop)
        (13 ())
        (2)
        (13 ())
        (2)
        (2)
        (2)
        (13 ())
        (2)
        (2)
        (2)
        (2)
        (2)
        (25)
        (name ())
      )
      (24 2)
      (name parse-repeat-statement)
    )
    (15 0 110 parse-repeat-statement)
    (26)
    (23
      (18 0)
      (13 ())
      (13 ())
      (13 ())
      (13 ())
      (23
        (18 4)
        (22 () 713)
        (14 2 36 open-paren-tok)
        (14 2 81 expect)
        (24 1)
        713
        (26)
        (22 () 714)
        (14 2 10 lookahead)
        (24 0)
        714
        (15 0 0 control-var)
        (26)
        (22 () 715)
        (13 #f)
        (14 2 87 parse-expression)
        (24 1)
        715
        (15 0 2 initial)
        (26)
        (22 () 716)
        (13 #f)
        (14 2 87 parse-expression)
        (24 1)
        716
        (15 0 3 compare)
        (26)
        (22 () 717)
        (14 2 11 get-token)
        (24 0)
        717
        (14 0 0 control-var)
        (5)
        (8)
        (21 () 719)
        (22 () 718)
        (13 control_var_mismatch)
        (13 ())
        (14 2 80 log-error)
        (24 2)
        718
        (26)
        (19 () 720)
        719
        720
        (22 () 721)
        (14 2 11 get-token)
        (24 0)
        721
        (15 0 1 incr)
        (26)
        (22 () 722)
        (14 0 1 incr)
        (14 2 60 succ-tok)
        (5)
        (23
          (18 1)
          (14 0 0 g:::42)
          (21 () 723)
          (14 0 0 g:::42)
          (25)
          723
          (14 1 1 incr)
          (14 3 61 pred-tok)
          (5)
          (25)
          (name ())
        )
        (24 1)
        722
        (8)
        (21 () 726)
        (22 () 725)
        (13 expecting_incr_decr)
        (13 ())
        (14 2 80 log-error)
        (24 2)
        725
        (26)
        (19 () 727)
        726
        727
        (22 () 728)
        (14 2 37 close-paren-tok)
        (14 2 81 expect)
        (24 1)
        728
        (26)
        (13 begin)
        (14 0 2 initial)
        (13 let)
        (13 loop)
        (13 ())
        (13 if)
        (13 __test)
        (14 0 3 compare)
        (13 ())
        (2)
        (2)
        (13 begin)
        (22 () 729)
        (14 2 118 parse-statement)
        (24 0)
        729
        (14 0 1 incr)
        (14 2 60 succ-tok)
        (5)
        (21 () 730)
        (13 set!)
        (14 0 0 control-var)
        (13 +)
        (14 0 0 control-var)
        (13 1)
        (13 ())
        (2)
        (2)
        (2)
        (13 ())
        (2)
        (2)
        (2)
        (19 () 731)
        730
        (13 set!)
        (14 0 0 control-var)
        (13 -)
        (14 0 0 control-var)
        (13 1)
        (13 ())
        (2)
        (2)
        (2)
        (13 ())
        (2)
        (2)
        (2)
        731
        (13 loop)
        (13 ())
        (2)
        (13 ())
        (2)
        (2)
        (2)
        (2)
        (13 ())
        (2)
        (2)
        (2)
        (13 ())
        (2)
        (2)
        (2)
        (2)
        (13 ())
        (2)
        (2)
        (2)
        (25)
        (name ())
      )
      (24 4)
      (name parse-for-statement)
    )
    (15 0 111 parse-for-statement)
    (26)
    (23
      (18 0)
      (22 () 732)
      (14 1 11 get-token)
      (24 0)
      732
      (26)
      (14 1 34 semi-colon-tok)
      (14 1 81 expect)
      (24 1)
      (name parse-break-statement)
    )
    (15 0 112 parse-break-statement)
    (26)
    (23
      (18 0)
      (13 ())
      (23
        (18 1)
        (13 0)
        (23
          (18 1)
          (22 () 733)
          (14 3 10 lookahead)
          (24 0)
          733
          (14 3 49 end-tok)
          (5)
          (8)
          (21 () 754)
          (22 () 734)
          (14 3 56 case-tok)
          (14 3 81 expect)
          (24 1)
          734
          (26)
          (22 () 735)
          (14 3 11 get-token)
          (24 0)
          735
          (15 0 0 number)
          (26)
          (14 0 0 number)
          (32)
          (8)
          (21 () 737)
          (22 () 736)
          (14 0 0 number)
          (14 3 92 get-constant-value)
          (24 1)
          736
          (15 0 0 number)
          (26)
          (19 () 738)
          737
          738
          (22 () 739)
          (14 3 35 colon-tok)
          (14 3 81 expect)
          (24 1)
          739
          (26)
          (22 () 740)
          (22 () 741)
          (13 ())
          (23
            (18 1)
            (23
              (18 0)
              (22 () 742)
              (14 5 10 lookahead)
              (24 0)
              742
              (14 5 49 end-tok)
              (5)
              (21 () 744)
              (13 #f)
              (19 () 745)
              744
              (22 () 743)
              (14 5 10 lookahead)
              (24 0)
              743
              (14 5 56 case-tok)
              (5)
              (8)
              745
              (21 () 751)
              (22 () 746)
              (14 5 10 lookahead)
              (24 0)
              746
              (14 5 57 break-tok)
              (5)
              (21 () 749)
              (22 () 747)
              (14 5 112 parse-break-statement)
              (24 0)
              747
              (26)
              (19 () 750)
              749
              (22 () 748)
              (14 5 118 parse-statement)
              (24 0)
              748
              (14 3 0 statements)
              (2)
              (15 3 0 statements)
              (26)
              750
              (14 1 0 loop)
              (24 0)
              751
              (13 ())
              (25)
              (name loop)
            )
            (15 0 0 loop)
            (26)
            (14 0 0 loop)
            (25)
            (name ())
          )
          (24 1)
          741
          (24 0)
          740
          (26)
          (14 0 0 number)
          (13 ())
          (2)
          (13 ())
          (2)
          (22 () 753)
          (14 1 0 statements)
          (16 reverse)
          (24 1)
          753
          (14 3 84 append2)
          (24 2)
          754
          (13 ())
          (25)
          (name ())
        )
        (24 1)
        (name ())
      )
      (24 1)
      (name parse-case-list-element)
    )
    (15 0 113 parse-case-list-element)
    (26)
    (23
      (18 0)
      (22 () 756)
      (14 1 10 lookahead)
      (24 0)
      756
      (14 1 49 end-tok)
      (5)
      (21 () 759)
      (13 ())
      (25)
      759
      (22 () 757)
      (14 1 113 parse-case-list-element)
      (24 0)
      757
      (22 () 758)
      (14 1 114 parse-case-list-elements)
      (24 0)
      758
      (2)
      (25)
      (name parse-case-list-elements)
    )
    (15 0 114 parse-case-list-elements)
    (26)
    (23
      (18 0)
      (13 ())
      (13 ())
      (23
        (18 2)
        (22 () 761)
        (14 2 10 lookahead)
        (24 0)
        761
        (14 2 36 open-paren-tok)
        (5)
        (8)
        (21 () 763)
        (22 () 762)
        (13 expect_token)
        (14 2 36 open-paren-tok)
        (14 2 80 log-error)
        (24 2)
        762
        (26)
        (19 () 764)
        763
        764
        (22 () 765)
        (13 #f)
        (14 2 87 parse-expression)
        (24 1)
        765
        (15 0 0 case-expression)
        (26)
        (22 () 766)
        (14 2 48 begin-tok)
        (14 2 81 expect)
        (24 1)
        766
        (26)
        (22 () 767)
        (14 2 114 parse-case-list-elements)
        (24 0)
        767
        (15 0 1 case-list-elements)
        (26)
        (22 () 768)
        (14 2 49 end-tok)
        (14 2 81 expect)
        (24 1)
        768
        (26)
        (13 case)
        (14 0 0 case-expression)
        (13 ())
        (2)
        (2)
        (14 0 1 case-list-elements)
        (14 2 84 append2)
        (24 2)
        (name ())
      )
      (24 2)
      (name parse-case-statement)
    )
    (15 0 115 parse-case-statement)
    (26)
    (23
      (18 1)
      (14 0 0 s)
      (31)
      (13 4)
      (49)
      (21 () 770)
      (14 0 0 s)
      (25)
      770
      (14 0 0 s)
      (0)
      (78)
      (13 256)
      (44)
      (13 256)
      (44)
      (13 256)
      (44)
      (14 0 0 s)
      (11)
      (78)
      (13 256)
      (44)
      (13 256)
      (44)
      (42)
      (14 0 0 s)
      (1)
      (11)
      (78)
      (13 256)
      (44)
      (42)
      (14 0 0 s)
      (12)
      (11)
      (78)
      (42)
      (22 () 769)
      (14 0 0 s)
      (12)
      (12)
      (14 1 116 get-4-chars)
      (24 1)
      769
      (2)
      (25)
      (name get-4-chars)
    )
    (15 0 116 get-4-chars)
    (26)
    (23
      (18 1)
      (14 0 0 s)
      (7)
      (21 () 776)
      (13 ())
      (25)
      776
      (14 0 0 s)
      (0)
      (23
        (18 1)
        (14 0 0 x)
        (32)
        (21 () 774)
        (13 __put4chars)
        (14 0 0 x)
        (13 ())
        (2)
        (2)
        (22 () 772)
        (14 1 0 s)
        (1)
        (14 2 117 process-packed-string)
        (24 1)
        772
        (2)
        (25)
        774
        (13 putchar)
        (14 0 0 x)
        (78)
        (13 ())
        (2)
        (2)
        (22 () 773)
        (14 1 0 s)
        (1)
        (14 2 117 process-packed-string)
        (24 1)
        773
        (2)
        (25)
        (name ())
      )
      (24 1)
      (name process-packed-string)
    )
    (15 0 117 process-packed-string)
    (26)
    (23
      (18 0)
      (22 () 778)
      (14 1 10 lookahead)
      (24 0)
      778
      (23
        (18 1)
        (14 0 0 token)
        (14 2 48 begin-tok)
        (5)
        (21 () 833)
        (13 begin)
        (22 () 779)
        (14 2 120 parse-compound-statement)
        (24 0)
        779
        (2)
        (25)
        833
        (14 0 0 token)
        (14 2 50 if-tok)
        (5)
        (21 () 831)
        (22 () 780)
        (14 2 11 get-token)
        (24 0)
        780
        (26)
        (14 2 108 parse-if-statement)
        (24 0)
        831
        (14 0 0 token)
        (14 2 53 while-tok)
        (5)
        (21 () 829)
        (22 () 781)
        (14 2 11 get-token)
        (24 0)
        781
        (26)
        (14 2 109 parse-while-statement)
        (24 0)
        829
        (14 0 0 token)
        (14 2 54 do-tok)
        (5)
        (21 () 827)
        (22 () 782)
        (14 2 11 get-token)
        (24 0)
        782
        (26)
        (14 2 110 parse-repeat-statement)
        (24 0)
        827
        (14 0 0 token)
        (14 2 55 for-tok)
        (5)
        (21 () 825)
        (22 () 783)
        (14 2 11 get-token)
        (24 0)
        783
        (26)
        (14 2 111 parse-for-statement)
        (24 0)
        825
        (14 0 0 token)
        (14 2 52 switch-tok)
        (5)
        (21 () 823)
        (22 () 784)
        (14 2 11 get-token)
        (24 0)
        784
        (26)
        (14 2 115 parse-case-statement)
        (24 0)
        823
        (14 0 0 token)
        (14 2 49 end-tok)
        (5)
        (21 () 821)
        (13 ())
        (25)
        821
        (14 0 0 token)
        (14 2 58 return-tok)
        (5)
        (21 () 819)
        (22 () 785)
        (14 2 11 get-token)
        (24 0)
        785
        (26)
        (22 () 786)
        (14 2 10 lookahead)
        (24 0)
        786
        (14 2 34 semi-colon-tok)
        (5)
        (21 () 789)
        (22 () 787)
        (14 2 11 get-token)
        (24 0)
        787
        (26)
        (13 return-from-procedure)
        (13 ())
        (2)
        (25)
        789
        (13 return)
        (22 () 788)
        (13 #f)
        (14 2 87 parse-expression)
        (24 1)
        788
        (13 ())
        (2)
        (2)
        (25)
        819
        (14 0 0 token)
        (14 2 59 printf-tok)
        (5)
        (21 () 817)
        (13 ())
        (23
          (18 1)
          (22 () 791)
          (14 3 11 get-token)
          (24 0)
          791
          (26)
          (22 () 792)
          (14 3 36 open-paren-tok)
          (14 3 81 expect)
          (24 1)
          792
          (26)
          (22 () 793)
          (14 3 10 lookahead)
          (24 0)
          793
          (33)
          (21 () 810)
          (22 () 794)
          (14 3 10 lookahead)
          (24 0)
          794
          (13 "%d")
          (67)
          (21 () 804)
          (22 () 795)
          (14 3 11 get-token)
          (24 0)
          795
          (26)
          (22 () 796)
          (14 3 11 get-token)
          (24 0)
          796
          (26)
          (13 __write_integer)
          (22 () 797)
          (13 #t)
          (14 3 87 parse-expression)
          (24 1)
          797
          (13 ())
          (2)
          (2)
          (15 0 0 ret)
          (26)
          (19 () 805)
          804
          (22 () 798)
          (13 begin)
          (13 ())
          (2)
          (22 () 799)
          (22 () 800)
          (22 () 801)
          (22 () 802)
          (14 3 11 get-token)
          (24 0)
          802
          (16 string->list)
          (24 1)
          801
          (14 3 116 get-4-chars)
          (24 1)
          800
          (14 3 117 process-packed-string)
          (24 1)
          799
          (14 3 84 append2)
          (24 2)
          798
          (15 0 0 ret)
          (26)
          (22 () 803)
          (14 3 11 get-token)
          (24 0)
          803
          (26)
          805
          (19 () 811)
          810
          (22 () 806)
          (13 string_expected)
          (22 () 807)
          (14 3 10 lookahead)
          (24 0)
          807
          (14 3 80 log-error)
          (24 2)
          806
          (26)
          (22 () 808)
          (14 3 11 get-token)
          (24 0)
          808
          (26)
          (22 () 809)
          (14 3 11 get-token)
          (24 0)
          809
          (26)
          811
          (22 () 812)
          (14 3 34 semi-colon-tok)
          (14 3 81 expect)
          (24 1)
          812
          (26)
          (14 0 0 ret)
          (25)
          (name ())
        )
        (24 1)
        817
        (22 () 813)
        (14 0 0 token)
        (14 2 69 identifier?)
        (24 1)
        813
        (21 () 815)
        (13 #f)
        (14 2 87 parse-expression)
        (24 1)
        815
        (22 () 814)
        (13 bad_statement)
        (14 0 0 token)
        (14 2 80 log-error)
        (24 2)
        814
        (26)
        (14 2 11 get-token)
        (24 0)
        (name ())
      )
      (24 1)
      (name parse-statement)
    )
    (15 0 118 parse-statement)
    (26)
    (23
      (18 0)
      (22 () 835)
      (22 () 836)
      (14 1 10 lookahead)
      (24 0)
      836
      (14 1 49 end-tok)
      (5)
      (23
        (18 1)
        (14 0 0 g:::43)
        (21 () 838)
        (14 0 0 g:::43)
        (25)
        838
        (22 () 837)
        (14 2 10 lookahead)
        (24 0)
        837
        (7)
        (25)
        (name ())
      )
      (24 1)
      835
      (21 () 842)
      (13 ())
      (25)
      842
      (22 () 840)
      (14 1 118 parse-statement)
      (24 0)
      840
      (22 () 841)
      (14 1 119 parse-statements)
      (24 0)
      841
      (2)
      (25)
      (name parse-statements)
    )
    (15 0 119 parse-statements)
    (26)
    (23
      (18 0)
      (13 ())
      (23
        (18 1)
        (22 () 844)
        (14 2 11 get-token)
        (24 0)
        844
        (14 2 48 begin-tok)
        (5)
        (8)
        (21 () 846)
        (22 () 845)
        (13 expect_token)
        (14 2 48 begin-tok)
        (14 2 80 log-error)
        (24 2)
        845
        (26)
        (19 () 847)
        846
        847
        (22 () 848)
        (14 2 119 parse-statements)
        (24 0)
        848
        (15 0 0 statements)
        (26)
        (22 () 849)
        (14 2 49 end-tok)
        (14 2 81 expect)
        (24 1)
        849
        (26)
        (14 0 0 statements)
        (25)
        (name ())
      )
      (24 1)
      (name parse-compound-statement)
    )
    (15 0 120 parse-compound-statement)
    (26)
    (23
      (18 0)
      (22 () 850)
      (14 1 63 lookahead-var)
      (24 0)
      850
      (21 () 854)
      (13 ())
      (15 1 100 local-variables)
      (26)
      (13 let)
      (22 () 851)
      (13 #f)
      (14 1 107 parse-variable-definitions)
      (24 1)
      851
      (13 begin)
      (22 () 852)
      (14 1 119 parse-statements)
      (24 0)
      852
      (2)
      (13 ())
      (2)
      (2)
      (2)
      (25)
      854
      (13 begin)
      (22 () 853)
      (14 1 119 parse-statements)
      (24 0)
      853
      (2)
      (25)
      (name parse-block)
    )
    (15 0 121 parse-block)
    (26)
    (23
      (18 0)
      (22 () 856)
      (14 1 46 integer-tok)
      (14 1 81 expect)
      (24 1)
      856
      (26)
      (22 () 857)
      (14 1 11 get-token)
      (24 0)
      857
      (13 ())
      (23
        (18 2)
        (14 0 0 name)
        (14 2 101 formal-parameters)
        (2)
        (15 2 101 formal-parameters)
        (26)
        (22 () 858)
        (14 2 10 lookahead)
        (24 0)
        858
        (14 2 38 open-bracket-tok)
        (5)
        (21 () 861)
        (22 () 859)
        (14 2 11 get-token)
        (24 0)
        859
        (26)
        (22 () 860)
        (14 2 39 close-bracket-tok)
        (14 2 81 expect)
        (24 1)
        860
        (26)
        (14 0 0 name)
        (14 2 96 fn-arg-arrays)
        (2)
        (15 2 96 fn-arg-arrays)
        (26)
        (14 0 0 name)
        (15 0 1 ret)
        (26)
        (19 () 862)
        861
        (14 0 0 name)
        (15 0 1 ret)
        (26)
        862
        (14 0 1 ret)
        (25)
        (name ())
      )
      (24 2)
      (name parse-formal-parameter)
    )
    (15 0 122 parse-formal-parameter)
    (26)
    (23
      (18 0)
      (13 ())
      (15 1 96 fn-arg-arrays)
      (26)
      (13 ())
      (15 1 101 formal-parameters)
      (26)
      (13 ())
      (23
        (18 1)
        (22 () 863)
        (22 () 864)
        (13 ())
        (23
          (18 1)
          (23
            (18 0)
            (22 () 865)
            (14 4 10 lookahead)
            (24 0)
            865
            (14 4 37 close-paren-tok)
            (5)
            (8)
            (21 () 871)
            (22 () 866)
            (14 4 122 parse-formal-parameter)
            (24 0)
            866
            (14 2 0 ret)
            (2)
            (15 2 0 ret)
            (26)
            (22 () 867)
            (14 4 10 lookahead)
            (24 0)
            867
            (14 4 41 comma-tok)
            (5)
            (21 () 869)
            (22 () 868)
            (14 4 11 get-token)
            (24 0)
            868
            (26)
            (14 1 0 loop)
            (24 0)
            869
            (13 ())
            (25)
            871
            (13 ())
            (25)
            (name loop)
          )
          (15 0 0 loop)
          (26)
          (14 0 0 loop)
          (25)
          (name ())
        )
        (24 1)
        864
        (24 0)
        863
        (26)
        (14 0 0 ret)
        (16 reverse)
        (24 1)
        (name ())
      )
      (24 1)
      (name parse-formal-parameters)
    )
    (15 0 123 parse-formal-parameters)
    (26)
    (23
      (18 0)
      (22 () 873)
      (14 1 10 lookahead)
      (24 0)
      873
      (14 1 34 semi-colon-tok)
      (5)
      (25)
      (name forward?)
    )
    (15 0 124 forward?)
    (26)
    (13 ())
    (15 0 125 functions)
    (26)
    (23
      (18 0)
      (22 () 874)
      (14 1 125 functions)
      (13 __put4chars)
      (13 (x))
      (14 1 72 hash-set!)
      (24 3)
      874
      (26)
      (22 () 875)
      (14 1 125 functions)
      (13 __write_int_digit)
      (13 (x))
      (14 1 72 hash-set!)
      (24 3)
      875
      (26)
      (22 () 876)
      (14 1 125 functions)
      (13 __write_integer)
      (13 (x))
      (14 1 72 hash-set!)
      (24 3)
      876
      (26)
      (22 () 877)
      (14 1 125 functions)
      (13 getchar)
      (13 ())
      (14 1 72 hash-set!)
      (24 3)
      877
      (26)
      (22 () 878)
      (14 1 125 functions)
      (13 putchar)
      (13 (ch))
      (14 1 72 hash-set!)
      (24 3)
      878
      (26)
      (22 () 879)
      (14 1 125 functions)
      (13 abs)
      (13 (x))
      (14 1 72 hash-set!)
      (24 3)
      879
      (26)
      (22 () 880)
      (14 1 125 functions)
      (13 exit)
      (13 (n))
      (14 1 72 hash-set!)
      (24 3)
      880
      (26)
      (22 () 881)
      (14 1 125 functions)
      (13 dbl_load_reg)
      (13 (x y))
      (14 1 72 hash-set!)
      (24 3)
      881
      (26)
      (22 () 882)
      (14 1 125 functions)
      (13 dbl_load_reg1)
      (13 (x y))
      (14 1 72 hash-set!)
      (24 3)
      882
      (26)
      (22 () 883)
      (14 1 125 functions)
      (13 dbl_load_reg2)
      (13 (x y))
      (14 1 72 hash-set!)
      (24 3)
      883
      (26)
      (22 () 884)
      (14 1 125 functions)
      (13 dbl_get_reg_first)
      (13 ())
      (14 1 72 hash-set!)
      (24 3)
      884
      (26)
      (22 () 885)
      (14 1 125 functions)
      (13 dbl_get_reg_second)
      (13 ())
      (14 1 72 hash-set!)
      (24 3)
      885
      (26)
      (22 () 886)
      (14 1 125 functions)
      (13 dbl_etoi)
      (13 (x))
      (14 1 72 hash-set!)
      (24 3)
      886
      (26)
      (22 () 887)
      (14 1 125 functions)
      (13 dbl_etoi1)
      (13 (x))
      (14 1 72 hash-set!)
      (24 3)
      887
      (26)
      (22 () 888)
      (14 1 125 functions)
      (13 dbl_itoe)
      (13 ())
      (14 1 72 hash-set!)
      (24 3)
      888
      (26)
      (22 () 889)
      (14 1 125 functions)
      (13 dbl_add)
      (13 ())
      (14 1 72 hash-set!)
      (24 3)
      889
      (26)
      (22 () 890)
      (14 1 125 functions)
      (13 dbl_sub)
      (13 ())
      (14 1 72 hash-set!)
      (24 3)
      890
      (26)
      (22 () 891)
      (14 1 125 functions)
      (13 dbl_mul)
      (13 ())
      (14 1 72 hash-set!)
      (24 3)
      891
      (26)
      (22 () 892)
      (14 1 125 functions)
      (13 dbl_mul1)
      (13 ())
      (14 1 72 hash-set!)
      (24 3)
      892
      (26)
      (22 () 893)
      (14 1 125 functions)
      (13 dbl_div)
      (13 ())
      (14 1 72 hash-set!)
      (24 3)
      893
      (26)
      (22 () 894)
      (14 1 125 functions)
      (13 dbl_neg)
      (13 ())
      (14 1 72 hash-set!)
      (24 3)
      894
      (26)
      (22 () 895)
      (14 1 125 functions)
      (13 dbl_eq)
      (13 ())
      (14 1 72 hash-set!)
      (24 3)
      895
      (26)
      (22 () 896)
      (14 1 125 functions)
      (13 dbl_lt)
      (13 ())
      (14 1 72 hash-set!)
      (24 3)
      896
      (26)
      (22 () 897)
      (14 1 125 functions)
      (13 dbl_le)
      (13 ())
      (14 1 72 hash-set!)
      (24 3)
      897
      (26)
      (22 () 898)
      (14 1 125 functions)
      (13 dbl_gt)
      (13 ())
      (14 1 72 hash-set!)
      (24 3)
      898
      (26)
      (14 1 125 functions)
      (13 dbl_ge)
      (13 ())
      (14 1 72 hash-set!)
      (24 3)
      (name populate-predefined-functions)
    )
    (15 0 126 populate-predefined-functions)
    (26)
    (23
      (18 1)
      (14 0 0 x)
      (4)
      (21 () 899)
      (14 1 125 functions)
      (14 0 0 x)
      (14 1 73 hash-ref)
      (24 2)
      899
      (13 #f)
      (25)
      (name function?)
    )
    (15 0 127 function?)
    (26)
    (23
      (18 2)
      (22 () 901)
      (14 1 125 functions)
      (14 0 0 name)
      (14 0 1 formals)
      (14 1 72 hash-set!)
      (24 3)
      901
      (26)
      (14 0 1 formals)
      (25)
      (name set-function-name)
    )
    (15 0 128 set-function-name)
    (26)
    (23
      (18 0)
      (22 () 902)
      (14 1 11 get-token)
      (24 0)
      902
      (26)
      (22 () 903)
      (14 1 11 get-token)
      (24 0)
      903
      (23
        (18 1)
        (22 () 904)
        (14 2 36 open-paren-tok)
        (14 2 81 expect)
        (24 1)
        904
        (26)
        (14 0 0 name)
        (13 lambda)
        (22 () 905)
        (13 ())
        (23
          (18 1)
          (22 () 906)
          (14 1 0 name)
          (22 () 907)
          (14 3 123 parse-formal-parameters)
          (24 0)
          907
          (14 3 128 set-function-name)
          (24 2)
          906
          (15 0 0 formals)
          (26)
          (22 () 908)
          (14 3 37 close-paren-tok)
          (14 3 81 expect)
          (24 1)
          908
          (26)
          (14 0 0 formals)
          (25)
          (name ())
        )
        (24 1)
        905
        (22 () 909)
        (14 2 124 forward?)
        (24 0)
        909
        (21 () 915)
        (22 () 910)
        (14 2 34 semi-colon-tok)
        (14 2 81 expect)
        (24 1)
        910
        (26)
        (13 __forward)
        (19 () 916)
        915
        (22 () 911)
        (13 ())
        (23
          (18 1)
          (22 () 912)
          (14 3 48 begin-tok)
          (14 3 81 expect)
          (24 1)
          912
          (26)
          (22 () 913)
          (14 3 121 parse-block)
          (24 0)
          913
          (15 0 0 block)
          (26)
          (22 () 914)
          (14 3 49 end-tok)
          (14 3 81 expect)
          (24 1)
          914
          (26)
          (14 0 0 block)
          (25)
          (name ())
        )
        (24 1)
        911
        916
        (13 ())
        (2)
        (2)
        (2)
        (13 ())
        (2)
        (2)
        (25)
        (name ())
      )
      (24 1)
      (name parse-function)
    )
    (15 0 129 parse-function)
    (26)
    (23
      (18 0)
      (22 () 917)
      (22 () 918)
      (14 1 64 lookahead-procedure)
      (24 0)
      918
      (23
        (18 1)
        (14 0 0 g:::44)
        (21 () 919)
        (14 0 0 g:::44)
        (25)
        919
        (14 2 65 lookahead-function)
        (24 0)
        (name ())
      )
      (24 1)
      917
      (21 () 928)
      (22 () 921)
      (14 1 129 parse-function)
      (24 0)
      921
      (23
        (18 1)
        (14 0 0 procedure-or-function)
        (22 () 922)
        (14 2 130 parse-procedures-and-functions)
        (24 0)
        922
        (2)
        (25)
        (name ())
      )
      (24 1)
      928
      (22 () 923)
      (14 1 66 no-more-tokens?)
      (24 0)
      923
      (21 () 926)
      (13 ())
      (25)
      926
      (22 () 924)
      (13 rest_of_program_ignored)
      (22 () 925)
      (14 1 10 lookahead)
      (24 0)
      925
      (14 1 80 log-error)
      (24 2)
      924
      (26)
      (13 ())
      (25)
      (name parse-procedures-and-functions)
    )
    (15 0 130 parse-procedures-and-functions)
    (26)
    (23
      (18 0)
      (13 (__put4chars (lambda (x) (putchar (shr x 24)) (putchar (bitwise-and (shr x 16) 255)) (putchar (bitwise-and (shr x 8) 255)) (putchar (bitwise-and x 255)) (return-from-procedure))))
      (25)
      (name include-put4chars)
    )
    (15 0 131 include-put4chars)
    (26)
    (23
      (18 0)
      (13 (__write_int_digit (lambda (n) (if (__test (> n 0)) (begin (__write_int_digit (quotient n 10)) (putchar (+ (remainder n 10) 48)))) (return-from-procedure))))
      (25)
      (name include-write-int-digit)
    )
    (15 0 132 include-write-int-digit)
    (26)
    (23
      (18 0)
      (13 (__write_integer (lambda (n) (if (__test (= n 0)) (begin (putchar 48) (return-from-procedure))) (if (__test (< n 0)) (begin (putchar 45) (if (__test (&& (= (bitwise-and n 65535) 0) (= (shr n 16) (- 32768)))) (begin (begin (__put4chars 842085431) (__put4chars 876098358) (putchar 52) (putchar 56)) (return-from-procedure))) (__write_int_digit (- n))) (__write_int_digit n)) (return-from-procedure))))
      (25)
      (name include-write-integer)
    )
    (15 0 133 include-write-integer)
    (26)
    (23
      (18 0)
      (13 ())
      (13 ())
      (23
        (18 2)
        (22 () 930)
        (14 2 62 initialize-lex)
        (24 0)
        930
        (26)
        (22 () 931)
        (14 2 105 parse-includes-and-defines)
        (24 0)
        931
        (26)
        (22 () 932)
        (14 2 63 lookahead-var)
        (24 0)
        932
        (21 () 934)
        (22 () 933)
        (13 #t)
        (14 2 107 parse-variable-definitions)
        (24 1)
        933
        (15 0 0 global-vars)
        (26)
        (19 () 935)
        934
        935
        (22 () 936)
        (22 () 937)
        (14 2 64 lookahead-procedure)
        (24 0)
        937
        (23
          (18 1)
          (14 0 0 g:::45)
          (21 () 938)
          (14 0 0 g:::45)
          (25)
          938
          (14 3 65 lookahead-function)
          (24 0)
          (name ())
        )
        (24 1)
        936
        (21 () 943)
        (22 () 940)
        (14 2 130 parse-procedures-and-functions)
        (24 0)
        940
        (15 0 1 procedures-and-functions)
        (26)
        (19 () 944)
        943
        (22 () 941)
        (13 rest_of_program_ignored)
        (22 () 942)
        (14 2 10 lookahead)
        (24 0)
        942
        (14 2 80 log-error)
        (24 2)
        941
        (26)
        944
        (14 2 78 global-error)
        (7)
        (21 () 954)
        (22 () 945)
        (22 () 946)
        (13 letrec)
        (13 ())
        (2)
        (22 () 947)
        (22 () 948)
        (14 2 131 include-put4chars)
        (24 0)
        948
        (22 () 949)
        (14 2 132 include-write-int-digit)
        (24 0)
        949
        (22 () 950)
        (14 2 133 include-write-integer)
        (24 0)
        950
        (13 ())
        (2)
        (2)
        (2)
        (14 0 1 procedures-and-functions)
        (14 2 84 append2)
        (24 2)
        947
        (13 ())
        (2)
        (14 2 84 append2)
        (24 2)
        946
        (13 main)
        (13 ())
        (2)
        (13 ())
        (2)
        (14 2 84 append2)
        (24 2)
        945
        (23
          (18 1)
          (14 1 0 global-vars)
          (7)
          (8)
          (21 () 951)
          (13 let)
          (14 1 0 global-vars)
          (14 0 0 program)
          (13 ())
          (2)
          (2)
          (2)
          (15 0 0 program)
          (26)
          (19 () 952)
          951
          952
          (14 0 0 program)
          (25)
          (name ())
        )
        (24 1)
        954
        (22 () 953)
        (14 2 78 global-error)
        (16 string->list)
        (24 1)
        953
        (14 2 83 make-error-program)
        (24 1)
        (name ())
      )
      (24 2)
      (name parse-program)
    )
    (15 0 134 parse-program)
    (26)
    (22 () 956)
    (14 0 71 make-hash)
    (24 0)
    956
    (15 0 89 constants)
    (26)
    (22 () 957)
    (14 0 71 make-hash)
    (24 0)
    957
    (15 0 125 functions)
    (26)
    (22 () 958)
    (14 0 71 make-hash)
    (24 0)
    958
    (15 0 94 global-variables)
    (26)
    (22 () 959)
    (14 0 7 init-clex)
    (24 0)
    959
    (26)
    (22 () 960)
    (14 0 126 populate-predefined-functions)
    (24 0)
    960
    (26)
    (14 0 134 parse-program)
    (24 0)
    (name ())
  )
  (24 135)
  (name shmall)
)
(17 shmall)
(26)
(22 () 961)
(16 shmall)
(24 0)
961
(39)
(40)
(80)
)
