Kernighans large earthquake problem: Difference between revisions
Content deleted Content added
m →{{header|Phix}}: added syntax colouring, made p2js compatible |
Emacs Lisp: Avoid need non-portable shebang |
||
Line 1,025:
=={{header|Emacs Lisp}}==
<lang lisp>
(insert-file-contents "data.txt")
(goto-char (point-min))
(while (not (eobp))
(let* ((line (buffer-substring (line-beginning-position)
Line 1,035 ⟶ 1,034:
(when (> (string-to-number magn) 6.0)
(message line)))
(forward-line 1
=={{header|Factor}}==
|