projects
/
ghc-hetmet.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
| inline |
side by side
(parent:
2e5a06c
)
[project @ 2002-07-24 09:44:37 by simonmar]
author
simonmar
<unknown>
Wed, 24 Jul 2002 09:44:37 +0000
(09:44 +0000)
committer
simonmar
<unknown>
Wed, 24 Jul 2002 09:44:37 +0000
(09:44 +0000)
Add #offset for just grabbing the byte offset of a struct field.
ghc/utils/hsc2hs/template-hsc.h
patch
|
blob
|
history
diff --git
a/ghc/utils/hsc2hs/template-hsc.h
b/ghc/utils/hsc2hs/template-hsc.h
index
a77c253
..
fdd4b76
100644
(file)
--- a/
ghc/utils/hsc2hs/template-hsc.h
+++ b/
ghc/utils/hsc2hs/template-hsc.h
@@
-66,6
+66,9
@@
#define hsc_ptr(t, f) \
printf ("(\\hsc_ptr -> hsc_ptr `plusPtr` %ld)", (long) offsetof (t, f));
+#define hsc_offset(t, f) \
+ printf("(%ld)", (long) offsetof (t, f));
+
#define hsc_enum(t, f, print_name, x) \
print_name; \
printf (" :: %s\n", #t); \