1 | %define tcl_major 8.4 |
---|
2 | %define tk_major 8.4 |
---|
3 | %define thread_major 2.6 |
---|
4 | %define itcl_major 3.2 |
---|
5 | %define itclvers %{itcl_major}.1 |
---|
6 | |
---|
7 | Summary: [Incr Tcl] OOP Extension for TCL |
---|
8 | Summary(ja): [Incr Tcl] TCL のオブジェクト指向拡張 |
---|
9 | Name: itcl |
---|
10 | Version: %{itclvers} |
---|
11 | Release: 1%{?_dist_release} |
---|
12 | Group: Development/Languages |
---|
13 | License: BSD |
---|
14 | Source0: http://prdownloads.sourceforge.net/incrtcl/itcl%{itclvers}_src.tgz |
---|
15 | Patch31: itcl-3.2.1-makecfg.patch |
---|
16 | |
---|
17 | BuildRequires: tcl >= %{tcl_major} |
---|
18 | BuildRequires: tk >= %{tk_major} |
---|
19 | BuildRequires: thread >= %{thread_major} |
---|
20 | Requires: tcl >= %{tcl_major} |
---|
21 | Requires: tk >= %{tk_major} |
---|
22 | Requires: thread >= %{thread_major} |
---|
23 | Buildroot: %{_tmppath}/%{name}-%{version}-root |
---|
24 | Distribution: Vine Linux |
---|
25 | Vendor: Project Vine |
---|
26 | |
---|
27 | %description |
---|
28 | [incr Tcl] is an object-oriented extension of the Tcl language. It |
---|
29 | was created to support more structured programming in Tcl. Tcl scripts |
---|
30 | that grow beyond a few thousand lines become extremely difficult to |
---|
31 | maintain. This is because the building blocks of vanilla Tcl are |
---|
32 | procedures and global variables, and all of these building blocks |
---|
33 | must reside in a single global namespace. There is no support for |
---|
34 | protection or encapsulation. |
---|
35 | |
---|
36 | [incr Tcl] introduces the notion of objects. Each object is a bag |
---|
37 | of data with a set of procedures or "methods" that are used to |
---|
38 | manipulate it. Objects are organized into "classes" with identical |
---|
39 | characteristics, and classes can inherit functionality from one |
---|
40 | another. This object-oriented paradigm adds another level of |
---|
41 | organization on top of the basic variable/procedure elements, and |
---|
42 | the resulting code is easier to understand and maintain. |
---|
43 | |
---|
44 | %description -l ja |
---|
45 | [incr Tcl] は Tcl 言語のオブジェクト指向な拡張キットで、Tcl で |
---|
46 | より構造的なプログラムをサポートするために作成されました。 |
---|
47 | 2, 3000 行を超えるくらい増えた Tcl スクリプトは、メンテナンスが極めて |
---|
48 | 困難です。これは vanilla Tcl を構成するブロックが手続きやグローバル変数 |
---|
49 | であり、それらすべてのブロック一つのグローバルな名前空間に属さなければ |
---|
50 | ならないためです。保護やカプセル化はサポートされておりません。 |
---|
51 | |
---|
52 | [incr Tcl]はオブジェクトの概念を導入します。各オブジェクトは、それを操作 |
---|
53 | するために使用する手続きや「方法」のセットを含んだデータのひと包みになり |
---|
54 | ます。オブジェクトはその識別特性により「クラス」化され、クラスはお互いに |
---|
55 | 機能を継承することができます。このオブジェクト指向のパラダイムにより、基 |
---|
56 | 本的な変数/手続きの要素の上に、別のレベルの組織化を行うことができます。 |
---|
57 | その結果、コードの理解やメンテナンスが容易になります。 |
---|
58 | |
---|
59 | %prep |
---|
60 | %setup -q -n %{name}%{itclvers} |
---|
61 | %patch31 -p1 -b .makecfg |
---|
62 | |
---|
63 | |
---|
64 | #========================================== |
---|
65 | %build |
---|
66 | |
---|
67 | # make the libraries reentrant |
---|
68 | RPM_OPT_FLAGS="$RPM_OPT_FLAGS -D_REENTRANT" |
---|
69 | |
---|
70 | #------------------------------------------ |
---|
71 | # Itcl |
---|
72 | # |
---|
73 | %configure \ |
---|
74 | --enable-shared \ |
---|
75 | --enable-threads \ |
---|
76 | --with-tcl=%{_libdir} \ |
---|
77 | --with-tk=%{_libdir} \ |
---|
78 | |
---|
79 | make |
---|
80 | |
---|
81 | #========================================== |
---|
82 | %install |
---|
83 | rm -rf ${RPM_BUILD_ROOT} |
---|
84 | mkdir -p ${RPM_BUILD_ROOT} |
---|
85 | rm -f *.files |
---|
86 | |
---|
87 | |
---|
88 | #------------------------------------------ |
---|
89 | # Itcl |
---|
90 | # |
---|
91 | %makeinstall \ |
---|
92 | ITCL_LIBRARY=$RPM_BUILD_ROOT%{_datadir}/itcl%{itcl_major} \ |
---|
93 | ITK_LIBRARY=$RPM_BUILD_ROOT%{_datadir}/itk%{itcl_major} |
---|
94 | |
---|
95 | # fixed *Config variables |
---|
96 | ln -sf ../itclConfig.sh $RPM_BUILD_ROOT%{_libdir}/itcl%{itcl_major}/itclConfig.sh |
---|
97 | ln -sf ../itkConfig.sh $RPM_BUILD_ROOT%{_libdir}/itk%{itcl_major}/itkConfig.sh |
---|
98 | |
---|
99 | echo "ITCL_SRC_DIR='%{_includedir}/tcl%{tcl_major}/'" >> $RPM_BUILD_ROOT%{_libdir}/itcl%{itcl_major}/itclConfig.sh |
---|
100 | echo "ITCL_BUILD_LIB_SPEC='-L%{_libdir} -litcl%{itcl_major}'" >> $RPM_BUILD_ROOT%{_libdir}/itcl%{itcl_major}/itclConfig.sh |
---|
101 | |
---|
102 | # install include files |
---|
103 | mkdir -p $RPM_BUILD_ROOT%{_includedir}/tcl%{tcl_major}/generic |
---|
104 | mkdir -p $RPM_BUILD_ROOT%{_includedir}/tk%{tk_major}/generic |
---|
105 | |
---|
106 | |
---|
107 | cp itcl/generic/*.h $RPM_BUILD_ROOT%{_includedir}/tcl%{tcl_major}/generic |
---|
108 | cp itk/generic/*.h $RPM_BUILD_ROOT%{_includedir}/tk%{tk_major}/generic |
---|
109 | |
---|
110 | rm -rf $RPM_BUILD_ROOT%{_mandir}/mann/dialog.* |
---|
111 | rm -rf $RPM_BUILD_ROOT%{_mandir}/mann/menubar.* |
---|
112 | |
---|
113 | echo "%%defattr(-,root,root)" > itcl.files |
---|
114 | (find ${RPM_BUILD_ROOT}%{_bindir} ${RPM_BUILD_ROOT}%{_includedir} \ |
---|
115 | ${RPM_BUILD_ROOT}%{_mandir} -type f -o -type l; |
---|
116 | find ${RPM_BUILD_ROOT}%{_libdir}/*) | cat - *.files \ |
---|
117 | | sort | uniq -u >> itcl.files |
---|
118 | |
---|
119 | set +x +H |
---|
120 | for n in `cat itcl.files`; do |
---|
121 | [ -f $n ] || continue |
---|
122 | head -1 $n | grep -q ^#! || continue |
---|
123 | chmod u+w $n |
---|
124 | perl -pi -e "s|${RPM_BUILD_ROOT}||" $n |
---|
125 | done |
---|
126 | set -x -H |
---|
127 | |
---|
128 | #========================================== |
---|
129 | # post process the *.files list, removing build sys references and mark |
---|
130 | # which are directories |
---|
131 | |
---|
132 | set +x |
---|
133 | for n in *.files; do |
---|
134 | mv $n $n.in |
---|
135 | sed "s|.*%{_prefix}\\>|%{_prefix}|" < $n.in | while read file; do |
---|
136 | if [ -d ${RPM_BUILD_ROOT}/$file ]; then |
---|
137 | echo -n '%dir ' |
---|
138 | fi |
---|
139 | echo $file |
---|
140 | done > $n |
---|
141 | rm -f $n.in |
---|
142 | done |
---|
143 | set -x |
---|
144 | |
---|
145 | # Man pages can be compressed |
---|
146 | perl -pi -e 's|(^%{_mandir}/man.*$)|\1\*|' *.files |
---|
147 | |
---|
148 | #========================================== |
---|
149 | %post -p /sbin/ldconfig -n itcl |
---|
150 | |
---|
151 | %postun -p /sbin/ldconfig -n itcl |
---|
152 | |
---|
153 | %clean |
---|
154 | rm -rf $RPM_BUILD_ROOT |
---|
155 | |
---|
156 | %files -f itcl.files -n itcl |
---|
157 | %defattr(-,root,root,-) |
---|
158 | %{_datadir}/itcl%{itcl_major} |
---|
159 | %{_datadir}/itk%{itcl_major} |
---|
160 | |
---|
161 | |
---|
162 | %changelog |
---|
163 | * Sat Jul 26 2008 Shu KONNO <owa@bg.wakwak.com> 3.2.1-1vl5 |
---|
164 | - applied new versioning policy and spec in utf-8 |
---|
165 | |
---|
166 | * Sun Feb 17 2008 Shu KONNO <owa@bg.wakwak.com> 3.2.1-0vl4 |
---|
167 | - rebuild with tcl/tk-8.4.18 |
---|
168 | |
---|
169 | * Tue Jan 01 2008 Shu KONNO <owa@bg.wakwak.com> 3.2.1-0vl3 |
---|
170 | - moved itcl script path to /usr/share/{itcl3.2,itk3.2} like tcl/tk |
---|
171 | |
---|
172 | * Tue Oct 09 2007 Shu KONNO <owa@bg.wakwak.com> 3.2.1-0vl2 |
---|
173 | - rebuild with tcl/tk-8.4.16 |
---|
174 | - changed macro %%thread_major to 2.6 |
---|
175 | - added {ITCL,ITK}_LIBRARY to %%makeinstall for lib64 support |
---|
176 | |
---|
177 | * Mon Mar 31 2003 KOBAYASHI R. Taizo <tkoba@vinelinux.org> 3.2.1-0vl1 |
---|
178 | - update based on BitWalk's tcltk-8.4.2-83bw |
---|
179 | |
---|
180 | * Thu Nov 15 2001 Kazuhisa TAKEI <takei@linux.or.jp> |
---|
181 | - split itcl |
---|
182 | |
---|
183 | * Sun Jul 15 2001 Daisuke SUZUKI <daisuke@linux.or.jp> 8.0.5_jp-10vl2 |
---|
184 | - expand some macros.. (FIXME) |
---|
185 | |
---|
186 | * Sat Jul 14 2001 Daisuke SUZUKI <daisuke@linux.or.jp> 8.0.5_jp-10vl1 |
---|
187 | - use %configure macros |
---|
188 | - add Patch 47,50 |
---|
189 | |
---|
190 | * Thu May 31 2001 <sagami@vinelinux.org> |
---|
191 | - 8.0.5_jp-10 |
---|
192 | - unexpand old %%{configure}, new one causes build failure |
---|
193 | - fixed missing libtkx.so libtclx.so symlink in /usr/lib |
---|
194 | - install manpages into %%{_mandir} and mode 644 |
---|
195 | |
---|
196 | * Wed Jul 19 2000 MATSUBAYASHI 'Shaolin' Kohji <shaolin@rhythmaning.org> |
---|
197 | - 8.0.5_jp-9 |
---|
198 | - modified %install section to handle compressed man pages |
---|
199 | - fixed /usr/lib/tk8.0jp/demos.jp/images symlink |
---|
200 | |
---|
201 | * Sun Jul 2 2000 Daisuke SUZUKI <daisuke@linux.or.jp> |
---|
202 | - changed default fonts |
---|
203 | |
---|
204 | * Tue Jan 25 2000 Jun Nishii <jun@vinelinux.org> |
---|
205 | - added defattr |
---|
206 | |
---|
207 | * Mon Jan 24 2000 Jun Nishii <jun@vinelinux.org> |
---|
208 | - added some symlinks, such as libtcl8.0.so. |
---|
209 | - obsoletes version number using _jp, now 8.0.5-31vl1 |
---|
210 | |
---|
211 | * Wed Jan 5 2000 Norihito Ohmori <nono@vinelinux.org> |
---|
212 | - Apply Tcl/Tk 8.0 Japanese Patch 1.7 |
---|
213 | |
---|
214 | * Tue Nov 30 1999 Jakub Jelinek <jakub@redhat.com> |
---|
215 | - fix tclX symlinks. |
---|
216 | - compile on systems where SIGPWR == SIGLOST. |
---|
217 | |
---|
218 | * Sat May 1 1999 Jeff Johnson <jbj@redhat.com> |
---|
219 | - update tcl/tk to 8.0.5. |
---|
220 | - avoid "containing" in Tix (#2332). |
---|
221 | |
---|
222 | * Thu Apr 8 1999 Jeff Johnson <jbj@redhat.com> |
---|
223 | - use /usr/bin/write in kibitz (#1320). |
---|
224 | - use cirrus.sprl.umich.edu in weather (#1926). |
---|
225 | |
---|
226 | * Sun Mar 21 1999 Cristian Gafton <gafton@redhat.com> |
---|
227 | - auto rebuild in the new build environment (release 28) |
---|
228 | |
---|
229 | * Mon Mar 08 1999 Preston Brown <pbrown@redhat.com> |
---|
230 | - whoops, exec-prefix for itcl was set to '/foo', changed to '/usr'. |
---|
231 | |
---|
232 | * Tue Feb 16 1999 Jeff Johnson <jbj@redhat.com> |
---|
233 | - expect does unaligned access on alpha (#989) |
---|
234 | - upgrade tcl/tk/tclX to 8.0.4 |
---|
235 | - upgrade expect to 5.28. |
---|
236 | - add itcl 3.0.1 |
---|
237 | |
---|
238 | * Tue Jan 12 1999 Cristian Gafton <gafton@redhat.com> |
---|
239 | - call libtoolize to allow building on the arm |
---|
240 | - build for glibc 2.1 |
---|
241 | - strip binaries |
---|
242 | |
---|
243 | * Thu Sep 10 1998 Jeff Johnson <jbj@redhat.com> |
---|
244 | - update tcl/tk/tclX to 8.0.3, expect is updated also. |
---|
245 | |
---|
246 | * Mon Jun 29 1998 Jeff Johnson <jbj@redhat.com> |
---|
247 | - expect: mkpasswd needs delay before sending password (problem #576) |
---|
248 | |
---|
249 | * Thu May 07 1998 Prospector System <bugs@redhat.com> |
---|
250 | - translations modified for de, fr, tr |
---|
251 | |
---|
252 | * Sat May 02 1998 Cristian Gafton <gafton@redhat.com> |
---|
253 | - fixed expect binaries exec permissions |
---|
254 | |
---|
255 | * Thu Apr 09 1998 Erik Troan <ewt@redhat.com> |
---|
256 | - updated to Tix 4.1.0.006 |
---|
257 | - updated version numbers of tcl/tk to relflect includsion of p2 |
---|
258 | |
---|
259 | * Wed Mar 25 1998 Cristian Gafton <gafton@redhat.com> |
---|
260 | - updated tcl/tk to patch level 2 |
---|
261 | - updated tclX to 8.0.2 |
---|
262 | |
---|
263 | * Thu Oct 30 1997 Otto Hammersmith <otto@redhat.com> |
---|
264 | - fixed filelist for tix... replacing path to the expect binary in scripts |
---|
265 | was leaving junk files around. |
---|
266 | |
---|
267 | * Wed Oct 22 1997 Otto Hammersmith <otto@redhat.com> |
---|
268 | - added patch to remove libieee test in configure.in for tcl and tk. |
---|
269 | Shoudln't be needed anymore for glibc systems, but this isn't the "proper" |
---|
270 | solution for all systems |
---|
271 | - fixed src urls |
---|
272 | |
---|
273 | * Mon Oct 06 1997 Erik Troan <ewt@redhat.com> |
---|
274 | - removed version numbers from descriptions |
---|
275 | |
---|
276 | * Mon Sep 22 1997 Erik Troan <ewt@redhat.com> |
---|
277 | - updated to tcl/tk 8.0 and related versions of packages |
---|
278 | |
---|
279 | * Tue Jun 17 1997 Erik Troan <ewt@redhat.com> |
---|
280 | - built against glibc |
---|
281 | - fixed dangling tclx/tkx symlinks |
---|