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

Annotation of /trunk/tcltk98/generic/interface/SConscript

Parent Directory Parent Directory | Revision Log Revision Log


Revision 521 - (hide annotations) (download)
Fri Apr 21 05:35:59 2006 UTC (16 years, 2 months ago) by johnpye
File size: 2189 byte(s)
Getting the modular version the Tcl/Tk GUI working. In progress.
1 johnpye 386 Import('env')
2    
3     srcs = Split("""
4     AscBitmaps.c AscPrintTcl.c BrowLogRel_io.c BrowWhen_io.c
5     BrowserMethod.c BrowserProc.c BrowserQuery.c BrowserRel_io.c
6     Commands.c DebugProc.c DisplayProc.c
7     EnvVarProc.c HelpProc.c Integrators.c
8     LibraryProc.c Lsode.c MtxProc.c ProbeProc.c Qlfdid.c
9     ScriptProc.c Sensitivity.c SimsProc.c SlvProc.c
10     SolverProc.c UnitsProc.c UserData.c
11 johnpye 521 tkConsole.c old_utils.c Driver.c
12 johnpye 386 """)
13    
14 johnpye 498 if env['HAVE_LEX']:
15     typelexsource = 'typelex.l'
16 johnpye 520 else:
17 johnpye 498 typelexsource = 'typelex_no_flex.c'
18 johnpye 386
19 johnpye 521 tcl_env = env.Copy()
20    
21     typelex = tcl_env.SharedObject(typelexsource
22 johnpye 412 , LEXFLAGS = '-ll -Ptyp_'
23 johnpye 386 )
24    
25 johnpye 521 if tcl_env.has_key('TCL_CPPPATH'):
26     tcl_env.Append(CPPPATH=tcl_env['TCL_CPPPATH'])
27 johnpye 464
28 johnpye 521 if tcl_env.has_key('TK_CPPPATH'):
29     tcl_env.Append(CPPPATH=tcl_env['TK_CPPPATH'])
30 johnpye 428
31 johnpye 521 tcl_env.Append(LIBS=['ascend'])
32     tcl_env.Append(LIBPATH=['#'])
33 johnpye 428
34 johnpye 521 if tcl_env['STATIC_TCLTK']:
35     print "STATIC TCL/TK PROGRAM LINKAGE"
36     srcs += ['$TCL_LIB','$TK_LIB','$TKTABLE_LIB']
37     tcl_env.Append(LIBS=tcl_env['X11_LIB'])
38     tcl_env.Append(LIBPATH=tcl_env['X11_LIBPATH'])
39 johnpye 460
40 johnpye 521 tcl_env.Program("ascend4",["main.c"] + srcs)
41     else:
42     print "DYNAMIC TCL/TK PROGRAM LINKAGE"
43     #tcl_env.Append(LIBS=tcl_env['TCL_LIB'])
44     #tcl_env.Append(LIBS=tcl_env['TK_LIB'])
45 johnpye 432
46 johnpye 521 if tcl_env.has_key('TCL_LIBPATH'):
47     tcl_env.Append(LIBPATH=tcl_env['TCL_LIBPATH'])
48     if tcl_env.has_key('TK_LIBPATH'):
49     tcl_env.Append(LIBPATH=tcl_env['TK_LIBPATH'])
50 johnpye 432
51 johnpye 521 if tcl_env['TKTABLE_LIBPATH']:
52     tcl_env.Append(LIBPATH=tcl_env['TKTABLE_LIBPATH'])
53    
54     ascendtcl = tcl_env.SharedLibrary('ascendtcl',srcs+typelex)
55    
56     #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'))
58     #tktable_so = tcl_env.Command(Copy('$SHLIBPREFIX$TKTABLE_LIB$SHLIBSUFFIX','$TKTABLE_LIBPATH/$SHLIBPREFIX$TKTABLE_LIB$SHLIBSUFFIX'))
59    
60     tcl_env.Append(LIBPATH=['.'])
61    
62     tcl_env.Program("ascend4",["main.c"]
63     , LIBS = ['$TCL_LIB','$TK_LIB','$TKTABLE_LIB','ascendtcl','ascend']
64     )
65    
66     #tcl_env.Append(LIBS=['ascend','ascendtcl'])
67     #tcl_env.Append(LIBPATH=['.'])
68     #tcl_env.Program("ascend4",['main.c']
69     # , CPPPATH = ['#/base/generic']
70     #)
71    

john.pye@anu.edu.au
ViewVC Help
Powered by ViewVC 1.1.22