Add support for the Logtalk language

docs/languages.md

@@ -16,6 +16,7 @@ Jupytext works with notebooks in any of the following languages:
 - Java
 - Javascript
 - Julia
+- Logtalk
 - Lua
 - Matlab
 - OCaml

src/jupytext/languages.py

@@ -92,6 +92,7 @@
         "comment_suffix": "*/",
     },
     ".xsh": {"language": "xonsh", "comment": "#"},
+    ".lgt": {"language": "logtalk", "comment": "%"},
     ".lua": {"language": "lua", "comment": "--"},
     ".go": {"language": "go", "comment": "//"},
 }

tests/data/notebooks/inputs/ipynb_logtalk/logtalk_notebook.ipynb

@@ -0,0 +1,110 @@
+{
+ "cells": [
+  {
+   "cell_type": "markdown",
+   "metadata": {},
+   "source": [
+    "# An implementation of the Ackermann function"
+   ]
+  },
+  {
+   "cell_type": "code",
+   "execution_count": 2,
+   "metadata": {
+    "vscode": {
+     "languageId": "logtalk"
+    }
+   },
+   "outputs": [
+    {
+     "data": {
+      "text/plain": [
+       "\u001b[1mtrue"
+      ]
+     },
+     "metadata": {},
+     "output_type": "display_data"
+    }
+   ],
+   "source": [
+    "%%load ack.lgt\n",
+    "\n",
+    ":- object(ack).\n",
+    "\n",
+    ":- info([\n",
+    "\tversion is 1:0:0,\n",
+    "\tauthor is 'Paulo Moura',\n",
+    "\tdate is 2008-3-31,\n",
+    "\tcomment is 'Ackermann function (general recursive function).'\n",
+    "]).\n",
+    "\n",
+    ":- public(ack/3).\n",
+    ":- mode(ack(+integer, +integer, -integer), one).\n",
+    ":- info(ack/3, [\n",
+    "\tcomment is 'Ackermann function.',\n",
+    "\targnames is ['M', 'N', 'V']\n",
+    "]).\n",
+    "\n",
+    "ack(0, N, V) :-\n",
+    "\t!,\n",
+    "\tV is N + 1.\n",
+    "ack(M, 0, V) :-\n",
+    "\t!,\n",
+    "\tM2 is M - 1,\n",
+    "\tack(M2, 1, V).\n",
+    "ack(M, N, V) :-\n",
+    "\tM2 is M - 1,\n",
+    "\tN2 is N - 1,\n",
+    "\tack(M, N2, V2),\n",
+    "\tack(M2, V2, V).\n",
+    "\n",
+    ":- end_object."
+   ]
+  },
+  {
+   "cell_type": "markdown",
+   "metadata": {},
+   "source": [
+    "## Sample query"
+   ]
+  },
+  {
+   "cell_type": "code",
+   "execution_count": 3,
+   "metadata": {
+    "vscode": {
+     "languageId": "logtalk"
+    }
+   },
+   "outputs": [
+    {
+     "data": {
+      "text/plain": [
+       "\u001b[1mV = 11"
+      ]
+     },
+     "metadata": {},
+     "output_type": "display_data"
+    }
+   ],
+   "source": [
+    "ack::ack(2, 4, V)."
+   ]
+  }
+ ],
+ "metadata": {
+  "kernelspec": {
+   "display_name": "Logtalk",
+   "language": "logtalk",
+   "name": "logtalk_kernel"
+  },
+  "language_info": {
+   "codemirror_mode": "logtalk",
+   "file_extension": ".lgt",
+   "mimetype": "text/x-logtalk",
+   "name": "Logtalk"
+  }
+ },
+ "nbformat": 4,
+ "nbformat_minor": 2
+}

tests/data/notebooks/outputs/ipynb_to_Rmd/logtalk_notebook.Rmd

@@ -0,0 +1,50 @@
+---
+jupyter:
+  kernelspec:
+    display_name: Logtalk
+    language: logtalk
+    name: logtalk_kernel
+---
+
+# An implementation of the Ackermann function
+
+```{logtalk vscode={'languageId': 'logtalk'}}
+%%load ack.lgt
+
+:- object(ack).
+
+:- info([
+	version is 1:0:0,
+	author is 'Paulo Moura',
+	date is 2008-3-31,
+	comment is 'Ackermann function (general recursive function).'
+]).
+
+:- public(ack/3).
+:- mode(ack(+integer, +integer, -integer), one).
+:- info(ack/3, [
+	comment is 'Ackermann function.',
+	argnames is ['M', 'N', 'V']
+]).
+
+ack(0, N, V) :-
+	!,
+	V is N + 1.
+ack(M, 0, V) :-
+	!,
+	M2 is M - 1,
+	ack(M2, 1, V).
+ack(M, N, V) :-
+	M2 is M - 1,
+	N2 is N - 1,
+	ack(M, N2, V2),
+	ack(M2, V2, V).
+
+:- end_object.
+```
+
+## Sample query
+
+```{logtalk vscode={'languageId': 'logtalk'}}
+ack::ack(2, 4, V).
+```

tests/data/notebooks/outputs/ipynb_to_hydrogen/logtalk_notebook.lgt

@@ -0,0 +1,50 @@
+% ---
+% jupyter:
+%   kernelspec:
+%     display_name: Logtalk
+%     language: logtalk
+%     name: logtalk_kernel
+% ---
+
+% %% [markdown]
+% # An implementation of the Ackermann function
+
+% %% vscode={"languageId": "logtalk"}
+%%load ack.lgt
+
+:- object(ack).
+
+:- info([
+	version is 1:0:0,
+	author is 'Paulo Moura',
+	date is 2008-3-31,
+	comment is 'Ackermann function (general recursive function).'
+]).
+
+:- public(ack/3).
+:- mode(ack(+integer, +integer, -integer), one).
+:- info(ack/3, [
+	comment is 'Ackermann function.',
+	argnames is ['M', 'N', 'V']
+]).
+
+ack(0, N, V) :-
+	!,
+	V is N + 1.
+ack(M, 0, V) :-
+	!,
+	M2 is M - 1,
+	ack(M2, 1, V).
+ack(M, N, V) :-
+	M2 is M - 1,
+	N2 is N - 1,
+	ack(M, N2, V2),
+	ack(M2, V2, V).
+
+:- end_object.
+
+% %% [markdown]
+% ## Sample query
+
+% %% vscode={"languageId": "logtalk"}
+ack::ack(2, 4, V).

tests/data/notebooks/outputs/ipynb_to_md/logtalk_notebook.md

@@ -0,0 +1,50 @@
+---
+jupyter:
+  kernelspec:
+    display_name: Logtalk
+    language: logtalk
+    name: logtalk_kernel
+---
+
+# An implementation of the Ackermann function
+
+```logtalk vscode={"languageId": "logtalk"}
+%%load ack.lgt
+
+:- object(ack).
+
+:- info([
+	version is 1:0:0,
+	author is 'Paulo Moura',
+	date is 2008-3-31,
+	comment is 'Ackermann function (general recursive function).'
+]).
+
+:- public(ack/3).
+:- mode(ack(+integer, +integer, -integer), one).
+:- info(ack/3, [
+	comment is 'Ackermann function.',
+	argnames is ['M', 'N', 'V']
+]).
+
+ack(0, N, V) :-
+	!,
+	V is N + 1.
+ack(M, 0, V) :-
+	!,
+	M2 is M - 1,
+	ack(M2, 1, V).
+ack(M, N, V) :-
+	M2 is M - 1,
+	N2 is N - 1,
+	ack(M, N2, V2),
+	ack(M2, V2, V).
+
+:- end_object.
+```
+
+## Sample query
+
+```logtalk vscode={"languageId": "logtalk"}
+ack::ack(2, 4, V).
+```

tests/data/notebooks/outputs/ipynb_to_myst/logtalk_notebook.md

@@ -0,0 +1,57 @@
+---
+kernelspec:
+  display_name: Logtalk
+  language: logtalk
+  name: logtalk_kernel
+---
+
+# An implementation of the Ackermann function
+
+```{code-cell}
+---
+vscode:
+  languageId: logtalk
+---
+%%load ack.lgt
+
+:- object(ack).
+
+:- info([
+	version is 1:0:0,
+	author is 'Paulo Moura',
+	date is 2008-3-31,
+	comment is 'Ackermann function (general recursive function).'
+]).
+
+:- public(ack/3).
+:- mode(ack(+integer, +integer, -integer), one).
+:- info(ack/3, [
+	comment is 'Ackermann function.',
+	argnames is ['M', 'N', 'V']
+]).
+
+ack(0, N, V) :-
+	!,
+	V is N + 1.
+ack(M, 0, V) :-
+	!,
+	M2 is M - 1,
+	ack(M2, 1, V).
+ack(M, N, V) :-
+	M2 is M - 1,
+	N2 is N - 1,
+	ack(M, N2, V2),
+	ack(M2, V2, V).
+
+:- end_object.
+```
+
+## Sample query
+
+```{code-cell}
+---
+vscode:
+  languageId: logtalk
+---
+ack::ack(2, 4, V).
+```

tests/data/notebooks/outputs/ipynb_to_percent/logtalk_notebook.lgt

@@ -0,0 +1,50 @@
+% ---
+% jupyter:
+%   kernelspec:
+%     display_name: Logtalk
+%     language: logtalk
+%     name: logtalk_kernel
+% ---
+
+% %% [markdown]
+% # An implementation of the Ackermann function
+
+% %% vscode={"languageId": "logtalk"}
+% %%load ack.lgt
+
+:- object(ack).
+
+:- info([
+	version is 1:0:0,
+	author is 'Paulo Moura',
+	date is 2008-3-31,
+	comment is 'Ackermann function (general recursive function).'
+]).
+
+:- public(ack/3).
+:- mode(ack(+integer, +integer, -integer), one).
+:- info(ack/3, [
+	comment is 'Ackermann function.',
+	argnames is ['M', 'N', 'V']
+]).
+
+ack(0, N, V) :-
+	!,
+	V is N + 1.
+ack(M, 0, V) :-
+	!,
+	M2 is M - 1,
+	ack(M2, 1, V).
+ack(M, N, V) :-
+	M2 is M - 1,
+	N2 is N - 1,
+	ack(M, N2, V2),
+	ack(M2, V2, V).
+
+:- end_object.
+
+% %% [markdown]
+% ## Sample query
+
+% %% vscode={"languageId": "logtalk"}
+ack::ack(2, 4, V).