Artifact
d5192908e234a8101ae9aa40fa8e1395d6f738af:
0000: 3b 3b 20 2d 2a 2d 20 6d 6f 64 65 3a 20 53 63 68 ;; -*- mode: Sch
0010: 65 6d 65 3b 20 74 61 62 2d 77 69 64 74 68 3a 20 eme; tab-width:
0020: 32 3b 20 2d 2a 2d 20 3b 3b 0a 0a 28 64 65 66 69 2; -*- ;;..(defi
0030: 6e 65 20 6d 6f 64 75 6c 65 73 0a 09 60 28 2d 6a ne modules..`(-j
0040: 20 69 75 70 0a 09 09 2d 6a 20 69 75 70 2d 62 61 iup...-j iup-ba
0050: 73 65 20 2d 6a 20 69 75 70 2d 63 6f 6e 74 72 6f se -j iup-contro
0060: 6c 73 20 2d 6a 20 69 75 70 2d 64 69 61 6c 6f 67 ls -j iup-dialog
0070: 73 0a 09 09 2c 40 28 63 6f 6e 64 2d 65 78 70 61 s...,@(cond-expa
0080: 6e 64 0a 09 09 09 20 5b 64 69 73 61 62 6c 65 2d nd.... [disable-
0090: 69 75 70 2d 67 6c 63 61 6e 76 61 73 0a 09 09 09 iup-glcanvas....
00a0: 09 27 28 29 5d 0a 09 09 09 20 5b 65 6c 73 65 0a .'()].... [else.
00b0: 09 09 09 09 27 28 2d 6a 20 69 75 70 2d 67 6c 63 ....'(-j iup-glc
00c0: 61 6e 76 61 73 29 5d 29 0a 09 09 2c 40 28 63 6f anvas)])...,@(co
00d0: 6e 64 2d 65 78 70 61 6e 64 0a 09 09 09 20 5b 64 nd-expand.... [d
00e0: 69 73 61 62 6c 65 2d 69 75 70 2d 70 70 6c 6f 74 isable-iup-pplot
00f0: 0a 09 09 09 09 27 28 29 5d 0a 09 09 09 20 5b 65 .....'()].... [e
0100: 6c 73 65 0a 09 09 09 09 27 28 2d 6a 20 69 75 70 lse.....'(-j iup
0110: 2d 70 70 6c 6f 74 29 5d 29 0a 09 09 2c 40 28 63 -pplot)])...,@(c
0120: 6f 6e 64 2d 65 78 70 61 6e 64 0a 09 09 09 20 5b ond-expand.... [
0130: 64 69 73 61 62 6c 65 2d 69 75 70 2d 77 65 62 0a disable-iup-web.
0140: 09 09 09 09 27 28 29 5d 0a 09 09 09 20 5b 65 6c ....'()].... [el
0150: 73 65 0a 09 09 09 09 27 28 2d 6a 20 69 75 70 2d se.....'(-j iup-
0160: 77 65 62 29 5d 29 29 29 0a 0a 28 64 65 66 69 6e web)])))..(defin
0170: 65 20 69 6d 70 6f 72 74 2d 6c 69 62 72 61 72 69 e import-librari
0180: 65 73 0a 09 60 28 22 69 75 70 2e 69 6d 70 6f 72 es..`("iup.impor
0190: 74 2e 73 6f 22 0a 09 09 22 69 75 70 2d 62 61 73 t.so"..."iup-bas
01a0: 65 2e 69 6d 70 6f 72 74 2e 73 6f 22 20 22 69 75 e.import.so" "iu
01b0: 70 2d 63 6f 6e 74 72 6f 6c 73 2e 69 6d 70 6f 72 p-controls.impor
01c0: 74 2e 73 6f 22 20 22 69 75 70 2d 64 69 61 6c 6f t.so" "iup-dialo
01d0: 67 73 2e 69 6d 70 6f 72 74 2e 73 6f 22 0a 09 09 gs.import.so"...
01e0: 2c 40 28 63 6f 6e 64 2d 65 78 70 61 6e 64 0a 09 ,@(cond-expand..
01f0: 09 09 20 5b 64 69 73 61 62 6c 65 2d 69 75 70 2d .. [disable-iup-
0200: 67 6c 63 61 6e 76 61 73 0a 09 09 09 09 27 28 29 glcanvas.....'()
0210: 5d 0a 09 09 09 20 5b 65 6c 73 65 0a 09 09 09 09 ].... [else.....
0220: 27 28 22 69 75 70 2d 67 6c 63 61 6e 76 61 73 2e '("iup-glcanvas.
0230: 69 6d 70 6f 72 74 2e 73 6f 22 29 5d 29 0a 09 09 import.so")])...
0240: 2c 40 28 63 6f 6e 64 2d 65 78 70 61 6e 64 0a 09 ,@(cond-expand..
0250: 09 09 20 5b 64 69 73 61 62 6c 65 2d 69 75 70 2d .. [disable-iup-
0260: 70 70 6c 6f 74 0a 09 09 09 09 27 28 29 5d 0a 09 pplot.....'()]..
0270: 09 09 20 5b 65 6c 73 65 0a 09 09 09 09 27 28 22 .. [else.....'("
0280: 69 75 70 2d 70 70 6c 6f 74 2e 69 6d 70 6f 72 74 iup-pplot.import
0290: 2e 73 6f 22 29 5d 29 0a 09 09 2c 40 28 63 6f 6e .so")])...,@(con
02a0: 64 2d 65 78 70 61 6e 64 0a 09 09 09 20 5b 64 69 d-expand.... [di
02b0: 73 61 62 6c 65 2d 69 75 70 2d 77 65 62 0a 09 09 sable-iup-web...
02c0: 09 09 27 28 29 5d 0a 09 09 09 20 5b 65 6c 73 65 ..'()].... [else
02d0: 0a 09 09 09 09 27 28 22 69 75 70 2d 77 65 62 2e .....'("iup-web.
02e0: 69 6d 70 6f 72 74 2e 73 6f 22 29 5d 29 29 29 0a import.so")]))).
02f0: 0a 28 64 65 66 69 6e 65 20 6e 61 74 69 76 65 2d .(define native-
0300: 6c 69 62 72 61 72 69 65 73 0a 09 60 28 22 2d 6c libraries..`("-l
0310: 63 61 6c 6c 62 61 63 6b 22 0a 09 09 22 2d 6c 69 callback"..."-li
0320: 75 70 22 20 22 2d 6c 69 75 70 69 6d 22 20 22 2d up" "-liupim" "-
0330: 6c 69 75 70 69 6d 67 6c 69 62 22 20 22 2d 6c 69 liupimglib" "-li
0340: 75 70 63 6f 6e 74 72 6f 6c 73 22 0a 09 09 2c 40 upcontrols"...,@
0350: 28 63 6f 6e 64 2d 65 78 70 61 6e 64 0a 09 09 09 (cond-expand....
0360: 20 5b 64 69 73 61 62 6c 65 2d 69 75 70 2d 67 6c [disable-iup-gl
0370: 63 61 6e 76 61 73 0a 09 09 09 09 27 28 29 5d 0a canvas.....'()].
0380: 09 09 09 20 5b 65 6c 73 65 0a 09 09 09 09 27 28 ... [else.....'(
0390: 22 2d 6c 69 75 70 67 6c 22 29 5d 29 0a 09 09 2c "-liupgl")])...,
03a0: 40 28 63 6f 6e 64 2d 65 78 70 61 6e 64 0a 09 09 @(cond-expand...
03b0: 09 20 5b 64 69 73 61 62 6c 65 2d 69 75 70 2d 70 . [disable-iup-p
03c0: 70 6c 6f 74 0a 09 09 09 09 27 28 29 5d 0a 09 09 plot.....'()]...
03d0: 09 20 5b 65 6c 73 65 0a 09 09 09 09 27 28 22 2d . [else.....'("-
03e0: 6c 69 75 70 5f 70 70 6c 6f 74 22 29 5d 29 0a 09 liup_pplot")])..
03f0: 09 2c 40 28 63 6f 6e 64 2d 65 78 70 61 6e 64 0a .,@(cond-expand.
0400: 09 09 09 20 5b 64 69 73 61 62 6c 65 2d 69 75 70 ... [disable-iup
0410: 2d 77 65 62 0a 09 09 09 09 27 28 29 5d 0a 09 09 -web.....'()]...
0420: 09 20 5b 65 6c 73 65 0a 09 09 09 09 27 28 22 2d . [else.....'("-
0430: 6c 69 75 70 77 65 62 22 29 5d 29 29 29 0a 0a 28 liupweb")])))..(
0440: 63 6f 6d 70 69 6c 65 20 2d 73 20 2d 4f 32 20 2d compile -s -O2 -
0450: 64 31 20 22 69 75 70 2e 73 63 6d 22 20 2c 40 6d d1 "iup.scm" ,@m
0460: 6f 64 75 6c 65 73 20 2c 40 6e 61 74 69 76 65 2d odules ,@native-
0470: 6c 69 62 72 61 72 69 65 73 29 0a 28 63 6f 6d 70 libraries).(comp
0480: 69 6c 65 20 2d 63 20 2d 4f 32 20 2d 64 31 20 22 ile -c -O2 -d1 "
0490: 69 75 70 2e 73 63 6d 22 20 2d 75 6e 69 74 20 69 iup.scm" -unit i
04a0: 75 70 29 0a 28 63 6f 6d 70 69 6c 65 20 2d 73 20 up).(compile -s
04b0: 2d 4f 32 20 2d 64 30 20 22 69 75 70 2e 69 6d 70 -O2 -d0 "iup.imp
04c0: 6f 72 74 2e 73 63 6d 22 29 0a 28 63 6f 6d 70 69 ort.scm").(compi
04d0: 6c 65 20 2d 73 20 2d 4f 32 20 2d 64 30 20 22 69 le -s -O2 -d0 "i
04e0: 75 70 2d 62 61 73 65 2e 69 6d 70 6f 72 74 2e 73 up-base.import.s
04f0: 63 6d 22 29 0a 28 63 6f 6d 70 69 6c 65 20 2d 73 cm").(compile -s
0500: 20 2d 4f 32 20 2d 64 30 20 22 69 75 70 2d 63 6f -O2 -d0 "iup-co
0510: 6e 74 72 6f 6c 73 2e 69 6d 70 6f 72 74 2e 73 63 ntrols.import.sc
0520: 6d 22 29 0a 28 63 6f 6d 70 69 6c 65 20 2d 73 20 m").(compile -s
0530: 2d 4f 32 20 2d 64 30 20 22 69 75 70 2d 64 69 61 -O2 -d0 "iup-dia
0540: 6c 6f 67 73 2e 69 6d 70 6f 72 74 2e 73 63 6d 22 logs.import.scm"
0550: 29 0a 0a 28 63 6f 6e 64 2d 65 78 70 61 6e 64 0a )..(cond-expand.
0560: 20 5b 64 69 73 61 62 6c 65 2d 69 75 70 2d 67 6c [disable-iup-gl
0570: 63 61 6e 76 61 73 5d 0a 20 5b 65 6c 73 65 0a 09 canvas]. [else..
0580: 28 63 6f 6d 70 69 6c 65 20 2d 73 20 2d 4f 32 20 (compile -s -O2
0590: 2d 64 30 20 22 69 75 70 2d 67 6c 63 61 6e 76 61 -d0 "iup-glcanva
05a0: 73 2e 69 6d 70 6f 72 74 2e 73 63 6d 22 29 5d 29 s.import.scm")])
05b0: 0a 28 63 6f 6e 64 2d 65 78 70 61 6e 64 0a 20 5b .(cond-expand. [
05c0: 64 69 73 61 62 6c 65 2d 69 75 70 2d 70 70 6c 6f disable-iup-pplo
05d0: 74 5d 0a 20 5b 65 6c 73 65 0a 09 28 63 6f 6d 70 t]. [else..(comp
05e0: 69 6c 65 20 2d 73 20 2d 4f 32 20 2d 64 30 20 22 ile -s -O2 -d0 "
05f0: 69 75 70 2d 70 70 6c 6f 74 2e 69 6d 70 6f 72 74 iup-pplot.import
0600: 2e 73 63 6d 22 29 5d 29 0a 28 63 6f 6e 64 2d 65 .scm")]).(cond-e
0610: 78 70 61 6e 64 0a 20 5b 64 69 73 61 62 6c 65 2d xpand. [disable-
0620: 69 75 70 2d 77 65 62 5d 0a 20 5b 65 6c 73 65 0a iup-web]. [else.
0630: 09 28 63 6f 6d 70 69 6c 65 20 2d 73 20 2d 4f 32 .(compile -s -O2
0640: 20 2d 64 30 20 22 69 75 70 2d 77 65 62 2e 69 6d -d0 "iup-web.im
0650: 70 6f 72 74 2e 73 63 6d 22 29 5d 29 0a 0a 28 69 port.scm")])..(i
0660: 6e 73 74 61 6c 6c 2d 65 78 74 65 6e 73 69 6f 6e nstall-extension
0670: 0a 20 27 69 75 70 0a 20 60 28 22 69 75 70 2e 73 . 'iup. `("iup.s
0680: 6f 22 20 22 69 75 70 2e 6f 22 20 22 69 75 70 2d o" "iup.o" "iup-
0690: 74 79 70 65 73 2e 73 63 6d 22 20 2c 40 69 6d 70 types.scm" ,@imp
06a0: 6f 72 74 2d 6c 69 62 72 61 72 69 65 73 29 0a 20 ort-libraries).
06b0: 60 28 28 76 65 72 73 69 6f 6e 20 31 2e 32 2e 31 `((version 1.2.1
06c0: 29 0a 09 20 28 73 74 61 74 69 63 20 22 69 75 70 ).. (static "iup
06d0: 2d 62 61 73 65 2e 6f 22 29 0a 09 20 28 73 74 61 -base.o").. (sta
06e0: 74 69 63 2d 6f 70 74 69 6f 6e 73 20 2c 28 73 74 tic-options ,(st
06f0: 72 69 6e 67 2d 69 6e 74 65 72 73 70 65 72 73 65 ring-intersperse
0700: 20 6e 61 74 69 76 65 2d 6c 69 62 72 61 72 69 65 native-librarie
0710: 73 29 29 29 29 0a 0a 28 63 6f 6d 70 69 6c 65 20 s))))..(compile
0720: 2d 73 20 2d 4f 32 20 2d 64 31 20 22 69 75 70 2d -s -O2 -d1 "iup-
0730: 64 79 6e 61 6d 69 63 2e 73 63 6d 22 20 2d 6a 20 dynamic.scm" -j
0740: 69 75 70 2d 64 79 6e 61 6d 69 63 29 0a 28 63 6f iup-dynamic).(co
0750: 6d 70 69 6c 65 20 2d 63 20 2d 4f 32 20 2d 64 31 mpile -c -O2 -d1
0760: 20 22 69 75 70 2d 64 79 6e 61 6d 69 63 2e 73 63 "iup-dynamic.sc
0770: 6d 22 20 2d 6a 20 69 75 70 2d 64 79 6e 61 6d 69 m" -j iup-dynami
0780: 63 20 2d 75 6e 69 74 20 69 75 70 2d 64 79 6e 61 c -unit iup-dyna
0790: 6d 69 63 29 0a 28 63 6f 6d 70 69 6c 65 20 2d 73 mic).(compile -s
07a0: 20 2d 4f 32 20 2d 64 30 20 22 69 75 70 2d 64 79 -O2 -d0 "iup-dy
07b0: 6e 61 6d 69 63 2e 69 6d 70 6f 72 74 2e 73 63 6d namic.import.scm
07c0: 22 29 0a 0a 28 69 6e 73 74 61 6c 6c 2d 65 78 74 ")..(install-ext
07d0: 65 6e 73 69 6f 6e 0a 20 27 69 75 70 2d 64 79 6e ension. 'iup-dyn
07e0: 61 6d 69 63 0a 20 27 28 22 69 75 70 2d 64 79 6e amic. '("iup-dyn
07f0: 61 6d 69 63 2e 73 6f 22 20 22 69 75 70 2d 64 79 amic.so" "iup-dy
0800: 6e 61 6d 69 63 2e 6f 22 20 22 69 75 70 2d 64 79 namic.o" "iup-dy
0810: 6e 61 6d 69 63 2e 69 6d 70 6f 72 74 2e 73 6f 22 namic.import.so"
0820: 29 0a 20 27 28 28 76 65 72 73 69 6f 6e 20 31 2e ). '((version 1.
0830: 32 2e 31 29 0a 20 20 20 28 73 74 61 74 69 63 20 2.1). (static
0840: 22 69 75 70 2d 64 79 6e 61 6d 69 63 2e 6f 22 29 "iup-dynamic.o")
0850: 29 29 0a )).