Rosetta Code

Maze solving: Difference between revisions

Page Discussion

Maze solving (view source)

Revision as of 12:47, 8 February 2022

282 bytes removed ,  2 years ago
Emacs Lisp: Avoid non-portable shebang
m (→‎{{header|Phix}}: added syntax colouring, marked p2js compatible)
(Emacs Lisp: Avoid non-portable shebang)
Line 1,836:
 
=={{header|Emacs Lisp}}==
 
file: maze.el
{{libheader|cl-lib}}
 
<lang lisp>(require 'cl-lib)
 
Line 2,029 ⟶ 2,031:
(print-maze maze solution)))
 
(providesolve '"maze.txt")</lang>
</lang>
file: maze-solve
<lang lisp>#!/usr/bin/env emacs -script
;; -*- lexical-binding: t -*-
;;> Solve mazes generated by maze-generator.
;;> Example: ./maze-solve maze.txt
 
(add-to-list 'load-path (file-name-directory load-file-name))
(require 'maze)
 
(solve (elt command-line-args-left 0))
</lang>
{{out}}
<pre style="height:35ex;overflow:scroll;">+ +---+---+---+---+---+---+---+---+---+
Anonymous user
Retrieved from "https://rosettacode.org/wiki/Special:MobileDiff/167964"