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/trunk/src/system/smlnj/compiler/current.cm
ViewVC logotype

View of /sml/trunk/src/system/smlnj/compiler/current.cm

Parent Directory Parent Directory | Revision Log Revision Log

Revision 1078 - (download) (annotate)
Tue Feb 19 21:26:48 2002 UTC (18 years ago) by blume
File size: 2090 byte(s)
a mix of changes to CM and FFI
(* current.cm
 * Library exporting "visible" compiler for host architecture.
 * (C) 2001, Lucent Technologies, Bell Labs
 * author: Matthias Blume (blume@research.bell-labs.com)
	(* signatures *)
	signature STATS
	signature CONTROL
	signature SOURCE
	signature SOURCE_MAP
	signature ERRORMSG
	signature SYMBOL
	signature SYMPATH
	signature PERSSTAMPS
	signature STATICENV
	signature DYNAMICENV
	signature SYMENV
	signature ENVIRONMENT
	signature ENVREF	
	signature MODULE_ID
	signature PICKMOD
	signature UNPICKMOD
	signature PRETTYPRINT
	signature AST
	signature ABSYN
	signature SMLFILE
	signature BINFILE
	signature FLINT

	(* frontend stuff *)
	structure Stats
	structure Control
	structure Source
	structure SourceMap
	structure ErrorMsg
	structure Symbol
	structure SymPath
	structure PersStamps
	structure StaticEnv
	structure DynamicEnv
	structure SymbolicEnv
	structure Environment
	structure EnvRef	
	structure ModuleId
	structure GenModIdMap
	structure PickMod
	structure UnpickMod
	structure Rehash
	structure PickleSymPid
	structure UnpickleSymPid
	structure PrettyPrint
	structure CompilerPPTable
	structure Ast
	structure Absyn
	structure SmlFile
	structure Binfile
	structure PrintHooks
	structure CompilerVersion
	structure CompInfo
	structure CompileExn
	structure CoreSym
	structure FLINT

	(* the current backend *)
	structure Backend

# if defined(ARCH_ALPHA)
# elif defined(ARCH_MIPS)
#   if defined(BIG_ENDIAN)
#   else
#   endif
# elif defined(ARCH_HPPA)
# elif defined(ARCH_RS6000)
# elif defined(ARCH_PPC)
# elif defined(ARCH_SPARC)
# elif defined(ARCH_X86)
#   if defined(OPSYS_UNIX)
#   elif defined(OPSYS_WIN32)
#   else
#	error Strange OS (for x86)!
#   endif
# else
#   error Strange architecture!
# endif

ViewVC Help
Powered by ViewVC 1.0.0