/[guile]/guile/guile-core/libguile/validate.h
ViewVC logotype

Diff of /guile/guile-core/libguile/validate.h

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.41 by mvo, Sun Oct 20 22:59:01 2002 UTC revision 1.42 by mvo, Mon Dec 2 01:00:50 2002 UTC
# Line 380  Line 380 
380                  obj, pos, FUNC_NAME); \                  obj, pos, FUNC_NAME); \
381    } while (0)    } while (0)
382    
 #define SCM_VALIDATE_THREAD(pos, a) SCM_MAKE_VALIDATE_MSG (pos, a, THREADP, "thread")  
   
383  #define SCM_VALIDATE_THUNK(pos, thunk) \  #define SCM_VALIDATE_THUNK(pos, thunk) \
384    do { \    do { \
385      SCM_ASSERT (!SCM_FALSEP (scm_thunk_p (thunk)), thunk, pos, FUNC_NAME); \      SCM_ASSERT (!SCM_FALSEP (scm_thunk_p (thunk)), thunk, pos, FUNC_NAME); \

Legend:
Removed from v.1.41  
changed lines
  Added in v.1.42

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26