From 574cfa0132f1acf1c8f15e34919ee48642dc73d9 Mon Sep 17 00:00:00 2001 From: Juan Jose Garcia Ripoll Date: Thu, 25 Feb 2010 22:57:24 +0100 Subject: [PATCH] Fixed typo in set-syntax-from-char --- src/c/read.d | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/src/c/read.d b/src/c/read.d index dbbea46a6..2d2ec4547 100644 --- a/src/c/read.d +++ b/src/c/read.d @@ -2003,8 +2003,8 @@ ecl_invalid_character_p(int c) } if (Null(fromrdtbl)) fromrdtbl = cl_core.standard_readtable; - assert_type_readtable(@'readtable-case', 1, tochr); - assert_type_readtable(@'readtable-case', 2, fromchr); + assert_type_readtable(@'readtable-case', 1, tordtbl); + assert_type_readtable(@'readtable-case', 2, fromrdtbl); fc = ecl_char_code(fromchr); tc = ecl_char_code(tochr);