.

wcfs/gen-set

-#!/bin/bash -e
-# set.go.in -> specialized with concrete types
-# gen-set package KIND VALUE out
-
-# Copyright (C) 2018-2020  Nexedi SA and Contributors.
-#                          Kirill Smelkov <kirr@nexedi.com>
-#
-# This program is free software: you can Use, Study, Modify and Redistribute
-# it under the terms of the GNU General Public License version 3, or (at your
-# option) any later version, as published by the Free Software Foundation.
-#
-# You can also Link and Combine this program with other software covered by
-# the terms of any of the Free Software licenses or any of the Open Source
-# Initiative approved licenses and Convey the resulting work. Corresponding
-# source of such a combination shall include the source code for all other
-# software used.
-#
-# This program is distributed WITHOUT ANY WARRANTY; without even the implied
-# warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
-#
-# See COPYING file for full licensing terms.
-# See https://www.nexedi.com/licensing for rationale and options.
-
-PACKAGE=$1
-KIND=$2
-VALUE=$3
-out=$4
-
-input=$(dirname $0)/set.go.in
-
-echo "// Code generated by gen-set $KIND $VALUE; DO NOT EDIT." >$out
-echo >>$out
-
-sed	\
-	-e "s/PACKAGE/$PACKAGE/g"	\
-	-e "s/VALUE/$VALUE/g"		\
-	-e "s/Set/Set${KIND}/g"		\
-	$input >>$out

wcfs/gen-δtail

-#!/bin/bash -e
-# δtail.go.in -> specialized with concrete types
-# gen-δtail KIND ID out
-
-# Copyright (C) 2018-2020  Nexedi SA and Contributors.
-#                          Kirill Smelkov <kirr@nexedi.com>
-#
-# This program is free software: you can Use, Study, Modify and Redistribute
-# it under the terms of the GNU General Public License version 3, or (at your
-# option) any later version, as published by the Free Software Foundation.
-#
-# You can also Link and Combine this program with other software covered by
-# the terms of any of the Free Software licenses or any of the Open Source
-# Initiative approved licenses and Convey the resulting work. Corresponding
-# source of such a combination shall include the source code for all other
-# software used.
-#
-# This program is distributed WITHOUT ANY WARRANTY; without even the implied
-# warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
-#
-# See COPYING file for full licensing terms.
-# See https://www.nexedi.com/licensing for rationale and options.
-
-KIND=$1
-ID=$2
-out=$3
-
-zodb=lab.nexedi.com/kirr/neo/go/zodb
-zdir=`go list -f '{{.Dir}}' $zodb`
-zrev=`git -C $zdir describe --always`
-
-echo "// Code generated by gen-δtail $KIND $ID; DO NOT EDIT." >$out
-echo "// (from $zodb @ $zrev)" >>$out
-echo >>$out
-
-$zdir/δtail.go.cat-generic | sed		\
-	-e "s/PACKAGE/main/g"			\
-	-e "s/ID/$ID/g"				\
-	-e "s/ΔTail/ΔTail${KIND}/g"		\
-	-e "s/δRevEntry/δRevEntry${KIND}/g"	\
-	>>$out

wcfs/set.go.in

-// Copyright (C) 2015-2020  Nexedi SA and Contributors.
-//                          Kirill Smelkov <kirr@nexedi.com>
-//
-// This program is free software: you can Use, Study, Modify and Redistribute
-// it under the terms of the GNU General Public License version 3, or (at your
-// option) any later version, as published by the Free Software Foundation.
-//
-// You can also Link and Combine this program with other software covered by
-// the terms of any of the Free Software licenses or any of the Open Source
-// Initiative approved licenses and Convey the resulting work. Corresponding
-// source of such a combination shall include the source code for all other
-// software used.
-//
-// This program is distributed WITHOUT ANY WARRANTY; without even the implied
-// warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
-//
-// See COPYING file for full licensing terms.
-// See https://www.nexedi.com/licensing for rationale and options.
-
-package PACKAGE
-
-// Set is a set of VALUE.
-type Set map[VALUE]struct{}
-
-// Add adds v to the set.
-func (s Set) Add(v VALUE) {
-	s[v] = struct{}{}
-}
-
-// Del removes v from the set.
-// it is noop if v was not in the set.
-func (s Set) Del(v VALUE) {
-	delete(s, v)
-}
-
-// Has checks whether the set contains v.
-func (s Set) Has(v VALUE) bool {
-	_, ok := s[v]
-	return ok
-}
-
-// Update adds t values to s.
-func (s Set) Update(t Set) {
-	for v := range t {
-		s.Add(v)
-	}
-}
-
-// Elements returns all elements of set as slice.
-func (s Set) Elements() []VALUE {
-	ev := make([]VALUE, len(s))
-	i := 0
-	for e := range s {
-		ev[i] = e
-		i++
-	}
-	return ev
-}