← Back to branch summary

~ubuntu-branches/ubuntu/oneiric/monodevelop/oneiric

« back to all changes in this revision

Viewing changes to src/core/Mono.Debugging/Mono.Debugging.Evaluation/NullValueReference.cs

  • Committer: Bazaar Package Importer
  • Author(s): Jo Shields
  • Date: 2011-06-27 17:03:13 UTC
  • mto: (1.8.1 upstream)
  • mto: This revision was merged to the branch mainline in revision 54.
  • Revision ID: james.westby@ubuntu.com-20110627170313-6cvz3s19x6e9hqe9
Import upstream version 2.5.92+dfsg

Show diffs side-by-side

added added

removed removed

Lines of Context:
src/core/Mono.Debugging/Mono.Debugging.Evaluation/NullValueReference.cs
1
 
// NullValueReference.cs
2
 
//
3
 
// Author:
4
 
//   Lluis Sanchez Gual <lluis@novell.com>
5
 
//
6
 
// Copyright (c) 2008 Novell, Inc (http://www.novell.com)
7
 
//
8
 
// Permission is hereby granted, free of charge, to any person obtaining a copy
9
 
// of this software and associated documentation files (the "Software"), to deal
10
 
// in the Software without restriction, including without limitation the rights
11
 
// to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
12
 
// copies of the Software, and to permit persons to whom the Software is
13
 
// furnished to do so, subject to the following conditions:
14
 
//
15
 
// The above copyright notice and this permission notice shall be included in
16
 
// all copies or substantial portions of the Software.
17
 
//
18
 
// THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
19
 
// IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
20
 
// FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
21
 
// AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
22
 
// LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
23
 
// OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN
24
 
// THE SOFTWARE.
25
 
//
26
 
//
27
 
 
28
 
using System;
29
 
using Mono.Debugging.Client;
30
 
 
31
 
namespace Mono.Debugging.Evaluation
32
 
{
33
 
        public class NullValueReference: ValueReference
34
 
        {
35
 
                object type;
36
 
                object obj;
37
 
                bool valueCreated;
38
 
 
39
 
                public NullValueReference (EvaluationContext ctx, object type)
40
 
                        : base (ctx)
41
 
                {
42
 
                        this.type = type;
43
 
                }
44
 
        
45
 
                public override object Value {
46
 
                        get {
47
 
                                if (!valueCreated) {
48
 
                                        valueCreated = true;
49
 
                                        obj = Context.Adapter.CreateNullValue (Context, type);
50
 
                                }
51
 
                                return obj;
52
 
                        }
53
 
                        set {
54
 
                                throw new NotSupportedException();
55
 
                        }
56
 
                }
57
 
                
58
 
                public override object Type {
59
 
                        get {
60
 
                                return type;
61
 
                        }
62
 
                }
63
 
                
64
 
                public override object ObjectValue {
65
 
                        get {
66
 
                                return null;
67
 
                        }
68
 
                }
69
 
 
70
 
                public override string Name {
71
 
                        get {
72
 
                                return "null";
73
 
                        }
74
 
                }
75
 
                
76
 
                public override ObjectValueFlags Flags {
77
 
                        get {
78
 
                                return ObjectValueFlags.Literal;
79
 
                        }
80
 
                }
81
 
 
82
 
                protected override ObjectValue OnCreateObjectValue (EvaluationOptions options)
83
 
                {
84
 
                        string tn = Context.Adapter.GetTypeName (GetContext (options), Type);
85
 
                        return Mono.Debugging.Client.ObjectValue.CreateObject (null, new ObjectPath (Name), tn, "null", Flags, null);
86
 
                }
87
 
 
88
 
                public override ValueReference GetChild (string name, EvaluationOptions options)
89
 
                {
90
 
                        return null;
91
 
                }
92
 
 
93
 
                public override ObjectValue[] GetChildren (Mono.Debugging.Client.ObjectPath path, int index, int count, EvaluationOptions options)
94
 
                {
95
 
                        return new ObjectValue [0];
96
 
                }
97
 
        }
98
 
}
 
1
// NullValueReference.cs
 
2
//
 
3
// Author:
 
4
//   Lluis Sanchez Gual <lluis@novell.com>
 
5
//
 
6
// Copyright (c) 2008 Novell, Inc (http://www.novell.com)
 
7
//
 
8
// Permission is hereby granted, free of charge, to any person obtaining a copy
 
9
// of this software and associated documentation files (the "Software"), to deal
 
10
// in the Software without restriction, including without limitation the rights
 
11
// to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
 
12
// copies of the Software, and to permit persons to whom the Software is
 
13
// furnished to do so, subject to the following conditions:
 
14
//
 
15
// The above copyright notice and this permission notice shall be included in
 
16
// all copies or substantial portions of the Software.
 
17
//
 
18
// THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
 
19
// IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
 
20
// FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
 
21
// AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
 
22
// LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
 
23
// OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN
 
24
// THE SOFTWARE.
 
25
//
 
26
//
 
27
 
 
28
using System;
 
29
using Mono.Debugging.Client;
 
30
 
 
31
namespace Mono.Debugging.Evaluation
 
32
{
 
33
        public class NullValueReference: ValueReference
 
34
        {
 
35
                object type;
 
36
                object obj;
 
37
                bool valueCreated;
 
38
 
 
39
                public NullValueReference (EvaluationContext ctx, object type)
 
40
                        : base (ctx)
 
41
                {
 
42
                        this.type = type;
 
43
                }
 
44
        
 
45
                public override object Value {
 
46
                        get {
 
47
                                if (!valueCreated) {
 
48
                                        valueCreated = true;
 
49
                                        obj = Context.Adapter.CreateNullValue (Context, type);
 
50
                                }
 
51
                                return obj;
 
52
                        }
 
53
                        set {
 
54
                                throw new NotSupportedException();
 
55
                        }
 
56
                }
 
57
                
 
58
                public override object Type {
 
59
                        get {
 
60
                                return type;
 
61
                        }
 
62
                }
 
63
                
 
64
                public override object ObjectValue {
 
65
                        get {
 
66
                                return null;
 
67
                        }
 
68
                }
 
69
 
 
70
                public override string Name {
 
71
                        get {
 
72
                                return "null";
 
73
                        }
 
74
                }
 
75
                
 
76
                public override ObjectValueFlags Flags {
 
77
                        get {
 
78
                                return ObjectValueFlags.Literal;
 
79
                        }
 
80
                }
 
81
 
 
82
                protected override ObjectValue OnCreateObjectValue (EvaluationOptions options)
 
83
                {
 
84
                        string tn = Context.Adapter.GetTypeName (GetContext (options), Type);
 
85
                        return Mono.Debugging.Client.ObjectValue.CreateObject (null, new ObjectPath (Name), tn, "null", Flags, null);
 
86
                }
 
87
 
 
88
                public override ValueReference GetChild (string name, EvaluationOptions options)
 
89
                {
 
90
                        return null;
 
91
                }
 
92
 
 
93
                public override ObjectValue[] GetChildren (Mono.Debugging.Client.ObjectPath path, int index, int count, EvaluationOptions options)
 
94
                {
 
95
                        return new ObjectValue [0];
 
96
                }
 
97
        }
 
98
}