Andrew Cooke | Contents | Latest | RSS | Previous | Next

C[omp]ute

Welcome to my blog, which was once a mailing list of the same name and is still generated by mail. Please reply via the "comment" links.

Always interested in offers/projects/new ideas. Eclectic experience in fields like: numerical computing; Python web; Java enterprise; functional languages; GPGPU; SQL databases; etc. Based in Santiago, Chile; telecommute worldwide. CV; email.

Personal Projects

Choochoo Training Diary

Last 100 entries

[Programming] React Leaflet; AliExpress Independent Sellers; Applebaum - Twilight of Democracy; [Politics] Back + US Elections; [Programming,Exercise] Simple Timer Script; [News] 2019: The year revolt went global; [Politics] The world's most-surveilled cities; [Bike] Hope Freehub; [Restaurant] Mama Chau's (Chinese, Providencia); [Politics] Brexit Podcast; [Diary] Pneumonia; [Politics] Britain's Reichstag Fire moment; install cairo; [Programming] GCC Sanitizer Flags; [GPU, Programming] Per-Thread Program Counters; My Bike Accident - Looking Back One Year; [Python] Geographic heights are incredibly easy!; [Cooking] Cookie Recipe; Efficient, Simple, Directed Maximisation of Noisy Function; And for argparse; Bash Completion in Python; [Computing] Configuring Github Jekyll Locally; [Maths, Link] The Napkin Project; You can Masquerade in Firewalld; [Bike] Servicing Budget (Spring) Forks; [Crypto] CIA Internet Comms Failure; [Python] Cute Rate Limiting API; [Causality] Judea Pearl Lecture; [Security, Computing] Chinese Hardware Hack Of Supermicro Boards; SQLAlchemy Joined Table Inheritance and Delete Cascade; [Translation] The Club; [Computing] Super Potato Bruh; [Computing] Extending Jupyter; Further HRM Details; [Computing, Bike] Activities in ch2; [Books, Link] Modern Japanese Lit; What ended up there; [Link, Book] Logic Book; Update - Garmin Express / Connect; Garmin Forerunner 35 v 230; [Link, Politics, Internet] Government Trolls; [Link, Politics] Why identity politics benefits the right more than the left; SSH Forwarding; A Specification For Repeating Events; A Fight for the Soul of Science; [Science, Book, Link] Lost In Math; OpenSuse Leap 15 Network Fixes; Update; [Book] Galileo's Middle Finger; [Bike] Chinese Carbon Rims; [Bike] Servicing Shimano XT Front Hub HB-M8010; [Bike] Aliexpress Cycling Tops; [Computing] Change to ssh handling of multiple identities?; [Bike] Endura Hummvee Lite II; [Computing] Marble Based Logic; [Link, Politics] Sanity Check For Nuclear Launch; [Link, Science] Entropy and Life; [Link, Bike] Cheap Cycling Jerseys; [Link, Music] Music To Steal 2017; [Link, Future] Simulated Brain Drives Robot; [Link, Computing] Learned Index Structures; Solo Air Equalization; Update: Higher Pressures; Psychology; [Bike] Exercise And Fuel; Continental Race King 2.2; Removing Lowers; Mnesiacs; [Maths, Link] Dividing By Zero; [Book, Review] Ray Monk - Ludwig Wittgenstein: The Duty Of Genius; [Link, Bike, Computing] Evolving Lacing Patterns; [Jam] Strawberry and Orange Jam; [Chile, Privacy] Biometric Check During Mail Delivery; [Link, Chile, Spanish] Article on the Chilean Drought; [Bike] Extended Gear Ratios, Shimano XT M8000 (24/36 Chainring); [Link, Politics, USA] The Future Of American Democracy; Mass Hysteria; [Review, Books, Links] Kazuo Ishiguro - Never Let Me Go; [Link, Books] David Mitchell's Favourite Japanese Fiction; [Link, Bike] Rear Suspension Geometry; [Link, Cycling, Art] Strava Artwork; [Link, Computing] Useful gcc flags; [Link] Voynich Manuscript Decoded; [Bike] Notes on Servicing Suspension Forks; [Links, Computing] Snap, Flatpack, Appimage; [Link, Computing] Oracle is leaving Java (to die); [Link, Politics] Cubans + Ultrasonics; [Book, Link] Laurent Binet; VirtualBox; [Book, Link] No One's Ways; [Link] The Biggest Problem For Cyclists Is Bad Driving; [Computing] Doxygen, Sphinx, Breathe; [Admin] Brokw Recent Permalinks; [Bike, Chile] Buying Bearings in Santiago; [Computing, Opensuse] Upgrading to 42.3; [Link, Physics] First Support for a Physics Theory of Life; [Link, Bike] Peruvian Frame Maker; [Link] Awesome Game Theory Tit-For-Tat Thing; [Food, Review] La Fabbrica - Good Italian Food In Santiago; [Link, Programming] MySQL UTF8 Broken; [Link, Books] Latin American Authors

© 2006-2017 Andrew Cooke (site) / post authors (content).

A Useful Julia Macro To Define Equality And Hash

From: andrew cooke <andrew@...>

Date: Fri, 5 Jun 2015 22:04:34 -0300

Julia has two kinds of composite types - immutable and mutable.

Immutable is more like a "value" type.  Instances are copied, and equality and
hash, by default, are based on the "bit pattern" contained.

In contrast, mutable is more like "a pointer to a struct".  Instances are
passed by reference, and equality and hash are based on the address.

If an immutable type includes a field that is a mutable type then equality
will include that address, presumably.

See https://groups.google.com/forum/#!topic/julia-users/Mn1EdDRoiuo


So for all mutable types, and for many immutable types, it is important to
define equality and hash functions that iterate over the contents.

Typically you write code like:

  type Foo
      a::Int
      b
  end
  hash(x::Foo) = hash(x.a, hash(x.b))
  ==(x::Foo, y::Foo) = x.a == y.a && x.b == y.b

Which gets tiring after a time.  Hence this macr which generates the above
from

  @auto type Foo
      a::Int
      b
  end

Disclaimer: this is freshly written, hardly tested, and I am no Julia guru!

Andrew



import Base.hash

function auto_hash(name, names)

    function expand(i)
        if i == length(names)
            :(hash(a.$(names[i])))
        else
            :(hash(a.$(names[i]), $(expand(i+1))))
        end
    end

    quote
        function hash(a::$(name))
            $(expand(1))
        end
    end

end

function auto_equals(name, names)

    function expand(i)
        if i == length(names)
            :(a.$(names[i]) == b.$(names[i]))
        else
            :(a.$(names[i]) == b.$(names[i]) && $(expand(i+1)))
        end
    end

    quote
        function ==(a::$(name), b::$(name))
            $(expand(1))
        end
    end

end

macro auto(typ)

    @assert typ.head == :type

    name = typ.args[2]
    @assert typeof(name) == Symbol

    fields = typ.args[3].args
    names = Array(Symbol,0)
    for i in 1:length(fields)
        if typeof(fields[i]) == Symbol
            push!(names, fields[i])
        elseif typeof(fields[i]) == Expr && fields[i].head == :(::)
            push!(names, fields[i].args[1])
        end
    end

    quote
        $typ
        $(esc(auto_hash(name, names)))
        $(esc(auto_equals(name, names)))
    end
end

Fixed Version

From: andrew cooke <andrew@...>

Date: Sat, 6 Jun 2015 07:37:03 -0300

The code above needs $(esc(typ)) near the end and better unpacking of the name
of a tyope when it is a subclass.

Code used "for real" is available at
https://github.com/andrewcooke/ParserCombinator.jl/blob/master/src/auto.jl

Andrew

Comment on this post