annotate nt/installer/Wise/filelist.py @ 4745:0c54de4c4b9d

Resolve the unregistered-CCL-programs-get-garbage-collected problem correctly src/ChangeLog addition: 2009-11-15 Aidan Kehoe <kehoea@parhasard.net> * mule-ccl.c (CCL_CALL_FOR_MAP_INSTRUCTION): Assert that we always have a symbol in this macro. (setup_ccl_program): Ensure we're not allocating unreachable memory in this function; all symbols must have been resolved in a given CCL program before this function is called. (find_ccl_program): New function, return a CCL program with all its symbols resolved if it is valid (possibly allocating memory), Qnil otherwise. (get_ccl_program): New function, exported to other files; call find_ccl_program, and error if it gives nil. (Fccl_program_p): Call find_ccl_program from this function instead of implementing the bulk of it here. (Fccl_execute): Call get_ccl_program instead of implementing the bulk of it here. (Fccl_execute_on_string): Ditto. * mule-ccl.h (Vfont_ccl_encoder_alist): Remove this declaration, it hasn't been used in years. (get_ccl_program): Declare this function. * mule-coding.c (ccl_putprop): Use get_ccl_program on any specified encode or decode CCL program property. (fixed_width_putprop): Ditto. * mule-charset.c (Fmake_charset): Use get_ccl_program on any specified ccl-program. (Fset_charset_ccl_program): Ditto.
author Aidan Kehoe <kehoea@parhasard.net>
date Sun, 15 Nov 2009 16:53:14 +0000
parents 74fd4e045ea6
children
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
398
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
1 import os
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
2 import dirs
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
3 import string
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
4
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
5 def listdir_recursive(basedir):
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
6 ret = []
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
7 for f in os.listdir(basedir):
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
8 if os.path.isfile(basedir+"\\"+f):
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
9 ret.append(f)
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
10 elif os.path.isdir(basedir+"\\"+f):
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
11 for f1 in listdir_recursive(basedir+"\\"+f):
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
12 ret.append(f+"\\"+f1)
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
13 return ret
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
14
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
15 all = []
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
16
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
17
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
18
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
19 for f in listdir_recursive(dirs.installed):
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
20 if string.find(f,'CVS')>=0:
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
21 continue
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
22 all.append((f, dirs.installed, dirs.dst))
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
23