(define terminals '#( abc <$> )) (define non-terminals '#( thing )) (define actions (literal #( (action-list:cons 0 (action:shift 1) (action-list:nil)) (action-list:cons 1 (action:reduce 1 1) (action-list:nil)) (action-list:cons 1 (action:shift 3) (action-list:nil)) (action-list:cons 2 (action:reduce 2 0) (action-list:nil)) ))) (define goto (literal #( (goto-list:cons 1 2 (goto-list:nil)) (goto-list:nil) (goto-list:nil) (goto-list:nil) )))