I would like to request for a mentor for the bug 6183632. I have the fix
ready (Please find attached the diff file) and the test case given below.

Synopsis for bug 6183632: *file* file(1)'s fortran detection is a bit
Category/Subcategory: utility:file

My SCA Number is OS0142

Here is the test case for the bug:

# pwd
# ls
Makefile elf_read32.o file file.c~ file.xpg4 magicutils.o xpg4_elf_read64.o
elf_read.c elf_read64.o file.c file.h magic req.flg xpg4_elfcap.o
elf_read.h elfcap.o file.c.org file.o magicutils.c xpg4_elf_read32.o
# cat ~/Documents/CFF/test
# file ~/Documents/CFF/test
/export/home/solaris/Documents/CFF/test: fortran program text
# ./file ~/Documents/CFF/test
/export/home/solaris/Documents/CFF/test: ascii text

Avinash Joshi
Sun Campus Ambassador
Sun Microsystems Inc.

Amrita Vishwa Vidyapeetham, Amritapuri Campus.

blog: http://blogs.sun.com/avinashjoshi
email: Avinash.Joshi at Sun.Com
-------------- next part --------------
An HTML attachment was scrubbed...
-------------- next part --------------
--- file.c.org  Thu Feb  7 17:42:24 2008
+++ file.c      Thu Feb  7 17:50:19 2008
@@ -26,7 +26,7 @@
 /*       All Rights Reserved   */
- * Copyright 2007 Sun Microsystems, Inc.  All rights reserved.
+ * Copyright 2008 Sun Microsystems, Inc.  All rights reserved.
  * Use is subject to license terms.
@@ -109,7 +109,7 @@
 static char    *fort[] = {                     /* FORTRAN */
                "function", "subroutine", "common", "dimension", "block",
-               "integer", "real", "data", "double",
+               "integer", "data", "double",
                "INTEGER", "REAL", "DATA", "DOUBLE", 0};

Reply via email to