| /mirbsd/src/gnu/usr.bin/perl/lib/ |
| D | Switch.pm | 88 my ($source, $line) = @_;
89 return $source unless $Perl5 && $source =~ /case|switch/
90 || $Perl6 && $source =~ /when|given|default/;
91 pos $source = 0;
93 component: while (pos $source < length $source)
95 if ($source =~ m/(\G\s*use\s+Switch\b)/gc)
100 my @pos = Text::Balanced::_match_quotelike(\$source,qr/\s*/,1,0);
103 my $pre = substr($source,$pos[0],$pos[1]); # matched prefix
104 $text .= $pre . substr($source,$pos[2],$pos[18]-$pos[2]);
107 if ($source =~ m/\G\s*($pod_or_DATA)/gc) {
[all …]
|
| /mirbsd/src/gnu/usr.bin/binutils/gdb/ |
| D | macrotab.c | 421 macro_include (struct macro_source_file *source, in macro_include() argument
431 for (link = &source->includes; in macro_include()
449 (*link)->filename, source->filename, line); in macro_include()
464 new = new_source_file (source->table, included); in macro_include()
465 new->included_by = source; in macro_include()
475 macro_lookup_inclusion (struct macro_source_file *source, const char *name) in macro_lookup_inclusion() argument
478 if (strcmp (name, source->filename) == 0) in macro_lookup_inclusion()
479 return source; in macro_lookup_inclusion()
485 int src_name_len = strlen (source->filename); in macro_lookup_inclusion()
491 && source->filename[src_name_len - name_len - 1] == '/' in macro_lookup_inclusion()
[all …]
|
| D | macrotab.h | 206 struct macro_source_file *macro_include (struct macro_source_file *source,
218 (struct macro_source_file *source,
227 void macro_define_object (struct macro_source_file *source, int line,
241 void macro_define_function (struct macro_source_file *source, int line,
249 void macro_undef (struct macro_source_file *source, int line,
288 (struct macro_source_file *source,
298 (struct macro_source_file *source,
|
| /mirbsd/src/usr.bin/dc/ |
| D | inout.c | 34 static int src_getcharstream(struct source *);
35 static void src_ungetcharstream(struct source *);
36 static char *src_getlinestream(struct source *);
37 static void src_freestream(struct source *);
38 static int src_getcharstring(struct source *);
39 static void src_ungetcharstring(struct source *);
40 static char *src_getlinestring(struct source *);
41 static void src_freestring(struct source *);
62 src_setstream(struct source *src, FILE *stream) in src_setstream()
69 src_setstring(struct source *src, char *p) in src_setstring()
[all …]
|
| D | bcode.h | 65 struct source;
68 int (*readchar)(struct source *);
69 void (*unreadchar)(struct source *);
70 char *(*readline)(struct source *);
71 void (*free)(struct source *);
74 struct source { struct
87 void reset_bmachine(struct source *); argument
|
| D | extern.h | 24 void src_setstream(struct source *, FILE *);
25 void src_setstring(struct source *, char *);
26 struct number *readnumber(struct source *, u_int);
28 char *read_string(struct source *);
|
| /mirbsd/src/gnu/usr.bin/perl/pod/ |
| D | perlfilter.pod | 8 I<source filters>. Source filters alter the program text of a module
9 before Perl sees it, much as a C preprocessor alters the source text of
11 about what source filters are, how they work, and how to write your
14 The original purpose of source filters was to let you encrypt your
15 program source to prevent casual piracy. This isn't all they can do, as
27 individual file as a I<source stream>. A source stream is created when
28 the Perl parser opens a file, it continues to exist as the source code
31 a source stream, a new and distinct stream is created just for that
34 The diagram below represents a single source stream, with the flow of
35 source from a Perl script file on the left into the Perl parser on the
[all …]
|
| /mirbsd/src/bin/mksh/ |
| D | lex.c | 109 #define o_getsc() (*source->str != '\0' && *source->str != '\\' && \
110 !backslash_skip ? *source->str++ : getsc_bn())
112 #define o_getsc_u() ((*source->str != '\0') ? *source->str++ : getsc_uu())
234 if (source->flags & SF_ALIAS) { in yylex()
236 source->flags &= ~SF_ALIAS; in yylex()
305 source->areap); in yylex()
308 s->next = source; in yylex()
309 source = s; in yylex()
674 source->areap); in yylex()
677 s->next = source; in yylex()
[all …]
|
| /mirbsd/src/gnu/usr.bin/cvs/lib/ |
| D | memmove.c | 16 char const *source = source0; in memmove() local
17 if (source < dest) in memmove()
19 for (source += length, dest += length; length; --length) in memmove()
20 *--dest = *--source; in memmove()
21 else if (source != dest) in memmove()
25 *dest++ = *source++; in memmove()
|
| /mirbsd/src/bin/ln/ |
| D | ln.c | 119 linkit(char *target, char *source, int isdir) in linkit() argument
143 if (isdir || (!statf(source, &sb) && S_ISDIR(sb.st_mode))) { in linkit()
148 n = snprintf(path, sizeof(path), "%s/%s", source, p); in linkit()
151 warn("%s/%s", source, p); in linkit()
154 source = path; in linkit()
161 if ((fflag && unlink(source) < 0 && errno != ENOENT) || in linkit()
162 (*linkf)(target, source)) { in linkit()
163 warn("%s", source); in linkit()
|
| /mirbsd/src/gnu/usr.bin/rcs/src/ |
| D | rcstime.c | 55 str2time_checked(char const *source, time_t default_time) in str2time_checked() argument
62 if (!get_date(&ts, source, &td)) in str2time_checked()
63 faterror("unknown date/time: %s", source); in str2time_checked()
72 str2date(char const *source, char target[datesize]) in str2date() argument
74 time2date(str2time_checked(source, now()), target); in str2date()
79 date2time(char const source[datesize]) in date2time()
82 return str2time_checked(date2str(source, s), 0); in date2time()
|
| /mirbsd/src/gnu/usr.sbin/sendmail/contrib/ |
| D | qtool.pl | 65 my $source;
83 my $source = shift;
86 $result = $destination->add($source);
95 my $source = shift;
97 return $source->delete();
102 my $source = shift;
104 return $source->bounce();
221 while (($source_name, $source) = each(%sources))
223 $result = $conditions->check_move($source, $destination);
226 $result = &{$action}($source, $destination);
[all …]
|
| /mirbsd/src/gnu/usr.bin/perl/mpeix/ |
| D | mpeix.c | 22 int __perl_mpe_getspaceid(void *source) in __perl_mpe_getspaceid() argument
50 : "r" (source) // Source must be gen reg in __perl_mpe_getspaceid()
55 LONGPOINTER __perl_mpe_longaddr(void *source) in __perl_mpe_longaddr() argument
69 : "r" (source) // Source must be gen reg in __perl_mpe_longaddr()
74 LONGPOINTER __perl_mpe_addtopointer(LONGPOINTER source, // %r26 == source offset in __perl_mpe_addtopointer() argument
86 : "r" (source.spaceid), // Source address in __perl_mpe_addtopointer()
87 "r" (source.offset), in __perl_mpe_addtopointer()
94 LONGPOINTER source, // %r23 == source space, %r24 == off in __perl_mpe_longmove() argument
110 : "r" (source.spaceid), // Source address in __perl_mpe_longmove()
111 "r" (source.offset), in __perl_mpe_longmove()
[all …]
|
| /mirbsd/src/sys/dev/microcode/aic7xxx/ |
| D | aicasm_insformat.h | 49 source : 9, member
59 source : 9,
67 source : 9, member
77 source : 9,
85 source : 9, member
93 source : 9,
|
| /mirbsd/src/usr.sbin/isdn/isdnd/ |
| D | monitor.c | 84 char source[FILENAME_MAX]; member
93 static void cmd_dump_rights(int fd, int rights, u_int8_t *cmd, const char * source);
94 static void cmd_dump_mcons(int fd, int rights, u_int8_t *cmd, const char * source);
95 static void cmd_reread_cfg(int fd, int rights, u_int8_t *cmd, const char * source);
96 static void cmd_hangup(int fd, int rights, u_int8_t *cmd, const char * source);
99 static void hangup_channel(int controller, int channel, const char *source);
512 char source[FILENAME_MAX]; in monitor_handle_input() local
514 strlcpy(source, con->source, sizeof(source)); in monitor_handle_input()
517 logit(LL_DMN, "monitor closed from %s", source ); in monitor_handle_input()
549 char source[FILENAME_MAX]; in monitor_handle_connect() local
[all …]
|
| /mirbsd/src/usr.sbin/ppp/ppp/ |
| D | pred.c | 67 compress(struct pred1_state *state, u_char *source, u_char *dest, int len) in compress() argument
77 if (state->dict[state->hash] == *source) { in compress()
80 state->dict[state->hash] = *source; in compress()
81 *dest++ = *source; /* Guess wrong, output char */ in compress()
83 HASH(state, *source++); in compress()
92 SyncTable(struct pred1_state *state, u_char *source, u_char *dest, int len) in SyncTable() argument
95 *dest++ = state->dict[state->hash] = *source; in SyncTable()
96 HASH(state, *source++); in SyncTable()
101 decompress(struct pred1_state *state, u_char *source, u_char *dest, int len) in decompress() argument
108 flags = *source++; in decompress()
[all …]
|
| /mirbsd/src/kern/z/ |
| D | compress.c | 22 int ZEXPORT compress2 (dest, destLen, source, sourceLen, level) in compress2() argument
25 const Bytef *source;
32 stream.next_in = (z_const Bytef *)source;
62 int ZEXPORT compress (dest, destLen, source, sourceLen) in compress() argument
65 const Bytef *source;
68 return compress2(dest, destLen, source, sourceLen, Z_DEFAULT_COMPRESSION);
|
| /mirbsd/src/gnu/usr.sbin/sendmail/libsm/ |
| D | b-strl.c | 70 char dest[SRC_SIZE], source[SRC_SIZE];
103 (void) strlcpy(source,
117 strlcat(dest, source, SRC_SIZE - 1);
128 sm_strlcat(dest, source, SRC_SIZE - 1);
158 strlcpy(dest, source, SRC_SIZE - 1);
169 sm_strlcpy(dest, source, SRC_SIZE - 1);
|
| /mirbsd/src/usr.bin/vi/ |
| D | LAYOUT | 26 Replacement source files for C library functions.
52 edit/ Roff source for "Edit: A tutorial". This document
56 exref/ Roff source for "Ex Reference Manual -- Version
60 vi.man/ Roff source for a UNIX manual page for nex/nvi.
63 vi.ref/ Roff source for the nex/nvi reference document.
67 vitut/ Roff source for "An Introduction to Display
76 suffix, in their respective source directories. Flat text
79 in their respective source directories.
94 The ex source code. Because vi has the colon command, lots of
130 The vi source code.
|
| /mirbsd/src/gnu/usr.bin/perl/lib/Locale/Maketext/ |
| D | GutsLoader.pm | 32 my $source;
33 { local $/; $source = <IN>; }
35 unless( $source =~ s/\b(use utf8)/# $1/ ) {
39 eval $source;
|
| /mirbsd/src/lib/libcompat/regexp/ |
| D | regsub.c | 43 v8_regsub(prog, source, dest) in v8_regsub() argument
45 const char *source;
54 if (prog == NULL || source == NULL || dest == NULL) {
63 src = source;
|
| /mirbsd/src/usr.sbin/httpd/src/modules/ssl/ |
| D | README | 26 Here is a short overview of the source files:
33 mod_ssl.c ............... main source file containing API structures
48 ssl_expr.c .............. expression handling main source
51 ssl_expr_scan.l ......... expression scanner source
54 ssl_expr_parse.y ........ expression parser source
61 ssl_util_ssl.c .......... the OpenSSL companion source
63 ssl_util_table.c ........ the hash table library source
66 The source files are written in clean ANSI C and pass the ``gcc -O -g
70 you make changes or additions make sure the source still passes this
75 Inside the source code you will be confronted with the following types of
[all …]
|
| /mirbsd/src/gnu/usr.bin/cvs/src/ |
| D | main.c | 1252 date_to_internet (char *dest, const char *source) in date_to_internet() argument
1256 date_to_tm (&date, source); in date_to_internet()
1263 date_to_tm (struct tm *dest, const char *source) in date_to_tm() argument
1266 if (sscanf (source, SDATEFORM, in date_to_tm()
1273 error (0, 0, "internal error: bad date %s", source); in date_to_tm()
1289 tm_to_internet (char *dest, const struct tm *source) in tm_to_internet() argument
1297 sprintf (dest, "%d %s %ld %02d:%02d:%02d -0000", source->tm_mday, in tm_to_internet()
1298 source->tm_mon < 0 || source->tm_mon > 11 in tm_to_internet()
1299 ? "???" : month_names[source->tm_mon], in tm_to_internet()
1300 (long)source->tm_year + 1900, source->tm_hour, source->tm_min, in tm_to_internet()
[all …]
|
| /mirbsd/src/gnu/usr.bin/perl/ |
| D | README.macos | 21 The latest perl source itself builds on Mac OS, with some additional
27 source files, config files, and make files. It also includes extra
31 directory, which includes the source files for creating the
35 HTTP (in the MacPerl Installer, which includes all the source
40 The source is also in the main perl repository in the macperl
41 branch (the 5.6 source is in the maint-5.6/macperl branch).
|
| /mirbsd/src/share/doc/legal/ |
| D | LICENCE-GNU | 11 the "Obtaining source code" section below applies. For
21 The section "Obtaining source code" below applies. The
24 also ask any contributor to this part of the source to
92 and the logs within the ,v files themselves). The source can
95 ries you receive need not correspond to the source code (for
107 to add tinyirc to a source tarball as usual, and link it only
108 against unmodified stock MirOS source from CVS, which is made
120 Obtaining source code
123 On your MirOS Release CD, source code for the base system is
124 at /v{version}/source{version}.ngz and xfree{version}.ngz; a
[all …]
|