fix

langs/prolog/run.sh

@@ -2,8 +2,10 @@ IN="$(mktemp --suffix .pl)"
 OUT="$(mktemp)"
 
 cat > "$IN"
+sed -i "1i:- initialization(main).
+" "$IN"
 
-gplc -o "$OUT" "$IN"
+gplc --no-top-level -o "$OUT" "$IN"
 
 if [ $? -eq 0 ]; then
   exec "$OUT"