Update semantic-analyzer.scm