blob: e7fdff17fa071e36909b839ca2ce28cee81fe34a (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
|
;#
;# Liste des toolkits WOK sous forme de full path
;#
proc FoundationClasses:toolkits { } {
return [list TKernel TKMath TKAdvTools]
}
;#
;# Autres UDs a prendre.
;#
proc FoundationClasses:ressources { } {
return [list [list both r OS {} ]] \
}
;
;#
;# retourne une liste de triplets {type <full path1> <target directory>/name}
;# permet de faire : cp <full path> $CASROOT/<target directory>/name
;# On peut ainsi embarquer des fichiers d'un peu partout et les dispatcher sous
;# la racine d'arrivee et ce avec un autre nom.
;# rien n'empeche de CALCULER automatiquement des paths dans cette proc.
;# type = source/runtime/both pour dire si le fichier va dans l'archive en question.
;# une deux (ou les deux) type d'archive fabriquees.
;#
proc FoundationClasses:freefiles { } {}
;#
;# Nom du module
;#
proc FoundationClasses:name { } {
return FoundationClasses
}
proc FoundationClasses:alias { } {
return FOC
}
proc FoundationClasses:depends { } {
return {}
}
;#
;# Liste des includes utilises qui ne sont pas ceux des Wb.
;#
proc FoundationClasses:CompileWith { } {
set l {}
switch -- [OS:os] {
HP-UX {
}
Linux {
lappend l "-I[lindex [wokparam -v %CSF_JavaHome] 0]/include"
lappend l "-I[lindex [wokparam -v %CSF_JavaHome] 0]/inclide/linux"
lappend l "[lindex [wokparam -v %CSF_TCL_HOME] 0]/include"
lappend l "[lindex [lindex [wokparam -v %STLPortInclude] 0] 0]"
}
SunOS {
lappend l "/usr/openwin/include"
lappend l "/usr/dt/include"
lappend l "[lindex [wokparam -v %CSF_CXX_INCLUDE] 0]"
lappend l "-I[lindex [wokparam -v %CSF_JavaHome] 0]/include"
lappend l "-I[lindex [wokparam -v %CSF_JavaHome] 0]/inclide/solaris"
lappend l "[lindex [wokparam -v %CSF_TCL_HOME] 0]/include"
}
IRIX {
lappend l "/usr/include/CC"
}
}
return $l
}
;#
;# Pre-requis pour la compilation ( -L ... )
;# Returns a list of directory that should be used in -L directives
;# while creating shareable.
;#
proc FoundationClasses:LinksoWith { } {
set l {}
switch -- [OS:os] {
HP-UX {
}
Linux {
}
SunOS {
}
IRIX {
lappend l /usr/lib32
}
}
return $l
}
;#
;# Returns a list of exported features.
;# source : Source files
;# runtime: Shareables
;# wokadm : WOK admin files
;# api : Public include files
;#
proc FoundationClasses:Export { } {
return [list source runtime wokadm api]
}
|
