Mercurial > hg > xemacs-beta
annotate lib-src/sorted-doc.c @ 4981:4aebb0131297
Cleanups/renaming of EXTERNAL_TO_C_STRING and friends
-------------------- ChangeLog entries follow: --------------------
modules/ChangeLog addition:
2010-02-05 Ben Wing <ben@xemacs.org>
* postgresql/postgresql.c:
* postgresql/postgresql.c (CHECK_LIVE_CONNECTION):
* postgresql/postgresql.c (Fpq_connectdb):
* postgresql/postgresql.c (Fpq_connect_start):
* postgresql/postgresql.c (Fpq_lo_import):
* postgresql/postgresql.c (Fpq_lo_export):
* ldap/eldap.c (Fldap_open):
* ldap/eldap.c (Fldap_search_basic):
* ldap/eldap.c (Fldap_add):
* ldap/eldap.c (Fldap_modify):
* ldap/eldap.c (Fldap_delete):
* canna/canna_api.c (Fcanna_initialize):
* canna/canna_api.c (Fcanna_store_yomi):
* canna/canna_api.c (Fcanna_parse):
* canna/canna_api.c (Fcanna_henkan_begin):
EXTERNAL_TO_C_STRING returns its argument instead of storing it
in a parameter, and is renamed to EXTERNAL_TO_ITEXT. Similar
things happen to related macros. See entry in src/ChangeLog.
More Mule-izing of postgresql.c. Extract out common code
between `pq-connectdb' and `pq-connect-start'. Fix places
that signal an error string using a formatted string to instead
follow the standard and have a fixed reason followed by the
particular error message stored as one of the frobs.
src/ChangeLog addition:
2010-02-05 Ben Wing <ben@xemacs.org>
* console-msw.c (write_string_to_mswindows_debugging_output):
* console-msw.c (Fmswindows_message_box):
* console-x.c (x_perhaps_init_unseen_key_defaults):
* console.c:
* database.c (dbm_get):
* database.c (dbm_put):
* database.c (dbm_remove):
* database.c (berkdb_get):
* database.c (berkdb_put):
* database.c (berkdb_remove):
* database.c (Fopen_database):
* device-gtk.c (gtk_init_device):
* device-msw.c (msprinter_init_device_internal):
* device-msw.c (msprinter_default_printer):
* device-msw.c (msprinter_init_device):
* device-msw.c (sync_printer_with_devmode):
* device-msw.c (Fmsprinter_select_settings):
* device-x.c (sanity_check_geometry_resource):
* device-x.c (Dynarr_add_validified_lisp_string):
* device-x.c (x_init_device):
* device-x.c (Fx_put_resource):
* device-x.c (Fx_valid_keysym_name_p):
* device-x.c (Fx_set_font_path):
* dialog-msw.c (push_lisp_string_as_unicode):
* dialog-msw.c (handle_directory_dialog_box):
* dialog-msw.c (handle_file_dialog_box):
* dialog-x.c (dbox_descriptor_to_widget_value):
* editfns.c (Fformat_time_string):
* editfns.c (Fencode_time):
* editfns.c (Fset_time_zone_rule):
* emacs.c (make_argc_argv):
* emacs.c (Fdump_emacs):
* emodules.c (emodules_load):
* eval.c:
* eval.c (maybe_signal_error_1):
* event-msw.c (Fdde_alloc_advise_item):
* event-msw.c (mswindows_dde_callback):
* event-msw.c (mswindows_wnd_proc):
* fileio.c (report_error_with_errno):
* fileio.c (Fsysnetunam):
* fileio.c (Fdo_auto_save):
* font-mgr.c (extract_fcapi_string):
* font-mgr.c (Ffc_config_app_font_add_file):
* font-mgr.c (Ffc_config_app_font_add_dir):
* font-mgr.c (Ffc_config_filename):
* frame-gtk.c (gtk_set_frame_text_value):
* frame-gtk.c (gtk_create_widgets):
* frame-msw.c (mswindows_init_frame_1):
* frame-msw.c (mswindows_set_title_from_ibyte):
* frame-msw.c (msprinter_init_frame_3):
* frame-x.c (x_set_frame_text_value):
* frame-x.c (x_set_frame_properties):
* frame-x.c (start_drag_internal_1):
* frame-x.c (x_cde_transfer_callback):
* frame-x.c (x_create_widgets):
* glyphs-eimage.c (my_jpeg_output_message):
* glyphs-eimage.c (jpeg_instantiate):
* glyphs-eimage.c (gif_instantiate):
* glyphs-eimage.c (png_instantiate):
* glyphs-eimage.c (tiff_instantiate):
* glyphs-gtk.c (xbm_instantiate_1):
* glyphs-gtk.c (gtk_xbm_instantiate):
* glyphs-gtk.c (gtk_xpm_instantiate):
* glyphs-gtk.c (gtk_xface_instantiate):
* glyphs-gtk.c (cursor_font_instantiate):
* glyphs-gtk.c (gtk_redisplay_widget):
* glyphs-gtk.c (gtk_widget_instantiate_1):
* glyphs-gtk.c (gtk_add_tab_item):
* glyphs-msw.c (mswindows_xpm_instantiate):
* glyphs-msw.c (bmp_instantiate):
* glyphs-msw.c (mswindows_resource_instantiate):
* glyphs-msw.c (xbm_instantiate_1):
* glyphs-msw.c (mswindows_xbm_instantiate):
* glyphs-msw.c (mswindows_xface_instantiate):
* glyphs-msw.c (mswindows_redisplay_widget):
* glyphs-msw.c (mswindows_widget_instantiate):
* glyphs-msw.c (add_tree_item):
* glyphs-msw.c (add_tab_item):
* glyphs-msw.c (mswindows_combo_box_instantiate):
* glyphs-msw.c (mswindows_widget_query_string_geometry):
* glyphs-x.c (x_locate_pixmap_file):
* glyphs-x.c (xbm_instantiate_1):
* glyphs-x.c (x_xbm_instantiate):
* glyphs-x.c (extract_xpm_color_names):
* glyphs-x.c (x_xpm_instantiate):
* glyphs-x.c (x_xface_instantiate):
* glyphs-x.c (autodetect_instantiate):
* glyphs-x.c (safe_XLoadFont):
* glyphs-x.c (cursor_font_instantiate):
* glyphs-x.c (x_redisplay_widget):
* glyphs-x.c (Fchange_subwindow_property):
* glyphs-x.c (x_widget_instantiate):
* glyphs-x.c (x_tab_control_redisplay):
* glyphs.c (pixmap_to_lisp_data):
* gui-x.c (menu_separator_style_and_to_external):
* gui-x.c (add_accel_and_to_external):
* gui-x.c (button_item_to_widget_value):
* hpplay.c (player_error_internal):
* hpplay.c (play_sound_file):
* hpplay.c (play_sound_data):
* intl.c (Fset_current_locale):
* lisp.h:
* menubar-gtk.c (gtk_xemacs_set_accel_keys):
* menubar-msw.c (populate_menu_add_item):
* menubar-msw.c (populate_or_checksum_helper):
* menubar-x.c (menu_item_descriptor_to_widget_value_1):
* nt.c (init_user_info):
* nt.c (get_long_basename):
* nt.c (nt_get_resource):
* nt.c (init_mswindows_environment):
* nt.c (get_cached_volume_information):
* nt.c (mswindows_readdir):
* nt.c (read_unc_volume):
* nt.c (mswindows_stat):
* nt.c (mswindows_getdcwd):
* nt.c (mswindows_executable_type):
* nt.c (Fmswindows_short_file_name):
* ntplay.c (nt_play_sound_file):
* objects-gtk.c:
* objects-gtk.c (gtk_valid_color_name_p):
* objects-gtk.c (gtk_initialize_font_instance):
* objects-gtk.c (gtk_font_list):
* objects-msw.c (font_enum_callback_2):
* objects-msw.c (parse_font_spec):
* objects-x.c (x_parse_nearest_color):
* objects-x.c (x_valid_color_name_p):
* objects-x.c (x_initialize_font_instance):
* objects-x.c (x_font_instance_truename):
* objects-x.c (x_font_list):
* objects-xlike-inc.c (XFUN):
* objects-xlike-inc.c (xft_find_charset_font):
* process-nt.c (mswindows_report_winsock_error):
* process-nt.c (nt_create_process):
* process-nt.c (get_internet_address):
* process-nt.c (nt_open_network_stream):
* process-unix.c:
* process-unix.c (allocate_pty):
* process-unix.c (get_internet_address):
* process-unix.c (unix_canonicalize_host_name):
* process-unix.c (unix_open_network_stream):
* realpath.c:
* select-common.h (lisp_data_to_selection_data):
* select-gtk.c (symbol_to_gtk_atom):
* select-gtk.c (atom_to_symbol):
* select-msw.c (symbol_to_ms_cf):
* select-msw.c (mswindows_register_selection_data_type):
* select-x.c (symbol_to_x_atom):
* select-x.c (x_atom_to_symbol):
* select-x.c (hack_motif_clipboard_selection):
* select-x.c (Fx_store_cutbuffer_internal):
* sound.c (Fplay_sound_file):
* sound.c (Fplay_sound):
* sound.h (sound_perror):
* sysdep.c:
* sysdep.c (qxe_allocating_getcwd):
* sysdep.c (qxe_execve):
* sysdep.c (copy_in_passwd):
* sysdep.c (qxe_getpwnam):
* sysdep.c (qxe_ctime):
* sysdll.c (dll_open):
* sysdll.c (dll_function):
* sysdll.c (dll_variable):
* sysdll.c (search_linked_libs):
* sysdll.c (dll_error):
* sysfile.h:
* sysfile.h (PATHNAME_CONVERT_OUT_TSTR):
* sysfile.h (PATHNAME_CONVERT_OUT_UTF_8):
* sysfile.h (PATHNAME_CONVERT_OUT):
* sysfile.h (LISP_PATHNAME_CONVERT_OUT):
* syswindows.h (ITEXT_TO_TSTR):
* syswindows.h (LOCAL_FILE_FORMAT_TO_TSTR):
* syswindows.h (TSTR_TO_LOCAL_FILE_FORMAT):
* syswindows.h (LOCAL_FILE_FORMAT_TO_INTERNAL_MSWIN):
* syswindows.h (LISP_LOCAL_FILE_FORMAT_MAYBE_URL_TO_TSTR):
* text.h:
* text.h (eicpy_ext_len):
* text.h (enum new_dfc_src_type):
* text.h (EXTERNAL_TO_ITEXT):
* text.h (GET_STRERROR):
* tooltalk.c (check_status):
* tooltalk.c (Fadd_tooltalk_message_arg):
* tooltalk.c (Fadd_tooltalk_pattern_attribute):
* tooltalk.c (Fadd_tooltalk_pattern_arg):
* win32.c (tstr_to_local_file_format):
* win32.c (mswindows_lisp_error_1):
* win32.c (mswindows_report_process_error):
* win32.c (Fmswindows_shell_execute):
* win32.c (mswindows_read_link_1):
Changes involving external/internal format conversion,
mostly code cleanup and renaming.
1. Eliminate the previous macros like LISP_STRING_TO_EXTERNAL
that stored its result in a parameter. The new version of
LISP_STRING_TO_EXTERNAL returns its result through the
return value, same as the previous NEW_LISP_STRING_TO_EXTERNAL.
Use the new-style macros throughout the code.
2. Rename C_STRING_TO_EXTERNAL and friends to ITEXT_TO_EXTERNAL,
in keeping with overall naming rationalization involving
Itext and related types.
Macros involved in previous two:
EXTERNAL_TO_C_STRING -> EXTERNAL_TO_ITEXT
EXTERNAL_TO_C_STRING_MALLOC -> EXTERNAL_TO_ITEXT_MALLOC
SIZED_EXTERNAL_TO_C_STRING -> SIZED_EXTERNAL_TO_ITEXT
SIZED_EXTERNAL_TO_C_STRING_MALLOC -> SIZED_EXTERNAL_TO_ITEXT_MALLOC
C_STRING_TO_EXTERNAL -> ITEXT_TO_EXTERNAL
C_STRING_TO_EXTERNAL_MALLOC -> ITEXT_TO_EXTERNAL_MALLOC
LISP_STRING_TO_EXTERNAL
LISP_STRING_TO_EXTERNAL_MALLOC
LISP_STRING_TO_TSTR
C_STRING_TO_TSTR -> ITEXT_TO_TSTR
TSTR_TO_C_STRING -> TSTR_TO_ITEXT
The following four still return their values through parameters,
since they have more than one value to return:
C_STRING_TO_SIZED_EXTERNAL -> ITEXT_TO_SIZED_EXTERNAL
LISP_STRING_TO_SIZED_EXTERNAL
C_STRING_TO_SIZED_EXTERNAL_MALLOC -> ITEXT_TO_SIZED_EXTERNAL_MALLOC
LISP_STRING_TO_SIZED_EXTERNAL_MALLOC
Sometimes additional casts had to be inserted, since the old
macros played strange games and completely defeated the type system
of the store params.
3. Rewrite many places where direct calls to TO_EXTERNAL_FORMAT
occurred with calls to one of the convenience macros listed above,
or to make_extstring().
4. Eliminate SIZED_C_STRING macros (they were hardly used, anyway)
and use a direct call to TO_EXTERNAL_FORMAT or TO_INTERNAL_FORMAT.
4. Use LISP_PATHNAME_CONVERT_OUT in many places instead of something
like LISP_STRING_TO_EXTERNAL(..., Qfile_name).
5. Eliminate some temporary variables that are no longer necessary
now that we return a value rather than storing it into a variable.
6. Some Mule-izing in database.c.
7. Error functions:
-- A bit of code cleanup in maybe_signal_error_1.
-- Eliminate report_file_type_error; it's just an alias for
signal_error_2 with params in a different order.
-- Fix some places in the hostname-handling code that directly
inserted externally-retrieved error strings into the
supposed ASCII "reason" param instead of doing the right thing
and sticking text descriptive of what was going on in "reason"
and putting the external message in a frob.
8. Use Ascbyte instead of CIbyte in process-unix.c and maybe one
or two other places.
9. Some code cleanup in copy_in_passwd() in sysdep.c.
10. Fix a real bug due to accidental variable shadowing in
tstr_to_local_file_format() in win32.c.
| author | Ben Wing <ben@xemacs.org> |
|---|---|
| date | Fri, 05 Feb 2010 11:02:24 -0600 |
| parents | ecf1ebac70d8 |
| children | 061f4f90f874 06dd936cde16 |
| rev | line source |
|---|---|
| 428 | 1 /* Give this program DOCSTR.mm.nn as standard input |
| 2 and it outputs to standard output | |
| 3 a file of texinfo input containing the doc strings. | |
| 4 | |
| 5 This version sorts the output by function name. | |
| 6 */ | |
| 7 | |
| 8 /* Synched up with: FSF 19.28. */ | |
| 9 | |
| 438 | 10 #include <config.h> |
| 428 | 11 |
| 12 #include <stdio.h> | |
| 13 #include <ctype.h> | |
| 440 | 14 #include <stdlib.h> /* for qsort() and malloc() */ |
| 15 #include <string.h> | |
| 16 static void *xmalloc (size_t); | |
| 428 | 17 |
| 18 #define NUL '\0' | |
| 19 #define MARKER '\037' | |
| 20 | |
| 21 #define DEBUG 0 | |
| 22 | |
| 440 | 23 typedef struct LINE LINE; |
| 428 | 24 |
| 440 | 25 struct LINE |
| 428 | 26 { |
| 27 LINE *next; /* ptr to next or NULL */ | |
| 28 char *line; /* text of the line */ | |
| 29 }; | |
| 30 | |
| 31 typedef struct docstr DOCSTR; | |
| 32 | |
| 33 struct docstr /* Allocated thing for an entry. */ | |
| 34 { | |
| 35 DOCSTR *next; /* next in the chain */ | |
| 36 char *name; /* name of the function or var */ | |
| 37 LINE *first; /* first line of doc text. */ | |
| 38 char type; /* 'F' for function, 'V' for variable */ | |
| 39 }; | |
| 40 | |
| 41 | |
| 42 /* Print error message. `s1' is printf control string, `s2' is arg for it. */ | |
| 43 | |
| 44 static void | |
| 45 error (char *s1, char *s2) | |
| 46 { | |
| 47 fprintf (stderr, "sorted-doc: "); | |
| 48 fprintf (stderr, s1, s2); | |
| 49 fprintf (stderr, "\n"); | |
| 50 } | |
| 51 | |
| 52 /* Print error message and exit. */ | |
| 53 | |
| 54 static void | |
| 55 fatal (char *s1, char *s2) | |
| 56 { | |
| 57 error (s1, s2); | |
| 58 exit (1); | |
| 59 } | |
| 60 | |
| 61 /* Like malloc but get fatal error if memory is exhausted. */ | |
| 62 | |
| 63 static void * | |
| 440 | 64 xmalloc (size_t size) |
| 428 | 65 { |
| 440 | 66 void *result = malloc (size); |
| 428 | 67 if (result == NULL) |
| 68 fatal ("%s", "virtual memory exhausted"); | |
| 69 return result; | |
| 70 } | |
| 71 | |
| 72 static char * | |
| 73 strsav (char *str) | |
| 74 { | |
| 440 | 75 char *buf = (char *) xmalloc (strlen (str) + 1); |
| 76 strcpy (buf, str); | |
| 77 return buf; | |
| 428 | 78 } |
| 79 | |
| 80 /* Comparison function for qsort to call. */ | |
| 81 | |
| 82 static int | |
| 83 cmpdoc (DOCSTR **a, DOCSTR **b) | |
| 84 { | |
| 85 register int val = strcmp ((*a)->name, (*b)->name); | |
| 86 if (val) return val; | |
| 87 return (*a)->type - (*b)->type; | |
| 88 } | |
| 89 | |
| 90 | |
| 91 enum state | |
| 92 { | |
| 93 WAITING, BEG_NAME, NAME_GET, BEG_DESC, DESC_GET | |
| 94 }; | |
| 95 | |
| 442 | 96 const char *states[] = |
| 428 | 97 { |
| 98 "WAITING", "BEG_NAME", "NAME_GET", "BEG_DESC", "DESC_GET" | |
| 99 }; | |
| 100 | |
| 101 int | |
| 2367 | 102 main (int argc, char **argv) |
| 428 | 103 { |
| 104 register DOCSTR *dp = NULL; /* allocated DOCSTR */ | |
| 105 register LINE *lp = NULL; /* allocated line */ | |
| 106 register char *bp = 0; /* ptr inside line buffer */ | |
| 107 /* int notfirst = 0; / * set after read something */ | |
| 108 register enum state state = WAITING; /* state at start */ | |
| 109 int cnt = 0; /* number of DOCSTRs read */ | |
| 110 | |
| 111 DOCSTR *docs = 0; /* chain of allocated DOCSTRS */ | |
| 112 char buf[512]; /* line buffer */ | |
| 113 | |
| 114 while (1) /* process one char at a time */ | |
| 115 { | |
| 116 /* this char from the DOCSTR file */ | |
| 117 register int ch = getchar (); | |
| 118 | |
| 119 /* Beginnings */ | |
| 120 | |
| 121 if (state == WAITING) | |
| 122 { | |
| 123 if (ch == MARKER) | |
| 124 state = BEG_NAME; | |
| 125 } | |
| 126 else if (state == BEG_NAME) | |
| 127 { | |
| 128 cnt++; | |
| 129 if (dp == NULL) /* first dp allocated */ | |
| 130 { | |
| 131 docs = dp = (DOCSTR*) xmalloc (sizeof (DOCSTR)); | |
| 132 } | |
| 133 else /* all the rest */ | |
| 134 { | |
| 135 dp->next = (DOCSTR*) xmalloc (sizeof (DOCSTR)); | |
| 136 dp = dp->next; | |
| 137 } | |
| 138 lp = NULL; | |
| 139 dp->next = NULL; | |
| 140 bp = buf; | |
| 141 state = NAME_GET; | |
| 142 /* Record whether function or variable. */ | |
| 143 dp->type = ch; | |
| 144 ch = getchar (); | |
| 145 } | |
| 146 else if (state == BEG_DESC) | |
| 147 { | |
| 148 if (lp == NULL) /* first line for dp */ | |
| 149 { | |
| 150 dp->first = lp = (LINE*)xmalloc (sizeof (LINE)); | |
| 151 } | |
| 152 else /* continuing lines */ | |
| 153 { | |
| 154 lp->next = (LINE*)xmalloc (sizeof (LINE)); | |
| 155 lp = lp->next; | |
| 156 } | |
| 157 lp->next = NULL; | |
| 158 bp = buf; | |
| 159 state = DESC_GET; | |
| 160 } | |
| 161 | |
| 162 /* process gets */ | |
| 163 | |
| 164 if (state == NAME_GET || state == DESC_GET) | |
| 165 { | |
| 166 if (ch != MARKER && ch != '\n' && ch != EOF) | |
| 167 { | |
| 168 *bp++ = ch; | |
| 169 } | |
| 170 else /* saving and changing state */ | |
| 171 { | |
| 172 *bp = NUL; | |
| 173 bp = strsav (buf); | |
| 174 | |
| 175 if (state == NAME_GET) | |
| 176 dp->name = bp; | |
| 177 else | |
| 178 lp->line = bp; | |
| 179 | |
| 180 bp = buf; | |
| 181 state = (ch == MARKER) ? BEG_NAME : BEG_DESC; | |
| 182 } | |
| 183 } /* NAME_GET || DESC_GET */ | |
| 184 if (ch == EOF) | |
| 185 break; | |
| 186 } | |
| 187 | |
| 188 { | |
| 189 DOCSTR **array; | |
| 190 register int i; /* counter */ | |
| 191 | |
| 192 /* build array of ptrs to DOCSTRs */ | |
| 193 | |
| 194 array = (DOCSTR**)xmalloc (cnt * sizeof (*array)); | |
| 195 for (dp = docs, i = 0; dp != NULL ; dp = dp->next) | |
| 196 array[i++] = dp; | |
| 197 | |
| 198 /* sort the array by name; within each name, by type */ | |
| 199 | |
| 200 qsort ((char*)array, cnt, sizeof (DOCSTR*), | |
| 442 | 201 (int (*)(const void *, const void *)) cmpdoc); |
| 428 | 202 |
| 203 /* write the output header */ | |
| 204 | |
| 205 printf ("\\input texinfo @c -*-texinfo-*-\n"); | |
| 206 printf ("@setfilename ../info/summary\n"); | |
| 613 | 207 printf ("@settitle Command Summary for XEmacs\n"); |
| 208 printf ("@unnumbered Command Summary for XEmacs\n"); | |
| 428 | 209 printf ("@table @asis\n"); |
| 210 printf ("\n"); | |
| 211 printf ("@iftex\n"); | |
| 212 printf ("@global@let@ITEM=@item\n"); | |
| 213 printf ("@def@item{@filbreak@vskip5pt@ITEM}\n"); | |
| 214 printf ("@font@tensy cmsy10 scaled @magstephalf\n"); | |
| 215 printf ("@font@teni cmmi10 scaled @magstephalf\n"); | |
| 216 printf ("@def\\{{@tensy@char110}}\n"); /* this backslash goes with cmr10 */ | |
| 217 printf ("@def|{{@tensy@char106}}\n"); | |
| 218 printf ("@def@{{{@tensy@char102}}\n"); | |
| 219 printf ("@def@}{{@tensy@char103}}\n"); | |
| 220 printf ("@def<{{@teni@char62}}\n"); | |
| 221 printf ("@def>{{@teni@char60}}\n"); | |
| 222 printf ("@chardef@@64\n"); | |
| 223 printf ("@catcode43=12\n"); | |
| 224 printf ("@tableindent-0.2in\n"); | |
| 225 printf ("@end iftex\n"); | |
| 226 | |
| 227 /* print each function from the array */ | |
| 228 | |
| 229 for (i = 0; i < cnt; i++) | |
| 230 { | |
| 231 printf ("\n@item %s @code{%s}\n@display\n", | |
| 232 array[i]->type == 'F' ? "Function" : "Variable", | |
| 233 array[i]->name); | |
| 234 | |
| 235 for (lp = array[i]->first; lp != NULL ; lp = lp->next) | |
| 236 { | |
| 237 for (bp = lp->line; *bp; bp++) | |
| 238 { | |
| 239 /* the characters "@{}" need special treatment */ | |
| 240 if (*bp == '@' || *bp == '{' || *bp == '}') | |
| 241 { | |
| 242 putchar('@'); | |
| 243 } | |
| 244 putchar(*bp); | |
| 245 } | |
| 246 putchar ('\n'); | |
| 247 } | |
| 248 printf("@end display\n"); | |
| 249 if ( i%200 == 0 && i != 0 ) printf("@end table\n\n@table @asis\n"); | |
| 250 } | |
| 251 | |
| 252 printf ("@end table\n"); | |
| 253 printf ("@bye\n"); | |
| 254 } | |
| 255 | |
| 256 return 0; | |
| 257 } |