Mercurial > hg > octave-nkf
annotate src/token.h @ 13985:43cc49c7abd1
Use thread-safe atomic reference counting (GCC and MSVC).
* configure.ac: New --enable-atomic-refcount argument.
(octave_allocator): Fix USE_OCTAVE_ALLOCATOR variable assignment.
(OCTAVE_CONFIG_INCLUDED): New macro in config.h.
* oct-refcount.h (OCTREFCOUNT_ATOMIC_INCREMENT,
OCTREFCOUNT_ATOMIC_INCREMENT_POST, OCTREFCOUNT_ATOMIC_DECREMENT,
OCTREFCOUNT_ATOMIC_DECREMENT_POST): New macro, defined for MSVC and GCC
when USE_ATOMIC_REFCOUNT is defined.
(octave_refcount:operator++, octave_refcount::operator--): Use them.
(octave_refcount::operator count_type): Cast returned value to volatile.
(octave_refcount::direct): Remove unsafe member.
* Array.h (Array::make_unique): Delete rep if refcount reaches 0.
* Sparse.h (Sparse::make_unique): Delete rep if refcount reaches 0.
* Array.h (Array:~Array, Array::operator=): Delete rep only when refcount is
excatly 0.
* Array.cc (Array::clear): Likewise.
* Sparse.cc (Sparse::~Sparse, Sparse::operator=): Likewise.
* SparseCmplxQR.h (SparseCmplxQR::~SparseCmplxQR, SparseCmplxQR::operator=):
Likewise.
* SparseQR.h (SparseQR::~SparseQR, SparseQR::operator=): Likewise.
* sparse-base-chol.h (sparse_base_chol::~sparse_base_chol,
sparse_base_chol::operator): Likewise.
* dim-vector.h (oct-refcount.h): New included header.
(dim_vector::make_unique, dim_vector::resize): Use OCTREFCOUNT_ATOMIC_DECREMENT
macro and delete rep when refcount reaches 0.
(dim_vector::dim_vector): Use OCTREFCOUNT_ATOMIC_INCREMENT.
(dim_vector::operator=): Use OCTREFCOUNT_ATOMIC_INCREMENT and
OCTREFCOUNT_ATOMIC_DECREMENT.
(dim_vector::~dim_vector): Use OCTREFCOUNT_ATOMIC_DECREMENT.
* oct-mutex.h (oct-refcount.h): New included header.
(octave_base_mutex::count): Use octave_refcount class.
* gl-render.cc (oct-refcount.h): New included header.
* graphics.h.in (oct-refcount.h): Likewise.
(base_property::count, base_graphics_toolkit::count,
base_graphics_object::count, base_graphics_event::count): Use octave_refcount.
(property::~property, property::operator=): Delete rep only when refcountn is
excatly 0.
* oct-map.h (octave_fields::make_unique): Delete rep when refcount reaches 0.
* oct-stream.h (oct-refcount.h): New included header.
(octave_base_stream::count): Use octave_refcount class.
* ov.h (octave_value::make_unique): Delete rep when refcount reaches 0.
* symtab.h (oct-refcount.h): New included header.
(symbol_record_rep::count, fcn_info_rep::count): Use octave_refcount class.
* DLD-FUNCTIONS/urlwrite.cc (oct-refcount.h): New included header.
(curl_handle_rep::count): Use octave_refcount class.
author | Michael Goffioul <michael.goffioul@gmail.com> |
---|---|
date | Sat, 03 Dec 2011 15:19:42 +0000 |
parents | 7861a5fd3479 |
children | 72c96de7a403 |
rev | line source |
---|---|
142 | 1 /* |
2 | |
11523 | 3 Copyright (C) 1993-2011 John W. Eaton |
142 | 4 |
5 This file is part of Octave. | |
6 | |
7 Octave is free software; you can redistribute it and/or modify it | |
8 under the terms of the GNU General Public License as published by the | |
7016 | 9 Free Software Foundation; either version 3 of the License, or (at your |
10 option) any later version. | |
142 | 11 |
12 Octave is distributed in the hope that it will be useful, but WITHOUT | |
13 ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or | |
14 FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License | |
15 for more details. | |
16 | |
17 You should have received a copy of the GNU General Public License | |
7016 | 18 along with Octave; see the file COPYING. If not, see |
19 <http://www.gnu.org/licenses/>. | |
142 | 20 |
21 */ | |
22 | |
383 | 23 #if !defined (octave_token_h) |
24 #define octave_token_h 1 | |
142 | 25 |
1755 | 26 #include <string> |
27 | |
453 | 28 class |
29 token | |
142 | 30 { |
31 public: | |
3548 | 32 |
142 | 33 enum token_type |
34 { | |
35 generic_token, | |
36 string_token, | |
37 double_token, | |
38 ettype_token, | |
9476 | 39 sym_rec_token, |
40 scls_rec_token, | |
41 meta_rec_token | |
142 | 42 }; |
43 | |
44 enum end_tok_type | |
45 { | |
46 simple_end, | |
9476 | 47 classdef_end, |
13249
7861a5fd3479
accept enumeration keyword
John W. Eaton <jwe@octave.org>
parents:
13245
diff
changeset
|
48 enumeration_end, |
9476 | 49 events_end, |
142 | 50 for_end, |
51 function_end, | |
52 if_end, | |
9476 | 53 methods_end, |
13245
027a2186cd90
parfor keyword and infrastructure, but handle parfor as normal for loop for now
John W. Eaton <jwe@octave.org>
parents:
11523
diff
changeset
|
54 parfor_end, |
9476 | 55 properties_end, |
2764 | 56 switch_end, |
142 | 57 while_end, |
1489 | 58 try_catch_end, |
3548 | 59 unwind_protect_end |
142 | 60 }; |
61 | |
62 token (int l = -1, int c = -1); | |
3523 | 63 token (const std::string& s, int l = -1, int c = -1); |
3552 | 64 token (double d, const std::string& s = std::string (), |
10313 | 65 int l = -1, int c = -1); |
142 | 66 token (end_tok_type t, int l = -1, int c = -1); |
7336 | 67 token (symbol_table::symbol_record *s, int l = -1, int c = -1); |
9476 | 68 token (symbol_table::symbol_record *cls, |
69 symbol_table::symbol_record *pkg, int l = -1, int c = -1); | |
70 token (symbol_table::symbol_record *mth, | |
71 symbol_table::symbol_record *cls, | |
72 symbol_table::symbol_record *pkg, int l = -1, int c = -1); | |
142 | 73 |
1755 | 74 ~token (void); |
142 | 75 |
1755 | 76 int line (void) { return line_num; } |
77 int column (void) { return column_num; } | |
142 | 78 |
3523 | 79 std::string text (void); |
142 | 80 double number (void); |
81 end_tok_type ettype (void); | |
7336 | 82 symbol_table::symbol_record *sym_rec (void); |
142 | 83 |
9476 | 84 symbol_table::symbol_record *method_rec (void); |
85 symbol_table::symbol_record *class_rec (void); | |
86 symbol_table::symbol_record *package_rec (void); | |
87 | |
88 symbol_table::symbol_record *meta_class_rec (void); | |
89 symbol_table::symbol_record *meta_package_rec (void); | |
90 | |
3523 | 91 std::string text_rep (void); |
581 | 92 |
142 | 93 private: |
3552 | 94 |
95 // No copying! | |
96 | |
1288 | 97 token (const token& tok); |
3552 | 98 |
1288 | 99 token& operator = (const token& tok); |
100 | |
142 | 101 int line_num; |
102 int column_num; | |
103 token_type type_tag; | |
104 union | |
105 { | |
3523 | 106 std::string *str; |
142 | 107 double num; |
108 end_tok_type et; | |
7336 | 109 symbol_table::symbol_record *sr; |
9476 | 110 struct |
111 { | |
112 symbol_table::symbol_record *mr; | |
113 symbol_table::symbol_record *cr; | |
114 symbol_table::symbol_record *pr; | |
115 } sc; | |
116 struct | |
117 { | |
118 symbol_table::symbol_record *cr; | |
119 symbol_table::symbol_record *pr; | |
120 } mc; | |
142 | 121 }; |
3523 | 122 std::string orig_text; |
142 | 123 }; |
124 | |
125 #endif |