suzanne.soy/racket
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

fix two more validator functions after prototype change

Browse Source
This commit is contained in:
Matthew Flatt 2010-07-14 10:06:56 -06:00
parent 32552fc4c2
commit 43c2d351df
1 changed files with 4 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
src/racket/src/module.c
View File

@ -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)
{