scsh (fdports1.c) won't compile [I'm not sure this got sent last time]

[sheldon@lhasa.lcs.mit.edu (Mark A. Sheldon)]

% make
gcc -c -o main.o -DDEFAULT_IMAGE_NAME=\"/usr/local/lib/scsh/scsh.image\" \
    -I./cig -I./scsh/regexp -O2 -g ./main.c
gcc -c -I./cig -I./scsh/regexp -DHAVE_CONFIG_H -I. -O2 -g -o unix.o unix.c
gcc -c -I./cig -I./scsh/regexp -DHAVE_CONFIG_H -I. -O2 -g -o dynload.o dynload.c
gcc -c -I./cig -I./scsh/regexp -DHAVE_CONFIG_H -I. -O2 -g -o prescheme.o 
prescheme.c
gcc -c -I./cig -I./scsh/regexp -DHAVE_CONFIG_H -I. -O2 -g -o extension.o 
extension.c
gcc -c -I./cig -I./scsh/regexp -DHAVE_CONFIG_H -I. -O2 -g -o scheme48vm.o 
scheme48vm.c
gcc -c -I./cig -I./scsh/regexp -DHAVE_CONFIG_H -I. -O2 -g -o cig/libcig.o 
cig/libcig.c
gcc -c -I./cig -I./scsh/regexp -DHAVE_CONFIG_H -I. -O2 -g -o cig/libcig1.o 
cig/libcig1.c
cig/libcig1.c: In function `set_strvec_carriers':
cig/libcig1.c:128: warning: initialization of `cv' from incompatible pointer 
type
gcc -c -I./cig -I./scsh/regexp -DHAVE_CONFIG_H -I. -O2 -g -o proc2.o proc2.c
gcc -c -I./cig -I./scsh/regexp -DHAVE_CONFIG_H -I. -O2 -g -o scsh/dirstuff1.o 
scsh/dirstuff1.c
gcc -c -I./cig -I./scsh/regexp -DHAVE_CONFIG_H -I. -O2 -g -o scsh/fdports1.o 
scsh/fdports1.c
scsh/fdports1.c: In function `fdes_modestr':
scsh/fdports1.c:75: too few arguments to function `fcntl'
*** Error code 1
make: Fatal error: Command failed for target `scsh/fdports1.o'

-Mark