/usr/lib/gambc4/_system#.scm is in libgambc4 4.2.8-1.1.
This file is owned by root:root, with mode 0o644.
The actual contents of the file can be viewed below.
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 | ;;;============================================================================
;;; File: "_system#.scm", Time-stamp: <2007-05-27 22:03:58 feeley>
;;; Copyright (c) 1994-2007 by Marc Feeley, All Rights Reserved.
;;;============================================================================
;;; Representation of exceptions.
(define-library-type-of-exception invalid-hash-number-exception
id: 3b7674e5-a6d8-11d9-930c-00039301ba52
constructor: #f
opaque:
(procedure unprintable: read-only:)
(arguments unprintable: read-only:)
)
(define-library-type-of-exception unbound-table-key-exception
id: 1a1e928d-8df4-11d9-8894-00039301ba52
constructor: #f
opaque:
(procedure unprintable: read-only:)
(arguments unprintable: read-only:)
)
(define-library-type-of-exception unbound-serial-number-exception
id: 3eb844fe-9381-11d9-b22f-00039301ba52
constructor: #f
opaque:
(procedure unprintable: read-only:)
(arguments unprintable: read-only:)
)
;;;----------------------------------------------------------------------------
;;; Define type checking macros.
(define-check-type hash-algorithm 'hash-algorithm
##hash-algorithm?)
;;;----------------------------------------------------------------------------
;;; Representation of tables.
(define-type table
id: 5917e472-85e5-11d9-a2c0-00039301ba52
type-exhibitor: macro-type-table
constructor: macro-make-table
implementer: implement-type-table
opaque:
macros:
prefix: macro-
(flags unprintable:)
(test unprintable:)
(hash unprintable:)
(loads unprintable:)
(gcht unprintable:)
(init unprintable:)
)
;;; Representation of digests.
(define-type digest
id: 1ce13de0-ccaa-4627-94be-b13eaa2c32e6
type-exhibitor: macro-type-digest
constructor: macro-make-digest
implementer: implement-type-digest
opaque:
macros:
prefix: macro-
(close-digest unprintable:)
(hash-update unprintable:)
(hash unprintable:)
(block unprintable:)
(block-pos unprintable:)
(bit-pos unprintable:)
)
;;;============================================================================
|