Mercurial > vim
view src/dehqx.py @ 25270:a3c07227ffde v8.2.3172
patch 8.2.3172: MzScheme test fails
Commit: https://github.com/vim/vim/commit/20c370d9f2ee89cb854054edf71f5004f6efff77
Author: Bram Moolenaar <Bram@vim.org>
Date: Fri Jul 16 10:39:28 2021 +0200
patch 8.2.3172: MzScheme test fails
Problem: MzScheme test fails. (Christian Brabandt)
Solution: Correct function name.
author | Bram Moolenaar <Bram@vim.org> |
---|---|
date | Fri, 16 Jul 2021 10:45:04 +0200 |
parents | 54756c29118c |
children |
line wrap: on
line source
# Python script to get both the data and resource fork from a BinHex encoded # file. # Author: MURAOKA Taro <koron.kaoriya@gmail.com> # Last Change: 2018 Mar 27 # # Copyright (C) 2003,12 MURAOKA Taro <koron.kaoriya@gmail.com> # THIS FILE IS DISTRIBUTED UNDER THE VIM LICENSE. import sys import binhex input = sys.argv[1] conv = binhex.HexBin(input) info = conv.FInfo out = conv.FName out_data = out out_rsrc = out + '.rsrcfork' # This uses the print statement on Python 2, print function on Python 3. #print('out_rsrc=' + out_rsrc) print('In file: ' + input) outfile = open(out_data, 'wb') print(' Out data fork: ' + out_data) while 1: d = conv.read(128000) if not d: break outfile.write(d) outfile.close() conv.close_data() d = conv.read_rsrc(128000) if d: print(' Out rsrc fork: ' + out_rsrc) outfile = open(out_rsrc, 'wb') outfile.write(d) while 1: d = conv.read_rsrc(128000) if not d: break outfile.write(d) outfile.close() conv.close() # vim:set ts=8 sts=4 sw=4 et: