WIP: multi file generation

dist/bin/index.js

@@ -13,7 +13,7 @@ async function mainFunc() {
   let args = process.argv.slice(2);
 
   const fn = process.argv.includes('--image-only') ? generateImageFile : generateLoadedImageFile;
-  args = args.filter(elem => elem !== '--image-only');
+  args = args.filter(elem => elem !== '--image-only' && !elem.startsWith('--copy-dir'));
 
   if (args.length !== 2) {
     throw new Error('Expected exactly 2 inputs, input prolog (.pl) file and output file');

dist/generateImage.ts

@@ -3,6 +3,7 @@
 import SWIPL from './swipl/swipl-bundle';
 import fs from 'fs';
 import { fetch } from '@inrupt/universal-fetch';
+import { readFileSync } from 'fs-extra';
 
 function Uint8ToString(u8a: Uint8Array) {
   const CHUNK_SZ = 0x8000;
@@ -14,12 +15,21 @@ function Uint8ToString(u8a: Uint8Array) {
   return c.join('');
 }
 
-export async function generateImageBuffer(prolog: string | Buffer): Promise<Uint8Array> {
+interface Options {
+  name?: string;
+  copyDir?: string;
+}
+
+export async function generateImageBuffer(prolog: string | Buffer, options?: Options): Promise<Uint8Array> {
   const Module = await SWIPL({
-    arguments: ['-q', '-f', 'prolog.pl'],
+    arguments: ['-q', '-f', options?.name ?? 'prolog.pl'],
     // eslint-disable-next-line @typescript-eslint/ban-ts-comment
     // @ts-ignore
-    preRun: [(module: SWIPLModule) => { module.FS.writeFile('prolog.pl', prolog) }],
+    preRun: [(module: SWIPLModule) => {
+      module.FS.
+
+      module.FS.writeFile(options?.name ?? 'prolog.pl', prolog)
+    }],
   });
 
   Module.prolog.query("qsave_program('prolog.pvm')").once();

examples/generation/package.json

@@ -10,7 +10,7 @@
   },
   "keywords": [],
   "author": "",
-  "license": "ISC",
+  "license": "MIT",
   "dependencies": {
     "swipl-wasm": "file:../.."
   },

examples/multi-file-generation/.gitignore

@@ -0,0 +1 @@
+dist/max.ts

examples/multi-file-generation/dist/main.ts

@@ -0,0 +1,11 @@
+import SWIPL from './max';
+
+async function main() {
+  const Module = await SWIPL();
+  const res = Module.prolog.query('myMax(A, B, C).', { A: 1, B: 2 });
+  if ((res.once() as { C: number }).C !== 2) {
+    throw new Error('Failed to find max')
+  }
+}
+
+main();