/[ascend]/trunk/tcltk98/generic/interface/SConscript
ViewVC logotype

Diff of /trunk/tcltk98/generic/interface/SConscript

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 551 by johnpye, Tue Apr 25 23:57:49 2006 UTC revision 552 by johnpye, Sat Apr 29 08:53:04 2006 UTC
# Line 22  typelex = tcl_env.SharedObject(typelexso Line 22  typelex = tcl_env.SharedObject(typelexso
22      , LEXFLAGS = '-ll -Ptyp_'      , LEXFLAGS = '-ll -Ptyp_'
23  )  )
24    
25  if tcl_env.has_key('TCL_CPPPATH'):  if tcl_env.get('TCL_CPPPATH'):
26      tcl_env.Append(CPPPATH=tcl_env['TCL_CPPPATH'])      tcl_env.Append(CPPPATH=tcl_env['TCL_CPPPATH'])
27    
28  if tcl_env.has_key('TK_CPPPATH'):  if tcl_env.get('TK_CPPPATH'):
29      tcl_env.Append(CPPPATH=tcl_env['TK_CPPPATH'])      tcl_env.Append(CPPPATH=tcl_env['TK_CPPPATH'])
30    
31  tcl_env.Append(LIBS=['ascend'])  tcl_env.Append(LIBS=['ascend'])
32  tcl_env.Append(LIBPATH=['#'])  tcl_env.Append(LIBPATH=['#'])
33    
34  if tcl_env['STATIC_TCLTK']:  if tcl_env.get('STATIC_TCLTK'):
35      print "STATIC TCL/TK PROGRAM LINKAGE"      print "STATIC TCL/TK PROGRAM LINKAGE"
36      srcs += ['$TCL_LIB','$TK_LIB','$TKTABLE_LIB']      srcs += ['$TCL_LIB','$TK_LIB','$TKTABLE_LIB']
37      tcl_env.Append(LIBS=tcl_env['X11_LIB'])      tcl_env.Append(LIBS=tcl_env['X11_LIB'])
# Line 51  else: Line 51  else:
51      if tcl_env['TKTABLE_LIBPATH']:      if tcl_env['TKTABLE_LIBPATH']:
52          tcl_env.Append(LIBPATH=tcl_env['TKTABLE_LIBPATH'])          tcl_env.Append(LIBPATH=tcl_env['TKTABLE_LIBPATH'])
53    
54      ascendtcl = tcl_env.SharedLibrary('ascendtcl',srcs+typelex)      ascendtcllib = tcl_env.SharedLibrary('ascendtcl',srcs+typelex)
55    
56      #tcl_so = tcl_env.Command(Copy('$SHLIBPREFIX$TCL_LIB$SHLIBSUFFIX','$TCL_LIBPATH/$SHLIBPREFIX$TCL_LIB$SHLIBSUFFIX'))      #tcl_so = tcl_env.Command(Copy('$SHLIBPREFIX$TCL_LIB$SHLIBSUFFIX','$TCL_LIBPATH/$SHLIBPREFIX$TCL_LIB$SHLIBSUFFIX'))
57      #tk_so = tcl_env.Command(Copy('$SHLIBPREFIX$TK_LIB$SHLIBSUFFIX','$TK_LIBPATH/$SHLIBPREFIX$TK_LIB$SHLIBSUFFIX'))      #tk_so = tcl_env.Command(Copy('$SHLIBPREFIX$TK_LIB$SHLIBSUFFIX','$TK_LIBPATH/$SHLIBPREFIX$TK_LIB$SHLIBSUFFIX'))
# Line 59  else: Line 59  else:
59    
60      tcl_env.Append(LIBPATH=['.'])      tcl_env.Append(LIBPATH=['.'])
61    
62      tcl_env.Program("ascend4",["main.c"]      ascendtclprog = tcl_env.Program("ascend4",["main.c"]
63          , LIBS = ['$TCL_LIB','$TK_LIB','$TKTABLE_LIB','ascendtcl','ascend']          , LIBS = ['$TCL_LIB','$TK_LIB','$TKTABLE_LIB','ascendtcl','ascend']
64      )      )
65    
66      #tcl_env.Append(LIBS=['ascend','ascendtcl'])      if tcl_env.get('CAN_INSTALL'):
67      #tcl_env.Append(LIBPATH=['.'])          env.InstallProgram(env['INSTALL_ROOT']+env['INSTALL_BIN'],ascendtclprog)
68      #tcl_env.Program("ascend4",['main.c']          env.InstallProgram(env['INSTALL_ROOT']+env['INSTALL_LIB'],ascendtcllib)
69      #   , CPPPATH = ['#/base/generic']  
70      #)          import glob
71    
72            sharedata = env['INSTALL_ROOT']+env['INSTALL_DATA']+"/ascend"
73            tkdir = sharedata + "/tcltk/"
74    
75            import os
76            import os.path
77        
78            cd = os.getcwd()
79            os.chdir(env.Dir("#tcltk98/TK").abspath)
80    
81            files = {}
82    
83            for root, dirs, files in os.walk("."):
84                #print root, "..."
85                dest = os.path.normpath(os.path.join(env.subst(tkdir),root))
86                for name in files:
87                    env.Install(env.subst(dest),"#tcltk98/TK/"+os.path.join(root, name))
88                    #print dest,"<---",os.path.join(root, name)
89    
90                if 'CVS' in dirs:
91                    dirs.remove('CVS')  # don't visit CVS directories
92                if '.svn' in dirs:
93                    dirs.remove('.svn')  # don't visit .svn directories
94    
95            os.chdir(cd)
Legend:
Removed from v.551  
changed lines
  Added in v.552
john.pye@anu.edu.au
 ViewVC Help
Powered by ViewVC 1.1.22