FazBrowse GitHub Viewer
|
Trending
|
URL:
|
Home
Tools:
[Download Repo ZIP]
[View Raw Code]
[Original HTTPS Page]
clojure/src/jvm/clojure/lang/ATransientMap.java at master · clojure/clojure · GitHub
clojure
/
clojure
Public
Notifications
You must be signed in to change notification settings
Fork
1.5k
Star
11k
Code
Actions
Projects
Security and quality
1
Insights
Additional navigation options
Code
Actions
Projects
Security and quality
Insights
Expand file tree
Breadcrumbs
clojure
/
src
/
jvm
/
clojure
/
lang
/
ATransientMap.java
Copy path
More file actions
More file actions
Latest commit
History
History
History
99 lines (83 loc) · 2.51 KB
Breadcrumbs
clojure
/
src
/
jvm
/
clojure
/
lang
/
ATransientMap.java
Copy path
File metadata and controls
99 lines (83 loc) · 2.51 KB
Raw
Copy raw file
Download raw file
Open symbols panel
Edit and raw actions
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
/**
* Copyright (c) Rich Hickey. All rights reserved.
* The use and distribution terms for this software are covered by the
* Eclipse Public License 1.0 (http://opensource.org/licenses/eclipse-1.0.php)
* which can be found in the file epl-v10.html at the root of this distribution.
* By using this software in any fashion, you are agreeing to be bound by
* the terms of this license.
* You must not remove this notice, or any other, from this software.
**/
package
clojure
.
lang
;
import
java
.
util
.
Map
;
import
clojure
.
lang
.
PersistentHashMap
.
INode
;
public
abstract
class
ATransientMap
extends
AFn
implements
ITransientMap
,
ITransientAssociative2
{
abstract
void
ensureEditable
();
abstract
ITransientMap
doAssoc
(
Object
key
,
Object
val
);
abstract
ITransientMap
doWithout
(
Object
key
);
abstract
Object
doValAt
(
Object
key
,
Object
notFound
);
abstract
int
doCount
();
abstract
IPersistentMap
doPersistent
();
public
ITransientMap
conj
(
Object
o
) {
ensureEditable
();
if
(
o
instanceof
Map
.
Entry
)
{
Map
.
Entry
e
= (
Map
.
Entry
)
o
;
return
assoc
(
e
.
getKey
(),
e
.
getValue
());
}
else
if
(
o
instanceof
IPersistentVector
)
{
IPersistentVector
v
= (
IPersistentVector
)
o
;
if
(
v
.
count
() !=
2
)
throw
new
IllegalArgumentException
(
"Vector arg to map conj must be a pair"
);
return
assoc
(
v
.
nth
(
0
),
v
.
nth
(
1
));
}
ITransientMap
ret
=
this
;
for
(
ISeq
es
=
RT
.
seq
(
o
);
es
!=
null
;
es
=
es
.
next
())
{
Map
.
Entry
e
= (
Map
.
Entry
)
es
.
first
();
ret
=
ret
.
assoc
(
e
.
getKey
(),
e
.
getValue
());
}
return
ret
;
}
public
final
Object
invoke
(
Object
arg1
) {
return
valAt
(
arg1
);
}
public
final
Object
invoke
(
Object
arg1
,
Object
notFound
) {
return
valAt
(
arg1
,
notFound
);
}
public
Object
valAt
(
Object
key
) {
return
valAt
(
key
,
null
);
}
public
ITransientMap
assoc
(
Object
key
,
Object
val
) {
ensureEditable
();
return
doAssoc
(
key
,
val
);
}
public
ITransientMap
without
(
Object
key
) {
ensureEditable
();
return
doWithout
(
key
);
}
public
IPersistentMap
persistent
() {
ensureEditable
();
return
doPersistent
();
}
public
Object
valAt
(
Object
key
,
Object
notFound
) {
ensureEditable
();
return
doValAt
(
key
,
notFound
);
}
private
static
final
Object
NOT_FOUND
=
new
Object
();
public
boolean
containsKey
(
Object
key
){
ensureEditable
();
return
valAt
(
key
,
NOT_FOUND
) !=
NOT_FOUND
;
}
public
IMapEntry
entryAt
(
Object
key
){
ensureEditable
();
Object
v
=
valAt
(
key
,
NOT_FOUND
);
if
(
v
!=
NOT_FOUND
)
return
MapEntry
.
create
(
key
,
v
);
return
null
;
}
public
int
count
() {
ensureEditable
();
return
doCount
();
}
}
Back
|
FazBrowse Home
|
New Git URL