Lines Matching defs:add
204 sub add($$) {
219 @head = &add( \@head, "" );
225 @head = &add( \@head, "#define $macro \\" );
226 @head = &add( \@head, "\tswitch (code) { \\" );
234 @head = &add(
242 @head = &add( \@head, "\t default: dft; break; \\" );
243 @head = &add( \@head, "\t}" );
246 @head = &add( \@head, "#define $macro /* nothing? */" );
250 @head = &add( \@head, "#define $macro /* nothing */" );
273 @head = &add( \@head, "/*" ) unless ( $state == 1 );
275 @head = &add( \@head, $data );
282 @head = &add( \@head, $ended );
284 @head = &add( \@head, $extra ) if ( $extra ne "" );
286 @head = &add( \@head, "" );
305 @head = &add( \@head, sprintf( "#define %s \\", $data ) );
306 @head = &add( \@head, sprintf( "\tbegin_CODEPAGE(%d) \\", $codep ) )
308 @head = &add( \@head, "\tswitch (code) { \\" );
327 @head = &add( \@head, " */" ) if ( $state == 1 );
361 @head = &add( \@head, sprintf( "\t%s%s \\", $item, $note ) );
375 @head = &add( \@head, $ended );
377 @head = &add( \@head, $extra ) if ( $extra ne "" );
379 @head = &add( \@head, "#else" );
382 &add( \@head, sprintf( "#define %s(code)\t/* nothing */", $key ) );
383 @head = &add( \@head, sprintf( "#define un%s(code,dft) dft", $key ) );
385 @head = &add( \@head, "#endif /* OPT_WIDE_CHARS */" );
386 @head = &add( \@head, "" );
387 @head = &add( \@head, "#endif /* included_charsets_h */" );