Mercurial > vim
view src/po/sjiscorr.c @ 17530:ef23ec1eee54 v8.1.1763
patch 8.1.1763: evalfunc.c is still too big
commit https://github.com/vim/vim/commit/9f9fe37f6750f342255a51f158a7bb372c827f7f
Author: Bram Moolenaar <Bram@vim.org>
Date: Sat Jul 27 23:12:12 2019 +0200
patch 8.1.1763: evalfunc.c is still too big
Problem: Evalfunc.c is still too big.
Solution: Move dict and list functions to a better place.
author | Bram Moolenaar <Bram@vim.org> |
---|---|
date | Sat, 27 Jul 2019 23:15:05 +0200 |
parents | b79453d0d01c |
children | 45c0a5330758 |
line wrap: on
line source
/* * Simplistic program to correct SJIS inside strings. When a trail byte is a * backslash it needs to be doubled. * Public domain. */ #include <stdio.h> #include <string.h> int main(int argc, char **argv) { char buffer[BUFSIZ]; char *p; while (fgets(buffer, BUFSIZ, stdin) != NULL) { for (p = buffer; *p != 0; p++) { if (strncmp(p, "charset=utf-8", 13) == 0 || strncmp(p, "charset=UTF-8", 13) == 0) { fputs("charset=cp932", stdout); p += 12; } else if (strncmp(p, "# Original translations", 23) == 0) { fputs("# generated from ja.po, DO NOT EDIT", stdout); while (p[1] != '\n') ++p; } else if (*(unsigned char *)p == 0x81 && p[1] == '_') { putchar('\\'); ++p; } else { if (*p & 0x80) { putchar(*p++); if (*p == '\\') putchar(*p); } putchar(*p); } } } }