Added the generation of the function [symbol], which has type
['a lr1state -> 'a symbol] and maps a state (an abstract datum) to (a code for) its incoming symbol. This allows inspecting the semantic values stored in the stack. Updated the demo [calc-incremental] to display the contents of the stack at every token. It seems to work!
Showing with 172 additions and 11 deletions