Basilloader.BasilVisitorASL visitor class
class type basilVisitor = object ... endval singletonVisitAction :
'a Common.Visitor.visitAction ->
'a list Common.Visitor.visitActionclass virtual basilTreeVisitor : basilVisitor -> object ... enda base class for treeVisitors transforming the AST. the method visit_stmts is left abstract for subclasses to implement.
class nopBasilVisitor : basilVisitorclass forwardBasilvisitor : basilVisitor -> object ... endval visit_prog :
basilVisitor ->
BasilIR.AbsBasilIR.moduleT ->
BasilIR.AbsBasilIR.moduleTval visit_block :
basilVisitor ->
BasilIR.AbsBasilIR.block ->
BasilIR.AbsBasilIR.block