From 43c2d351dfcc51f81853d50c6f0a3547ed3c77c6 Mon Sep 17 00:00:00 2001 From: Matthew Flatt Date: Wed, 14 Jul 2010 10:06:56 -0600 Subject: [PATCH] fix two more validator functions after prototype change --- src/racket/src/module.c | 8 ++++---- 1 file changed, 4 insertions(+), 4 deletions(-) diff --git a/src/racket/src/module.c b/src/racket/src/module.c index b4d09ca746..920c156497 100644 --- a/src/racket/src/module.c +++ b/src/racket/src/module.c @@ -102,13 +102,13 @@ static Scheme_Object *top_level_require_sfs(Scheme_Object *data, SFS_Info *info) static void module_validate(Scheme_Object *data, Mz_CPort *port, char *stack, Validate_TLS tls, int depth, int letlimit, int delta, - int num_toplevels, int num_stxes, int num_lifts, + int num_toplevels, int num_stxes, int num_lifts, int result_ignored, struct Validate_Clearing *vc, int tailpos, Scheme_Hash_Tree *procs); static void top_level_require_validate(Scheme_Object *data, Mz_CPort *port, char *stack, Validate_TLS tls, int depth, int letlimit, int delta, - int num_toplevels, int num_stxes, int num_lifts, + int num_toplevels, int num_stxes, int num_lifts, int result_ignored, struct Validate_Clearing *vc, int tailpos, Scheme_Hash_Tree *procs); @@ -5368,7 +5368,7 @@ Scheme_Object *scheme_module_eval_clone(Scheme_Object *data) static void module_validate(Scheme_Object *data, Mz_CPort *port, char *stack, Validate_TLS tls, int depth, int letlimit, int delta, - int num_toplevels, int num_stxes, int num_lifts, + int num_toplevels, int num_stxes, int num_lifts, int result_ignored, struct Validate_Clearing *vc, int tailpos, Scheme_Hash_Tree *procs) { @@ -9785,7 +9785,7 @@ top_level_require_jit(Scheme_Object *data) static void top_level_require_validate(Scheme_Object *data, Mz_CPort *port, char *stack, Validate_TLS tls, int depth, int letlimit, int delta, - int num_toplevels, int num_stxes, int num_lifts, + int num_toplevels, int num_stxes, int num_lifts, int result_ignored, struct Validate_Clearing *vc, int tailpos, Scheme_Hash_Tree *procs) {