temporary vdmos-1.el

vdmos-1.el

@@ -0,0 +1,19 @@
+;;; (load-file buffer-file-name)
+
+(defun mos1->vdmos(file)
+    (with-temp-file file
+      (insert-file-contents-literally file)
+      (while (re-search-forward (rx "mos1")
+                                nil t)
+        (replace-match "vdmos"))))
+
+
+(cl-loop for f in (process-lines "git" "ls-files" "--" "src/spicelib/devices/mos1")
+         for dst = (concat "src/spicelib/devices/vdmos/"
+                           (replace-regexp-in-string "mos1" "vdmos"
+                                                     (file-name-nondirectory f)))
+         initially (mkdir "src/spicelib/devices/vdmos" t)
+         do (progn
+              (copy-file f dst t)
+              (mos1->vdmos dst)
+              (process-lines "git" "add" dst)))