From e8dba7c7b18497ec8ad4c73ba19c3f6a61d01846 Mon Sep 17 00:00:00 2001 From: Matthew Flatt Date: Tue, 17 Mar 2009 20:49:04 +0000 Subject: [PATCH] fix comment closer: merge to 4.1.5 svn: r14159 --- src/foreign/foreign.c | 4 ++-- src/foreign/foreign.ssc | 2 +- 2 files changed, 3 insertions(+), 3 deletions(-) diff --git a/src/foreign/foreign.c b/src/foreign/foreign.c index 5159b251d5..86ab89913e 100644 --- a/src/foreign/foreign.c +++ b/src/foreign/foreign.c @@ -2138,7 +2138,7 @@ static Scheme_Object *abs_sym; /* (ptr-ref cpointer type [['abs] n]) -> the object at the given location */ /* n defaults to 0 which is the only value that should be used with ffi_objs */ -/* if n is given, an 'abs flag can precede it to make n be a byte offset rather +/* if n is given, an 'abs flag can precede it to make n be a byte offset rather */ /* than some multiple of sizeof(type). */ /* WARNING: there are *NO* checks at all, this is raw C level code. */ #define MYNAME "ptr-ref" @@ -2191,7 +2191,7 @@ static Scheme_Object *foreign_ptr_ref(int argc, Scheme_Object *argv[]) /* (ptr-set! cpointer type [['abs] n] value) -> void */ /* n defaults to 0 which is the only value that should be used with ffi_objs */ -/* if n is given, an 'abs flag can precede it to make n be a byte offset rather +/* if n is given, an 'abs flag can precede it to make n be a byte offset rather */ /* than some multiple of sizeof(type). */ /* WARNING: there are *NO* checks at all, this is raw C level code. */ #define MYNAME "ptr-set!" diff --git a/src/foreign/foreign.ssc b/src/foreign/foreign.ssc index 92e8b468ea..ed8e5857b2 100755 --- a/src/foreign/foreign.ssc +++ b/src/foreign/foreign.ssc @@ -1553,7 +1553,7 @@ static Scheme_Object *do_memop(const char *who, int mode, /* (ptr-ref cpointer type [['abs] n]) -> the object at the given location */ /* n defaults to 0 which is the only value that should be used with ffi_objs */ -/* if n is given, an 'abs flag can precede it to make n be a byte offset rather +/* if n is given, an 'abs flag can precede it to make n be a byte offset rather */ /* than some multiple of sizeof(type). */ /* WARNING: there are *NO* checks at all, this is raw C level code. */ @cdefine[ptr-ref 2 4]{