Changeset 13062 in project for chicken


Ignore:
Timestamp:
01/22/09 09:06:19 (11 years ago)
Author:
felix winkelmann
Message:

more char-code safety measures

Location:
chicken/trunk
Files:
2 edited

Legend:

Unmodified
Added
Removed
  • chicken/trunk/TODO

    r13007 r13062  
    3434    doesn't work that easily, try to find another solution
    3535
    36 ** libraries/build
    37 *** path-handling for process invocation
    38 **** try Lars Nilsson's suggestion or Tobia's CreateProcess
    39 **** append ".exe" on windows
     36** libraries
    4037*** library/runtime: cyclic list checks for assq/assv/assoc/memq/memv/member
    4138    and C_i_list_tail
     39
     40** setup/install
     41*** broken on cygwin/mingw (vista): gets #!eof from server
     42    Vista security paranoia?
     43
     44** henrietta
     45*** installed version on kitten-tech seems not to work?
    4246
    4347
     
    6468    example: we need `(import-for-syntax chicken)' to have access to
    6569    `receive' in a procedural syntax definition.
     70**** could be tested with xlib egg
    6671*** curried define performs expansion in empty se - problem?
    6772    (as comment in expand.scm indicated (##sys#register-export))
     
    8691*** read-mark list should be stored in read-table
    8792*** ports should have indicator slot about exact type (tcp, file, ...)
     93*** normalize-pathname: return short name on windows? (mingw/msvc)
    8894
    8995** syntax-error
  • chicken/trunk/library.scm

    r12940 r13062  
    13961396(define (char-upcase c)
    13971397  (##sys#check-char c 'char-upcase)
    1398   (##core#inline "C_make_character"
    1399              (##core#inline toupper (##core#inline "C_character_code" c)) ) )
     1398  (##core#inline "C_u_i_char_upcase" c))
    14001399
    14011400(define (char-downcase c)
    14021401  (##sys#check-char c 'char-downcase)
    1403   (##core#inline "C_make_character"
    1404              (##core#inline tolower (##core#inline "C_character_code" c)) ) )
     1402  (##core#inline "C_u_i_char_downcase" x))
    14051403
    14061404(define char-ci=?)
Note: See TracChangeset for help on using the changeset viewer.