diff options
author | davygrvy <davygrvy@noemail.net> | 2004-01-15 22:20:37 (GMT) |
---|---|---|
committer | davygrvy <davygrvy@noemail.net> | 2004-01-15 22:20:37 (GMT) |
commit | b0b7d74d25452130a2ba73ebc111154d66ef515b (patch) | |
tree | eb1de93edebc79dde8f9d4b03f70942a9f5dc83f | |
parent | 16b7564d381976509b87b017f15588680471a487 (diff) | |
download | tcl-b0b7d74d25452130a2ba73ebc111154d66ef515b.zip tcl-b0b7d74d25452130a2ba73ebc111154d66ef515b.tar.gz tcl-b0b7d74d25452130a2ba73ebc111154d66ef515b.tar.bz2 |
* win/tclWinReg.c: Placed the requirement for advapi.lib
into the object file itself with #paragma comment (lib, ...)
when built with VC++. This will simplify linking for users of the
static library.
* win/makefile.vc: Removed 'advapi.lib' from $(baselibs).
FossilOrigin-Name: 6176b7ad8eb2278c5c100f9141c718abb9ec5fb8
-rw-r--r-- | win/makefile.vc | 4 | ||||
-rw-r--r-- | win/tclWinReg.c | 7 |
2 files changed, 7 insertions, 4 deletions
diff --git a/win/makefile.vc b/win/makefile.vc index fa2bc52..86f481f 100644 --- a/win/makefile.vc +++ b/win/makefile.vc @@ -12,7 +12,7 @@ # Copyright (c) 2001-2002 David Gravereaux. # #------------------------------------------------------------------------------ -# RCS: @(#) $Id: makefile.vc,v 1.115 2004/01/10 00:24:55 davygrvy Exp $ +# RCS: @(#) $Id: makefile.vc,v 1.116 2004/01/15 22:20:38 davygrvy Exp $ #------------------------------------------------------------------------------ !if "$(MSVCDIR)" == "" @@ -421,7 +421,7 @@ dlllflags = $(lflags) -dll conlflags = $(lflags) -subsystem:console guilflags = $(lflags) -subsystem:windows -baselibs = kernel32.lib advapi32.lib user32.lib +baselibs = kernel32.lib user32.lib #--------------------------------------------------------------------- diff --git a/win/tclWinReg.c b/win/tclWinReg.c index 4a2c841..32aa940 100644 --- a/win/tclWinReg.c +++ b/win/tclWinReg.c @@ -11,10 +11,13 @@ * See the file "license.terms" for information on usage and redistribution * of this file, and for a DISCLAIMER OF ALL WARRANTIES. * - * RCS: @(#) $Id: tclWinReg.c,v 1.24 2003/11/10 22:55:48 dgp Exp $ + * RCS: @(#) $Id: tclWinReg.c,v 1.25 2004/01/15 22:20:38 davygrvy Exp $ */ #include <tclPort.h> +#ifdef _MSC_VER +# pragma comment (lib, "advapi32.lib") +#endif #include <stdlib.h> /* @@ -212,7 +215,7 @@ int Registry_Init( Tcl_Interp *interp) { - if (!Tcl_InitStubs(interp, "8.0", 0)) { + if (Tcl_InitStubs(interp, "8.1", 0) == NULL) { return TCL_ERROR; } |