[libgfortran,patch] Trivial fix to return value in runtime SELECTED_CHAR_KIND

[FX]

The value returned by the runtime SELECTED_CHAR_KIND for "ISO_10646" is wrong (1 instead of 4). The front-end currently does the right thing, of course, or we would have seen it much earlier.

Attached trivial patch fixes it, and adds a testcase checking front-end and runtime match each other.

Regtested on x86_64-linux, OK to commit?
FX


-------------- next part --------------
A non-text attachment was scrubbed...
Name: selected_char_kind.diff
Type: application/octet-stream
Size: 1416 bytes
Desc: not available
URL: <http://gcc.gnu.org/pipermail/fortran/attachments/20100610/4590afc7/attachment.obj>
-------------- next part --------------
A non-text attachment was scrubbed...
Name: selected_char_kind.ChangeLog
Type: application/octet-stream
Size: 268 bytes
Desc: not available
URL: <http://gcc.gnu.org/pipermail/fortran/attachments/20100610/4590afc7/attachment-0001.obj>