nixo
/
guix-devel
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

utils: Disable memoization for 'location'. 

This was getting 25% hits, which did not quite justify the overhead.

* guix/utils.scm (location): Remove 'mlambda'.
This commit is contained in:
Ludovic Courtès 2018-07-02 14:47:35 +02:00
parent 96b2b0ddc9
commit 3059a35afe
No known key found for this signature in database
GPG Key ID: 090B11993D9AEBB5
1 changed files with 4 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

9
guix/utils.scm
View File

@ -773,11 +773,10 @@ be determined."
(line location-line) ; 1-indexed line (line location-line) ; 1-indexed line
(column location-column)) ; 0-indexed column (column location-column)) ; 0-indexed column
(define location (define (location file line column)
(mlambda (file line column) "Return the <location> object for the given FILE, LINE, and COLUMN."
"Return the <location> object for the given FILE, LINE, and COLUMN." (and line column file
(and line column file (make-location file line column)))
(make-location file line column))))
(define (source-properties->location loc) (define (source-properties->location loc)
"Return a location object based on the info in LOC, an alist as returned "Return a location object based on the info in LOC, an alist as returned