Re: [clisp-list] Norwegian characters in CLISP

[Audun R. <au...@ya...>]

--- Audun Rømcke <au...@ya...> wrote:

> Hello everyone,
> 
> I'm a Master's student in computational linguistics
> at 
> the University of Bergen, Norway.
> 
> I'm currently working on a project where I'm trying
> to 
> semi-automatically generate a Norwegian-English/
> English-Norwegian dictionary using plain text
> files. At home I'm working on a Windows box with
> CLISP 
> under Emacs.
> 
> My problem is this:
> 
> I want to read in lines of text from a source
> .txt-file, 
> place selected lines as elements in an array, then
> manipulate 
> the array, sort it etc. and then send the resulting
> elements 
> back to a target .txt-file. Once I've used
> (read-line) and
> placed the read line into the array, Norwegian
> characters are 
> no longer displayed correctly, they appear as e.g.
> \206 
> when I print. Here's some example code:
> 
> (defun arr-from-file (filename)
>   (setf file-arr (make-array 2000))
>   (setf path (make-pathname :name filename))
>   (with-open-file (str path :direction :input)
> 		  (do ((line (read-line str)
> 			     (read-line str)))
> 		      ((equal line "[BODY]")))
> 		  (do ((box (read-box str)
> 			    (read-box str))
> 		       (count 0))
> 		      ((equal box 'eof))
> 		      (progn (setf (svref file-arr count) box)
> 			     (incf count)))))
> 
> (read-box) is a problem-specific function that's
> tailored 
> to the format of the text files I'm using, it's
> basically 
> just a specialised use of (read-line).
> 
> Could anyone help me? Is this a CLISP-problem? Or is
> the 
> problem elsewhere? I also work on Solaris boxes with
> CMUCL 
> at the university, and here characters are
> faithfully represented,
>  whether I read, write or otherwise manipulate
> words/lines.
> 
> NB: I'm not super-computer-literate, so a "teaspoon
> answer" 
> would be welcome.
> 
> Thanks a lot!
> 
> Best wishes,
> Audun Rømcke
> 
> 
> 
> 
> 
> 
> 
> 
>
-------------------------------------------------------
> This SF.net email is sponsored by: Splunk Inc. Do
> you grep through log files
> for problems?  Stop!  Download the new AJAX search
> engine that makes
> searching your log files as easy as surfing the 
> web.  DOWNLOAD SPLUNK!
>
http://ads.osdn.com/?ad_id=7637&alloc_id=16865&op=click
> _______________________________________________
> clisp-list mailing list
> cli...@li...
>
https://lists.sourceforge.net/lists/listinfo/clisp-list
> 



		
__________________________________________ 
Yahoo! DSL – Something to write home about. 
Just $16.99/mo. or less. 
dsl.yahoo.com