kalmar/Groups.jl
1
0
Fork 0
mirror of https://github.com/kalmarek/Groups.jl.git synced 2024-12-26 18:30:29 +01:00
Code Issues Releases Wiki Activity

initial @compat changes, works on v0.6 without warnings

Browse Source
This commit is contained in:
kalmar 2017-07-06 17:27:56 +02:00
parent 02c1022846
commit df19042de6
1 changed files with 10 additions and 11 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

9
src/Groups.jl
View File

@ -25,7 +25,7 @@ doc"""
> * `pow` which is the (multiplicative) exponent of a symbol. > * `pow` which is the (multiplicative) exponent of a symbol.
""" """
abstract type GSymbol end @compat abstract type GSymbol end
doc""" doc"""
W::GWord{T<:GSymbol} <:GroupElem W::GWord{T<:GSymbol} <:GroupElem
@ -49,12 +49,12 @@ doc"""
modified::Bool modified::Bool
parent::Group parent::Group
function GWord(symbols::Vector{T}) @compat function GWord{T}(symbols::Vector{T}) where {T<:GSymbol}
return new(symbols, hash(symbols), true) return new(symbols, hash(symbols), true)
end end
end end
abstract AbstractFPGroup <: Group @compat abstract type AbstractFPGroup <: Group end
############################################################################### ###############################################################################
# #
@ -70,7 +70,7 @@ parent{T<:GSymbol}(w::GWord{T}) = w.parent
# #
############################################################################### ###############################################################################
GWord{T<:GSymbol}(s::T) = GWord{T}(T[s]) GWord(s::T) where {T<:GSymbol} = GWord{T}(T[s])
convert{T<:GSymbol}(::Type{GWord{T}}, s::T) = GWord{T}(T[s]) convert{T<:GSymbol}(::Type{GWord{T}}, s::T) = GWord{T}(T[s])
############################################################################### ###############################################################################
@ -79,7 +79,6 @@ convert{T<:GSymbol}(::Type{GWord{T}}, s::T) = GWord{T}(T[s])
# #
############################################################################### ###############################################################################
function hash(W::GWord, h::UInt) function hash(W::GWord, h::UInt)
W.modified && reduce!(W) W.modified && reduce!(W)
@compat res = xor(W.savedhash, h) @compat res = xor(W.savedhash, h)