Ekdohibs
/
ocaml
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Declaration "static" dans md5. 

git-svn-id: http://caml.inria.fr/svn/ocaml/trunk@329 f963ae5c-01c2-4b8c-9fe0-0dff7051ff02
master
Xavier Leroy 1995-10-12 17:53:51 +00:00
parent c362c35430
commit 3025a56ef1
2 changed files with 8 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

10
byterun/.depend
View File

@ -4,7 +4,6 @@ array.o : array.c alloc.h misc.h config.h ../config/m.h ../config/s.h mlvalues.h
fail.h memory.h gc.h major_gc.h freelist.h minor_gc.h
compare.o : compare.c fail.h misc.h config.h ../config/m.h ../config/s.h mlvalues.h \
memory.h gc.h major_gc.h freelist.h minor_gc.h str.h
crc.o : crc.c io.h misc.h config.h ../config/m.h ../config/s.h mlvalues.h
extern.o : extern.c fail.h misc.h config.h ../config/m.h ../config/s.h mlvalues.h \
gc.h intext.h io.h memory.h major_gc.h freelist.h minor_gc.h reverse.h str.h
fail.o : fail.c alloc.h misc.h config.h ../config/m.h ../config/s.h mlvalues.h \
@ -34,10 +33,12 @@ main.o : main.c alloc.h misc.h config.h ../config/m.h ../config/s.h mlvalues.h \
gc.h major_gc.h freelist.h minor_gc.h sys.h
major_gc.o : major_gc.c config.h ../config/m.h ../config/s.h fail.h misc.h mlvalues.h \
freelist.h gc.h gc_ctrl.h major_gc.h roots.h
md5.o : md5.c alloc.h misc.h config.h ../config/m.h ../config/s.h mlvalues.h \
fail.h io.h
memory.o : memory.c fail.h misc.h config.h ../config/m.h ../config/s.h mlvalues.h \
freelist.h gc.h gc_ctrl.h major_gc.h memory.h minor_gc.h
meta.o : meta.c alloc.h misc.h config.h ../config/m.h ../config/s.h mlvalues.h \
fix_code.h interp.h major_gc.h freelist.h memory.h gc.h minor_gc.h prims.h
fix_code.h interp.h major_gc.h freelist.h memory.h gc.h minor_gc.h prims.h stacks.h
minor_gc.o : minor_gc.c config.h ../config/m.h ../config/s.h fail.h misc.h mlvalues.h \
gc.h gc_ctrl.h major_gc.h freelist.h memory.h minor_gc.h roots.h
misc.o : misc.c config.h ../config/m.h ../config/s.h misc.h
@ -64,7 +65,6 @@ array.d.o : array.c alloc.h misc.h config.h ../config/m.h ../config/s.h mlvalues
fail.h memory.h gc.h major_gc.h freelist.h minor_gc.h
compare.d.o : compare.c fail.h misc.h config.h ../config/m.h ../config/s.h mlvalues.h \
memory.h gc.h major_gc.h freelist.h minor_gc.h str.h
crc.d.o : crc.c io.h misc.h config.h ../config/m.h ../config/s.h mlvalues.h
extern.d.o : extern.c fail.h misc.h config.h ../config/m.h ../config/s.h mlvalues.h \
gc.h intext.h io.h memory.h major_gc.h freelist.h minor_gc.h reverse.h str.h
fail.d.o : fail.c alloc.h misc.h config.h ../config/m.h ../config/s.h mlvalues.h \
@ -95,10 +95,12 @@ main.d.o : main.c alloc.h misc.h config.h ../config/m.h ../config/s.h mlvalues.h
gc.h major_gc.h freelist.h minor_gc.h sys.h
major_gc.d.o : major_gc.c config.h ../config/m.h ../config/s.h fail.h misc.h mlvalues.h \
freelist.h gc.h gc_ctrl.h major_gc.h roots.h
md5.d.o : md5.c alloc.h misc.h config.h ../config/m.h ../config/s.h mlvalues.h \
fail.h io.h
memory.d.o : memory.c fail.h misc.h config.h ../config/m.h ../config/s.h mlvalues.h \
freelist.h gc.h gc_ctrl.h major_gc.h memory.h minor_gc.h
meta.d.o : meta.c alloc.h misc.h config.h ../config/m.h ../config/s.h mlvalues.h \
fix_code.h interp.h major_gc.h freelist.h memory.h gc.h minor_gc.h prims.h
fix_code.h interp.h major_gc.h freelist.h memory.h gc.h minor_gc.h prims.h stacks.h
minor_gc.d.o : minor_gc.c config.h ../config/m.h ../config/s.h fail.h misc.h mlvalues.h \
gc.h gc_ctrl.h major_gc.h freelist.h memory.h minor_gc.h roots.h
misc.d.o : misc.c config.h ../config/m.h ../config/s.h misc.h

4
byterun/md5.c
View File

@ -28,7 +28,7 @@ struct MD5Context {
static void MD5Init P((struct MD5Context *context));
static void MD5Update P((struct MD5Context *context, unsigned char *buf,
unsigned len));
static void MD5Final P((unsigned char digest[16], struct MD5Context *context));
static void MD5Final P((unsigned char digest[16], struct MD5Context *ctx));
static void MD5Transform P((uint32 buf[4], uint32 in[16]));
value md5_string(str, ofs, len) /* ML */
@ -171,7 +171,7 @@ static void MD5Update(ctx, buf, len)
* Final wrapup - pad to 64-byte boundary with the bit pattern
* 1 0* (64-bit count of bits processed, MSB-first)
*/
void MD5Final(digest, ctx)
static void MD5Final(digest, ctx)
unsigned char digest[16];
struct MD5Context *ctx;
{