CVS: sml-dist/src/ml-nlffi-lib/Tests/ll ll.c,1.3,1.4 ll.h,1.3,1.4
Matthias Blume <[email protected]>
| Newsgroups | gmane.comp.lang.sml.smlnj.commits |
|---|---|
| Message-ID | <[email protected]> |
Update of /cvsroot/smlnj/sml-dist/src/ml-nlffi-lib/Tests/ll
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv31616/src/ml-nlffi-lib/Tests/ll
Modified Files:
ll.c ll.h
Log Message:
fixed silly bug in CML:Atom
Index: ll.c
===================================================================
RCS file: /cvsroot/smlnj/sml-dist/src/ml-nlffi-lib/Tests/ll/ll.c,v
retrieving revision 1.3
retrieving revision 1.4
diff -C2 -d -r1.3 -r1.4
*** ll.c 10 Feb 2005 23:54:06 -0000 1.3
--- ll.c 1 Mar 2005 05:43:28 -0000 1.4
***************
*** 14,20 ****
}
! long long a1 (long long i)
{
! return i + 1;
}
-
--- 14,19 ----
}
! long long a (int i1, long long l1, int i2, long long l2, int i3, long long l3, int i4, long long l4)
{
! return i1 + l1 + i2 + l2 + i3 + l3 + i4 + l4;
}
Index: ll.h
===================================================================
RCS file: /cvsroot/smlnj/sml-dist/src/ml-nlffi-lib/Tests/ll/ll.h,v
retrieving revision 1.3
retrieving revision 1.4
diff -C2 -d -r1.3 -r1.4
*** ll.h 10 Feb 2005 23:54:06 -0000 1.3
--- ll.h 1 Mar 2005 05:43:28 -0000 1.4
***************
*** 10,12 ****
extern void pll (int, long long, int);
! extern long long a1 (long long);
--- 10,13 ----
extern void pll (int, long long, int);
! extern
! long long a (int, long long, int, long long, int, long long, int, long long);
-------------------------------------------------------
SF email is sponsored by - The IT Product Guide
Read honest & candid reviews on hundreds of IT Products from real users.
Discover which products truly live up to the hype. Start reading now.
http://ads.osdn.com/?ad_id=6595&alloc_id=14396&op=click