aboutsummaryrefslogtreecommitdiff
path: root/src/ellinika/elmorph.c
diff options
context:
space:
mode:
Diffstat (limited to 'src/ellinika/elmorph.c')
-rw-r--r--src/ellinika/elmorph.c10
1 files changed, 5 insertions, 5 deletions
diff --git a/src/ellinika/elmorph.c b/src/ellinika/elmorph.c
index a06d43b..5094db8 100644
--- a/src/ellinika/elmorph.c
+++ b/src/ellinika/elmorph.c
@@ -1,8 +1,8 @@
/* This file is part of Ellinika project.
- Copyright (C) 2011 Sergey Poznyakoff
+ Copyright (C) 2011, 2015 Sergey Poznyakoff
Ellinika is free software; you can redistribute it and/or modify
it under the terms of the GNU General Public License as published by
the Free Software Foundation; either version 3 of the License, or
(at your option) any later version.
@@ -25,29 +25,29 @@
struct elstr {
unsigned *str; /* UTF-8 string */
size_t len; /* Its length */
struct phoneme *phoneme; /* Phonetical map*/
- unsigned phoneme_count; /* Number of phonemes */
+ size_t phoneme_count; /* Number of phonemes */
struct syllable *sylmap; /* Syllable map (nsyl elements) */
- unsigned nsyl; /* Number of syllables. */
+ size_t nsyl; /* Number of syllables. */
unsigned acc_syl; /* Number of the accented syllable
(1-based, from the last syllable) */
unsigned acc_pos; /* Number of the accented character
(0-based, from str[0]) */
};
scm_t_bits _elstr_tag;
static void
_elstr_syllabize(struct elstr *elstr, const char *func_name)
{
- unsigned i;
+ size_t i;
free(elstr->phoneme);
free(elstr->sylmap);
if (phoneme_map(&elstr->phoneme, &elstr->phoneme_count,
elstr->str, elstr->len))
@@ -193,13 +193,13 @@ _elstr_free(SCM smob)
}
static int
_elstr_print(SCM smob, SCM port, scm_print_state *pstate)
{
struct elstr *elstr = (struct elstr *) SCM_CDR(smob);
- int i, j;
+ size_t i, j;
char *s;
scm_puts("#<elstr ", port);
if (elstr->sylmap) {
scm_puts("``", port);
for (i = 0; i < elstr->nsyl; i++) {

Return to:

Send suggestions and report system problems to the System administrator.