diff options
author | Michael Snyder <msnyder@vmware.com> | 2011-01-07 19:36:19 +0000 |
---|---|---|
committer | Michael Snyder <msnyder@vmware.com> | 2011-01-07 19:36:19 +0000 |
commit | 0963b4bd458eab010b3b19c9ffd8eb790f2cd06c (patch) | |
tree | 42dcaac763368854d136093c43a40333b751d391 /gdb/f-lang.c | |
parent | 87973e9f82d516acbf4f484ba56febe17a3b312d (diff) | |
download | gdb-0963b4bd458eab010b3b19c9ffd8eb790f2cd06c.zip gdb-0963b4bd458eab010b3b19c9ffd8eb790f2cd06c.tar.gz gdb-0963b4bd458eab010b3b19c9ffd8eb790f2cd06c.tar.bz2 |
2011-01-07 Michael Snyder <msnyder@vmware.com>
* ada-lang.c: Comment cleanup, mostly periods and spaces.
* ada-lang.h: Ditto.
* ada-tasks.c: Ditto.
* ada-valprint.c: Ditto.
* aix-threads.c: Ditto.
* alpha-linux-nat.c: Ditto.
* alpha-linux-tdep.c: Ditto.
* alpha-mdebug-tdep.c: Ditto.
* alpha-nat.c: Ditto.
* alpha-osf1-tdep.c: Ditto.
* alpha-tdep.c: Ditto.
* alphabsd-nat.c: Ditto.
* alphabsd-tdep.c: Ditto.
* amd64-darwin-tdep.c: Ditto.
* amd64-linux-nat.c: Ditto.
* amd64-linux-tdep.c: Ditto.
* amd64-sol2-tdep.c: Ditto.
* amd64-tdep.c: Ditto.
* amd64-fbsd-tdep.c: Ditto.
* amd64-nbsd-tdep.c: Ditto.
* amd64-obsd-tdep.c: Ditto.
* amd64-linux-nat.c: Ditto.
* amd64-linux-tdep.c: Ditto.
* arm-tdep.c: Ditto.
* arm-tdep.h: Ditto.
* armnbsd-nat.c: Ditto.
* avr-tdep.c: Ditto.
* bfin-tdep.c: Ditto.
* bsd-kvm.c: Ditto.
* c-typeprintc: Ditto.
* c-valprint.c: Ditto.
* coff-pe-read.h: Ditto.
* coffreead.c: Ditto.
* cris-tdep.c: Ditto.
* d-lang.c: Ditto.
* darwin-nat-info.c: Ditto.
* darwin-nat.c: Ditto.
* dbug-rom.c: Ditto.
* dbxread.c: Ditto.
* dcache.c: Ditto.
* dcache.h: Ditto.
* dec-thread.c: Ditto.
* defs.h: Ditto.
* demangle.c: Ditto.
* dicos-tdep.c: Ditto.
* dictionary.c: Ditto.
* dictionary.h: Ditto.
* dink32-rom.c: Ditto.
* disasm.c: Ditto.
* doublest.c: Ditto.
* dsrec.c: Ditto.
* dummy-frame.c: Ditto.
* dwarf2-frame.c: Ditto.
* dwarf2expr.c: Ditto.
* dwarf2loc.c: Ditto.
* dwarf2read.c: Ditto.
* elfread.c: Ditto.
* environ.c: Ditto.
* eval.c: Ditto.
* event-top.h: Ditto.
* exceptions.c: Ditto.
* exceptions.h: Ditto.
* exec.c: Ditto.
* expprint.c: Ditto.
* expression.h: Ditto.
* f-exp.y: Ditto.
* f-lang.c: Ditto.
* f-lang.h: Ditto.
* f-typeprint.c: Ditto.
* f-valprint.c: Ditto.
* fbsd-nat.c: Ditto.
* findvar.c: Ditto.
* fork-child.c: Ditto.
* frame.c: Ditto.
* frame.h: Ditto.
* frv-linux-tdep.c: Ditto.
* frv-tdep.c: Ditto.
* gcore.c: Ditto.
* gdb-stabs.h: Ditto.
* gdb_assert.h: Ditto.
* gdb_string.h: Ditto.
* gdb_thread_db.h: Ditto.
* gdb_wait.h: Ditto.
* gdbarch.sh: Ditto.
* gdbcore.h: Ditto.
* gdbthread.h: Ditto.
* gdbtypes.c: Ditto.
* gdbtypes.h: Ditto.
* gnu-nat.c: Ditto.
* gnu-nat.h: Ditto.
* gnu-v2-abi.c: Ditto.
* gnu-v3-abi.c: Ditto.
* go32-nat.c: Ditto.
* gdbarch.c: Regenerate.
* gdbarch.h: Regenerate.
Diffstat (limited to 'gdb/f-lang.c')
-rw-r--r-- | gdb/f-lang.c | 40 |
1 files changed, 20 insertions, 20 deletions
diff --git a/gdb/f-lang.c b/gdb/f-lang.c index 76ec8d7..61513c1 100644 --- a/gdb/f-lang.c +++ b/gdb/f-lang.c @@ -34,11 +34,11 @@ #include "cp-support.h" -/* Following is dubious stuff that had been in the xcoff reader. */ +/* Following is dubious stuff that had been in the xcoff reader. */ struct saved_fcn { - long line_offset; /* Line offset for function */ + long line_offset; /* Line offset for function. */ struct saved_fcn *next; }; @@ -85,7 +85,7 @@ static void f_emit_char (int c, struct type *type, static void f_emit_char (int c, struct type *type, struct ui_file *stream, int quoter) { - c &= 0xFF; /* Avoid sign bit follies */ + c &= 0xFF; /* Avoid sign bit follies. */ if (PRINT_LITERAL_FORM (c)) { @@ -126,7 +126,7 @@ f_emit_char (int c, struct type *type, struct ui_file *stream, int quoter) } /* FIXME: This is a copy of the same function from c-exp.y. It should - be replaced with a true F77version. */ + be replaced with a true F77version. */ static void f_printchar (int c, struct type *type, struct ui_file *stream) @@ -141,7 +141,7 @@ f_printchar (int c, struct type *type, struct ui_file *stream) are printed as appropriate. Print ellipses at the end if we had to stop before printing LENGTH characters, or if FORCE_ELLIPSES. FIXME: This is a copy of the same function from c-exp.y. It should - be replaced with a true F77 version. */ + be replaced with a true F77 version. */ static void f_printstr (struct ui_file *stream, struct type *type, const gdb_byte *string, @@ -344,7 +344,7 @@ f_make_symbol_completion_list (char *text, char *word) } /* This is declared in c-lang.h but it is silly to import that file for what - is already just a hack. */ + is already just a hack. */ extern int c_value_print (struct value *, struct ui_file *, const struct value_print_options *); @@ -511,10 +511,10 @@ static SAVED_BF_PTR current_head_bf_list = NULL; /* Current head of above list. */ static SAVED_BF_PTR tmp_bf_ptr; /* Generic temporary for use - in macros */ + in macros. */ /* The following function simply enters a given common block onto - the global common block chain */ + the global common block chain. */ static void add_common_block (char *name, CORE_ADDR offset, int secnum, char *func_stab) @@ -525,7 +525,7 @@ add_common_block (char *name, CORE_ADDR offset, int secnum, char *func_stab) /* If the COMMON block we are trying to add has a blank name (i.e. "#BLNK_COM") then we set it to __BLANK because the darn "#" character makes GDB's input - parser have fits. */ + parser have fits. */ if (strcmp (name, BLANK_COMMON_NAME_ORIGINAL) == 0 @@ -545,7 +545,7 @@ add_common_block (char *name, CORE_ADDR offset, int secnum, char *func_stab) tmp->name = xmalloc (strlen (name) + 1); /* local_copy_func_stab is a stabstring, let us first extract the - function name from the stab by NULLing out the ':' character. */ + function name from the stab by NULLing out the ':' character. */ c = NULL; @@ -582,7 +582,7 @@ add_common_block (char *name, CORE_ADDR offset, int secnum, char *func_stab) #endif /* The following function simply enters a given common entry onto - the "current_common" block that has been saved away. */ + the "current_common" block that has been saved away. */ #if 0 static void @@ -594,7 +594,7 @@ add_common_entry (struct symbol *entry_sym_ptr) /* The order of this list is important, since we expect the entries to appear in decl. - order when we later issue "info common" calls */ + order when we later issue "info common" calls. */ tmp = allocate_common_entry_node (); @@ -619,7 +619,7 @@ add_common_entry (struct symbol *entry_sym_ptr) } #endif -/* This routine finds the first encountred COMMON block named "name" */ +/* This routine finds the first encountred COMMON block named "name". */ #if 0 static SAVED_F77_COMMON_PTR @@ -642,7 +642,7 @@ find_first_common_named (char *name) #endif /* This routine finds the first encountred COMMON block named "name" - that belongs to function funcname */ + that belongs to function funcname. */ SAVED_F77_COMMON_PTR find_common_for_function (char *name, char *funcname) @@ -675,7 +675,7 @@ patch_common_entries (SAVED_F77_COMMON_PTR blk, CORE_ADDR offset, int secnum) { COMMON_ENTRY_PTR entry; - blk->offset = offset; /* Keep this around for future use. */ + blk->offset = offset; /* Keep this around for future use. */ entry = blk->entries; @@ -693,7 +693,7 @@ patch_common_entries (SAVED_F77_COMMON_PTR blk, CORE_ADDR offset, int secnum) blocks occur with relative infrequency, we simply do a linear scan on the name. Eventually, the best way to do this will be a hashed-lookup. Secnum is the section number for the .bss section - (which is where common data lives). */ + (which is where common data lives). */ static void patch_all_commons_by_name (char *name, CORE_ADDR offset, int secnum) @@ -731,7 +731,7 @@ patch_all_commons_by_name (char *name, CORE_ADDR offset, int secnum) #line pragmas sometimes cause line ranges to get messed up we simply create a linear list. This list can then be searched first by a queueing algorithm and upon failure fall back to - a linear scan. */ + a linear scan. */ #if 0 #define ADD_BF_SYMNUM(bf_sym,fcn_sym) \ @@ -760,7 +760,7 @@ else \ } #endif -/* This function frees the entire (.bf,function) list */ +/* This function frees the entire (.bf,function) list. */ #if 0 static void @@ -791,7 +791,7 @@ get_bf_for_fcn (long the_function) int nprobes = 0; /* First use a simple queuing algorithm (i.e. look and see if the - item at the head of the queue is the one you want) */ + item at the head of the queue is the one you want). */ if (saved_bf_list == NULL) internal_error (__FILE__, __LINE__, @@ -810,7 +810,7 @@ get_bf_for_fcn (long the_function) /* If the above did not work (probably because #line directives were used in the sourcefile and they messed up our internal tables) we now do - the ugly linear scan */ + the ugly linear scan. */ if (global_remote_debug) fprintf_unfiltered (gdb_stderr, "\ndefaulting to linear scan\n"); |