Home My Page Projects Code Snippets Project Openings SML/NJ
Summary Activity Forums Tracker Lists Tasks Docs Surveys News SCM Files

SCM Repository

[smlnj] View of /sml/releases/release-110.36/ckit/src/ast-utils/copy/copy-ast-sig.sml
ViewVC logotype

View of /sml/releases/release-110.36/ckit/src/ast-utils/copy/copy-ast-sig.sml

Parent Directory Parent Directory | Revision Log Revision Log


Revision 930 - (download) (annotate)
Tue Sep 18 15:48:42 2001 UTC (20 years, 2 months ago)
File size: 1182 byte(s)
This commit was manufactured by cvs2svn to create tag
'release-110.36'.
(* Copyright (c) 1998 by Lucent Technologies *)

local 
  type aidctx = Tables.aidtab
  type 'a copier = aidctx -> 'a -> 'a

  type 'a extCopier = (Ast.expression copier * Ast.statement copier * Ast.externalDecl copier) -> 'a copier

  type expExt =
      (Ast.expression,Ast.statement,Ast.binop,Ast.unop) AstExt.expressionExt 
  type stmtExt =
      (Ast.expression,Ast.statement,Ast.binop,Ast.unop) AstExt.statementExt 
  type extDeclExt =
      (Ast.expression,Ast.statement,Ast.binop,Ast.unop) AstExt.externalDeclExt
in

signature COPYASTEXT = sig
  val copyExprExt    : expExt extCopier
  val copyStmtExt     : stmtExt extCopier
  val copyExtDeclExt  : extDeclExt extCopier
end

signature COPYAST = sig
  val copyAid         : Aid.uid copier
  val copyAst         : Ast.ast copier
  val copyExtDecl     : Ast.externalDecl copier
  val copyCoreExtDecl : Ast.coreExternalDecl copier
  val copyDecl        : Ast.declaration copier
  val copyStmt        : Ast.statement copier
  val copyCoreStmt    : Ast.coreStatement copier
  val copyExpr        : Ast.expression copier
  val copyCoreExpr    : Ast.coreExpression copier
  val copyInitExpr    : Ast.initExpression copier
end

end

root@smlnj-gforge.cs.uchicago.edu
ViewVC Help
Powered by ViewVC 1.0.0