1
1
mirror of https://github.com/github/semantic.git synced 2024-11-24 08:54:07 +03:00

Correct some indentation.

This commit is contained in:
Rob Rix 2018-03-01 11:36:02 -05:00
parent 1aff7df28a
commit 4c79afece2

View File

@ -66,7 +66,7 @@ instance Evaluatable [] where
eval [x] = subtermValue x -- Return the value for the last term
eval (x:xs) = do
_ <- subtermValue x -- Evaluate the head term
env <- getGlobalEnv -- Get the global environment after evaluation
env <- getGlobalEnv -- Get the global environment after evaluation
-- since it might have been modified by the
-- evaluation above ^.