@@ -91,28 +91,43 @@ new_function(unused, args)
9191
9292 return (object * )newfunc ;
9393}
94+ #endif
9495
9596static char new_code_doc [] =
96- "Create a code object from (CODESTRING, CONSTANTS, NAMES, FILENAME, NAME)." ;
97+ "Create a code object from (ARGCOUNT, NLOCALS, FLAGS, CODESTRING, CONSTANTS, NAMES, VARNAMES , FILENAME, NAME)." ;
9798
9899static object *
99100new_code (unused , args )
100101 object * unused ;
101102 object * args ;
102103{
104+ int argcount ;
105+ int nlocals ;
106+ int flags ;
103107 object * code ;
104108 object * consts ;
105109 object * names ;
110+ object * varnames ;
106111 object * filename ;
107112 object * name ;
108113
114+ #if 0
109115 if (!newgetargs (args , "SO!O!SS" ,
110116 & code , & Tupletype , & consts , & Tupletype , & names ,
111117 & filename , & name ))
112118 return NULL ;
113119 return (object * )newcodeobject (code , consts , names , filename , name );
114- }
120+ #else
121+ if (!newgetargs (args , "iiiSO!O!O!SS" ,
122+ & argcount , & nlocals , & flags , /* These are new */
123+ & code , & Tupletype , & consts , & Tupletype , & names ,
124+ & Tupletype , & varnames , /* These are new */
125+ & filename , & name ))
126+ return NULL ;
127+ return (object * )newcodeobject (argcount , nlocals , flags ,
128+ code , consts , names , varnames , filename , name );
115129#endif
130+ }
116131
117132static char new_module_doc [] =
118133"Create a module object from (NAME)." ;
@@ -133,8 +148,8 @@ static struct methodlist new_methods[] = {
133148 {"instancemethod" , new_instancemethod , 1 , new_im_doc },
134149#if 0
135150 {"function" , new_function , 1 , new_function_doc },
136- {"code" , new_code , 1 , new_code_doc },
137151#endif
152+ {"code" , new_code , 1 , new_code_doc },
138153 {"module" , new_module , 1 , new_module_doc },
139154 {NULL , NULL } /* sentinel */
140155};
0 commit comments