From 582e01c06f9ecee25a31c34562926b41dc2856eb Mon Sep 17 00:00:00 2001
From: Eelco Dolstra <e.dolstra@tudelft.nl>
Date: Wed, 9 Feb 2005 09:50:29 +0000
Subject: * Automatically upgrade <= 0.7 Nix stores to the new schema (so that 
  existing user environments continue to work). * `nix-store --verify': detect
 incomplete closures.

---
 src/aterm-helper.pl | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'src/aterm-helper.pl')

diff --git a/src/aterm-helper.pl b/src/aterm-helper.pl
index 5666244ae2b6..1feff0ccd098 100755
--- a/src/aterm-helper.pl
+++ b/src/aterm-helper.pl
@@ -111,7 +111,7 @@ while (<STDIN>) {
 
         print HEADER "#ifdef __cplusplus\n";
         print HEADER "static inline bool match$funname(ATerm e$formals2) {\n";
-        print HEADER "    if (ATgetType(e) != AT_APPL || ATgetAFun(e) != sym$funname) return false;\n";
+        print HEADER "    if (ATgetType(e) != AT_APPL || (AFun) ATgetAFun(e) != sym$funname) return false;\n";
         print HEADER "$unpack";
         print HEADER "    return true;\n";
         print HEADER "}\n";
-- 
cgit 1.4.1