tcc4tcl
Check-in [5b517f12c1]
Login
HomeTimelineFilesBranchesTagsTicketsWiki
Overview
Comment:Updated to be more simple about loading objects
Timelines: family | ancestors | descendants | both | trunk
Files: files | file ages | folders
SHA1: 5b517f12c10e17da4f0b1ceaf8147ba303854092
User & Date: rkeene on 2014-05-02 01:50:21
Other Links: manifest | tags
Context
2014-05-02
02:56
Updated namespace and command to be called "tcc4tcl" check-in: 7a4c3ad58c user: rkeene tags: trunk
01:50
Updated to be more simple about loading objects check-in: 5b517f12c1 user: rkeene tags: trunk
01:36
Updated to produce working pkgIndex.tcl file check-in: 0e7070d332 user: rkeene tags: trunk
Changes
Hide Diffs Side-by-Side Diffs Ignore Whitespace Patch

Modified .fossil-settings/ignore-glob from [666d734a04] to [0f084d884a]. 

1
2
3
4
5
6
7
8
9
10
11
12
13
14

1
2
3
4
5
6
7
8
9
10
11
12

13













-


aclocal.m4
aclocal/shobj.m4
aclocal/tcl.m4
aclocal/versionscript.m4
config.guess
config.sub
config.log
config.status
configure
install-sh
Makefile
pkgIndex.tcl
pkgIndex.tcl.tmpl
tcc/*

Modified Makefile.in from [9e8d17e35d] to [0b56aecef2].

︙
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

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








-
-
-















-
+












tcltcc-static.a: tcltcc.o tcc/libtcc.a
	cp tcc/libtcc.a tcltcc-static.new.a
	$(AR) rcu tcltcc-static.new.a tcltcc.o
	-$(RANLIB) tcltcc-static.new.a
	mv tcltcc-static.new.a tcltcc-static.a

pkgIndex.tcl: pkgIndex.tcl.tmpl
	if [ "${TARGETS}" = 'tcltcc-static.a' ]; then awk '/^STATIC:/{ $$1 = ""; print }'; else awk '/^SHARED:/{ $$1 = ""; print }'; fi < pkgIndex.tcl.tmpl | sed 's@^ @@' > pkgIndex.tcl

install: $(TARGETS) pkgIndex.tcl tcc/libtcc1.a
	$(INSTALL) -d "$(DESTDIR)$(PACKAGE_INSTALL_DIR)"
	$(INSTALL) -m 0755 $(TARGETS) "$(DESTDIR)$(PACKAGE_INSTALL_DIR)"
	$(INSTALL) -m 0644 pkgIndex.tcl "$(DESTDIR)$(PACKAGE_INSTALL_DIR)"
	$(INSTALL) -m 0644 tcc/libtcc1.a "$(DESTDIR)$(PACKAGE_INSTALL_DIR)"

clean:
	rm -f tcltcc.o
	rm -f tcltcc.@SHOBJEXT@ tcltcc-static.a
	rm -f tcltcc.@SHOBJEXT@.a tcltcc.@SHOBJEXT@.def
	-$(MAKE) -C tcc clean

distclean: clean
	rm -rf autom4te.cache
	rm -f config.log config.status
	rm -f pkgIndex.tcl pkgIndex.tcl.tmpl
	rm -f pkgIndex.tcl
	rm -f Makefile
	-$(MAKE) -C tcc distclean

mrproper: distclean
	rm -rf __TMP__
	rm -rf tcc
	rm -f configure aclocal.m4
	rm -f config.guess config.sub install-sh

.PHONY: all install clean distclean mrproper

Modified configure.ac from [248f926e05] to [7c8c9edb2e].

︙
37
38
39
40
41
42
43
44


37
38
39
40
41
42
43

44








-
+

dnl Look for appropriate headers
AC_CHECK_HEADERS(unistd.h stdlib.h string.h strings.h dlfcn.h dl.h)

dnl Perform Tcl Extension required stuff
TCLEXT_INIT

dnl Produce output
AC_OUTPUT(Makefile pkgIndex.tcl.tmpl)
AC_OUTPUT(Makefile pkgIndex.tcl)

Renamed and modified pkgIndex.tcl.tmpl.in [183dffb085] to pkgIndex.tcl.in [c9a6ef9ff1]. 

1

2


1


-
+
-

STATIC: package ifneeded tcc4tcl @PACKAGE_VERSION@ [list source [file join $dir tcc.tcl]]
package ifneeded tcc4tcl @PACKAGE_VERSION@ [list source [file join $dir tcc.tcl]]
SHARED: package ifneeded tcc4tcl @PACKAGE_VERSION@ [list load [file join $dir tcc4tcl.@SHOBJEXT@]]\;\ [list source [file join $dir tcc.tcl]]

Modified tcc.tcl from [b543309b89] to [c56e45f7c0].

︙
9
10
11
12
13
14
15
16
17

18
19
20
21
22
23
24
25
26
27

9
10
11
12
13
14
15


16



17
18
19
20
21
22
23








-
-
+
-
-
-








   variable commands

   set dir [file dirname [info script]]
   if {[info command ::tcc] == ""} {
      catch { load {} tcc }
   }
   if {[info command ::tcc] == ""} {
       switch -exact -- $::tcl_platform(platform) {
	       windows { load $dir/tcc04.dll tcc }
       load [file join $dir tcctcl[info sharedlibextension]] tcc
	       unix { load $dir/libtcc0.4.so tcc }
	       default {error "unsupport platform"}
       }
   }
   set libs $dir/lib
   set includes $dir/include
   set count 0
   set command_count 0
   array set commands {}
   proc new {} {
︙

Powered by Fossil · RSS