Change-Id: Ic903e31b03e4e4075887d37f293c89b30e6c5df4 Reviewed-on: https://cl.tvl.fyi/c/depot/+/4339 Autosubmit: tazjin <mail@tazj.in> Tested-by: BuildkiteCI Reviewed-by: grfn <grfn@gws.fyi>
		
			
				
	
	
		
			65 lines
		
	
	
	
		
			1.8 KiB
		
	
	
	
		
			Nix
		
	
	
	
	
	
			
		
		
	
	
			65 lines
		
	
	
	
		
			1.8 KiB
		
	
	
	
		
			Nix
		
	
	
	
	
	
{ depot, pkgs, ... }:
 | 
						|
 | 
						|
let
 | 
						|
  src = pkgs.applyPatches {
 | 
						|
    name = "closure-html-source";
 | 
						|
    src = pkgs.lispPackages.closure-html.src;
 | 
						|
 | 
						|
    patches = [
 | 
						|
      # delete unexported and unused double defun in sgml-dtd.lisp
 | 
						|
      # which reference undefined CL-USER:*HTML-DTD* (!) which
 | 
						|
      # unlike CLOSURE-HTML:*HTML-DTD* is not involved in the
 | 
						|
      # packages operation.
 | 
						|
      ./no-double-defun.patch
 | 
						|
      # Patches html-parser.lisp to look for the distributed
 | 
						|
      # dtd files and catalog in this source derivations out
 | 
						|
      # path in the nix store instead of the same directory
 | 
						|
      # relatively to the (built) system.
 | 
						|
      ./dtds-from-store.patch
 | 
						|
    ];
 | 
						|
 | 
						|
    postPatch = ''
 | 
						|
      # Inject file which defines CLOSURE-HTML:*HTML-DTD*
 | 
						|
      # early in the package's build since SBCL otherwise
 | 
						|
      # fails due to the undefined variable. Need to inject
 | 
						|
      # this via postPatch since using a nix file results
 | 
						|
      # in failure to look up the file's true name which
 | 
						|
      # is done for … reasons, apparently.
 | 
						|
      cat > src/define-html-dtd.lisp << EOF
 | 
						|
      (in-package :closure-html)
 | 
						|
      (defvar *html-dtd*)
 | 
						|
      EOF
 | 
						|
 | 
						|
      # Substitute reference to @out@ of this source
 | 
						|
      # directory in this patched file.
 | 
						|
      substituteAllInPlace src/parse/html-parser.lisp
 | 
						|
    '';
 | 
						|
  };
 | 
						|
 | 
						|
  getSrcs = builtins.map (p: "${src}/${p}");
 | 
						|
in
 | 
						|
 | 
						|
depot.nix.buildLisp.library {
 | 
						|
  name = "closure-html";
 | 
						|
 | 
						|
  srcs = getSrcs [
 | 
						|
    "src/defpack.lisp"
 | 
						|
    "src/define-html-dtd.lisp"
 | 
						|
    "src/glisp/util.lisp"
 | 
						|
    "src/util/clex.lisp"
 | 
						|
    "src/util/lalr.lisp"
 | 
						|
    "src/net/mime.lisp"
 | 
						|
    "src/parse/pt.lisp"
 | 
						|
    "src/parse/sgml-dtd.lisp"
 | 
						|
    "src/parse/sgml-parse.lisp"
 | 
						|
    "src/parse/html-parser.lisp"
 | 
						|
    "src/parse/lhtml.lisp"
 | 
						|
    "src/parse/unparse.lisp"
 | 
						|
    "src/parse/documentation.lisp"
 | 
						|
  ];
 | 
						|
 | 
						|
  deps = [
 | 
						|
    depot.third_party.lisp.flexi-streams
 | 
						|
    depot.third_party.lisp.closure-common
 | 
						|
  ];
 | 
						|
}
 |